- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- EXCEL报表的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=75987)
-- 发布时间：2015/10/19 15:23:00
-- EXCEL报表的问题
老师帮忙看看，我做的EXCEL报表不能实现，不知问题在哪里
下面上传测试
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.foxdb |
-- 发布时间：2015/10/19 15:26:00
--
1、excel模板发上来；
2、说明一下那里不能实现
-- 发布时间：2015/10/19 16:02:00
--
模板，无法显示报表
-- 发布时间：2015/10/19 16:02:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:订单.xls |
-- 发布时间：2015/10/19 16:35:00
--
Dim Book As New XLS.Book(ProjectPath & "Attachments\\订单.xls") \'打开模板
Dim fl As String = ProjectPath & "Reports\\订单.xls"
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet(1,4).Value = "<客户编号 in (\'" & DataTables("订单明细").GetComboListString("客户编号", "发送日期 = #" & Date.Today & "#").replace("|", "\',\'") & "\')>" \'写入打印条件
Sheet(4,4).Value = "<发送日期 = # " & Date.Today & "#>" \'写入打印条件
Book.Build() \'生成报表
Book.Save(fl)
Dim Proc As New Process
Proc.File = fl
Proc.Start()
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:订单.xls |
-- 发布时间：2015/10/19 16:45:00
--
谢谢老师的指导！我写的代码有问题。