以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]导出数据出错,提示至少有一个参数没有指定  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=11734)

--  作者:zhenshenbo
--  发布时间:2011/8/9 17:38:00
--  [求助]导出数据出错,提示至少有一个参数没有指定

Dim dt As Date = now()
Dim ex As New Exporter
ex.SourceTableName = "盘库统计" \'指定导出表
ex.FilePath = "盘点数据表.xls"  \'ProjectPath & "【备忘】" & dt.Date & "盘点数据表.xls" \'指定目标文件
ex.Format = "Excel" \'导出格式为Excel
ex.Fields = "ID,条形码,商家编码,正品数量,次品数量" \'指定导出字段
ex.Export() \'开始导出
MessageBox.Show("导出成功!", "提示")

 

 

提示如下

 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20110809173200.jpg
图片点击可在新窗口打开查看

--  作者:狐狸爸爸
--  发布时间:2011/8/9 17:43:00
--  

问题也许在这里:

 

ex.FilePath = "盘点数据表.xls" \'ProjectPath & "【备忘】" & dt.Date & "盘点数据表.xls" \'指定目标文件

 

你都没有指定文件的路径的。


--  作者:zhenshenbo
--  发布时间:2011/8/9 17:51:00
--  回复:(狐狸爸爸)问题也许在这里: ex.Fil...

之前用的是后面的引号后面部分..

ex.FilePath =  ProjectPath & "【备忘】" & dt.Date & "盘点数据表.xls"


--  作者:zhenshenbo
--  发布时间:2011/8/9 19:53:00
--  
以前 这么写是对的。。。 ex.FilePath =? ProjectPath & "【备忘】" & dt.Date & "盘点数据表.xls" 现在报错了..
--  作者:狐狸爸爸
--  发布时间:2011/8/9 20:57:00
--  

看看你合成的文件名到底是什么:

 

messagebox.show(ex.filepath)

 

还可以用下面的方法判断文件是否存在:

 

if FileSys.FileExists(ex.filepath)  = false then

   messagebox.show("文件不存在")

endif

 


--  作者:zhenshenbo
--  发布时间:2011/8/10 9:15:00
--  回复:(狐狸爸爸)看看你合成的文件名到底是什么:...

导出的路径文件必须要先存在么?  我前两天用的时候是直接生成一个文件  不知道为什么这两天就不行了

 

 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20110810091428.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2011-8-10 9:17:33编辑过]

--  作者:狐狸爸爸
--  发布时间:2011/8/10 9:17:00
--  

应该不需要存在的,导入才需要存在的,我之前以为是导入。

你明确指定路径和文件名吧。


--  作者:zhenshenbo
--  发布时间:2011/8/10 9:20:00
--  求软件

我以前就会在 table文件当前目录下 生成一个 excel表 

【备忘】2011-8-10盘点数据表  


--  作者:狐狸爸爸
--  发布时间:2011/8/10 9:22:00
--  

Dim dt As Date = now()
Dim ex As New Exporter
ex.SourceTableName = "盘库统计" \'指定导出表
ex.FilePath = projectPath & "盘点数据表.xls"

ex.Format = "Excel" \'导出格式为Excel
ex.Fields = "ID,条形码,商家编码,正品数量,次品数量" \'指定导出字段
ex.Export() \'开始导出
MessageBox.Show("导出成功!", "提示")


--  作者:zhenshenbo
--  发布时间:2011/8/10 9:26:00
--  回复:(狐狸爸爸)Dim dt As Date = now()Dim ex As ...
图片点击可在新窗口打开查看提示依旧一样...   导出的表里 有表达式列 没问题的吧  我直接导出是可以导出的...