- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 求助,窗口查询表导出EXCEL (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=31102)
-- 发布时间：2013/4/10 11:31:00
-- 求助,窗口查询表导出EXCEL
此主题相关图片如下：1.jpg
EXCEL模版如上
导出的代码如下
Dim Book As New XLS.Book(ProjectPath & "Attachments\\库存统计.xls")
Dim fl As String = ProjectPath & "Reports\\库存统计.xls"
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()
只能导出当前行一条数据，我需要的是整张表的数据，哪里出问题了呢？
窗口中的表是用FILL的方法生成的查询表
-- 发布时间：2013/4/10 11:35:00
--
少了一个<ALL> 吧?
-- 发布时间：2013/4/10 11:39:00
--
少了一个<ALL> 吧?
的确是..谢谢,被帮助文件误导了
-- 发布时间：2013/4/12 11:17:00
--
在哪里加？
-- 发布时间：2013/4/12 11:19:00
--
在哪里加？
-- 发布时间：2013/4/15 10:03:00
--
又偷懒不看帮助了吧.http://www.foxtable.com/help/topics/0201.htm
此主题相关图片如下：未标题-2.jpg
代码如下：
Dim Book As New XLS.Book(ProjectPath & "Attachments\\本月劳动合同到期人员名单.xls")
Dim fl As String = ProjectPath & "Reports\\本月劳动合同到期人员名单.xls"
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()
只是打印一行。
-- 发布时间：2013/4/15 10:41:00
--
此主题相关图片如下：未标题-2.jpg
代码如下：
Dim Book As New XLS.Book(ProjectPath & "Attachments\\本月劳动合同到期人员名单.xls")
Dim fl As String = ProjectPath & "Reports\\本月劳动合同到期人员名单.xls"
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()
只是打印一行。
上传个例子上来咯
-- 发布时间：2013/4/15 10:55:00
--
此主题相关图片如下：未标题-2.jpg
代码如下：
Dim Book As New XLS.Book(ProjectPath & "Attachments\\本月劳动合同到期人员名单.xls")
Dim fl As String = ProjectPath & "Reports\\本月劳动合同到期人员名单.xls"
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()
只是打印一行。
搞定！谢谢Bin！