- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 生成报表 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=63399)
-- 发布时间：2015/1/20 11:43:00
-- 生成报表
老师，我想实现的是合同已签勾选后打印合同明细，
这样写代码有什么不对吗？
For Each dr As DataRow In DataTables("合同明细").Select ("[合同已签] = True")
Next
Dim Book As New XLS.Book(ProjectPath & "Attachments\\合同明细.xlsx")
Dim fl As String = ProjectPath & "Reports\\合同明细.xlsx"
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()
-- 发布时间：2015/1/20 11:49:00
--
你应该在模版中设置条件
-- 发布时间：2015/1/20 14:08:00
--
我按您的建议操作，可是即使用<ALL>,还是只是输出鼠标所在的一列。会是什么原因呢？
Dim Book As New XLS.Book(ProjectPath & "Attachments\\合同明细.xlsx")
Dim fl As String = ProjectPath & "Reports\\合同明细.xlsx"
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()
-- 发布时间：2015/1/20 14:09:00
--
模版没设置对
开始 结束 都要有 <End>
搞不定就上传例子
-- 发布时间：2015/1/20 14:11:00
--
此主题相关图片如下：spximage2.jpg
-- 发布时间：2015/1/20 14:11:00
--
开始的那个 <END>就放错地方了. 看清楚2楼帮助连接
-- 发布时间：2015/1/20 14:12:00
--
http://www.foxtable.com/help/topics/0205.htm
-- 发布时间：2015/1/20 14:57:00
--
是的是的，搞定，谢谢老师！