共7 条记录, 每页显示 10 条, 页签: [1]

标题：有关表数据导出的问题？

1楼

baoxyang 发表于：2009/8/20 17:33:00

导出完整代码：
Dim dlg As New SaveFileDialog '定一个新的SaveFileDialog
dlg.Filter= "Excel文件|*.xls" '设置筛选器
dim ss as string
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
    ss = dlg.FileName
   If FileSys.FileExists("& ss &") = true Then
      FileSys.DeleteFile("& ss &",2,2) '则彻底删
   End if
   Dim ex as New Exporter
   ex.SourceTableName = "入库捆包查询_Table1" '指定导出表
   ex.FilePath = ss    '指定目标文件
   ex.Format = "Excel" '导出格式为Excel
   'ex.Fields = "资源号,捆包号" '指定导出字段
' ex.Filter = "[资源号] <> ''" '指定导出条件
   ex.Export()
end if
图片点击可在新窗口打开查看

此主题相关图片如下：未命名.gif

请帮忙问题在哪？郁闷！查了很久了，不知错在哪？望指点！先谢了！不知哪位有用过表导出EXECL表，是否有遇同样的问题？

2楼

狐狸爸爸 发表于：2009/8/20 17:49:00

经过测试，没有发现问题。

看看是不是：
ex.SourceTableName = "入库捆包查询_Table1" '指定导出表

3楼

yangming 发表于：2009/8/20 18:12:00

入库捆包查询_Table1,这是窗口Table的名称啊,并不是表名称

4楼

yangming 发表于：2009/8/20 18:20:00

用你的代码,只改了这句:就能正常导出
ex.SourceTableName = "入库捆包查询_Table1" '指定导出表
改后:ex.SourceTableName = "工资" '指定导出表

5楼

baoxyang 发表于：2009/8/20 20:40:00

"入库捆包查询_Table1"表名，是在窗口“入库捆包查询”中用表控件Table1，sql_table类型生成的动态数据，不知此表名应如何写才对？望各位指点！为谢！

6楼

狐狸爸爸 发表于：2009/8/21 8:16:00

需要注意的是，外部表不能用Exporter导出。
自己编码导出吧。

7楼

baoxyang 发表于：2009/8/21 8:31:00

哦，原来是这样。

共7 条记录, 每页显示 10 条, 页签: [1]