Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共16 条记录, 每页显示 10 条, 页签: [1] [2]
[浏览完整版]

标题:临时表支持excel模版吗?

1楼
blackzhu 发表于:2011/5/17 21:47:00
用代码生成的临时表我知道用saveexcel支持保存到excel,但是支持模版生成报表吗?
2楼
狐狸爸爸 发表于:2011/5/17 21:52:00

支持,一样,用代码:

 

http://help.foxtable.com/topics/1145.htm

 

3楼
blackzhu 发表于:2011/5/17 22:08:00

老大,那表名写什么?

 

4楼
狐狸爸爸 发表于:2011/5/17 22:12: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(3,0) = "<临时表名>"
Sheet(6,0) = "<临时表名>"
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()

5楼
blackzhu 发表于:2011/5/17 22:19:00
CrossTableBuilder  生成的这个统计表能用模版吗?
6楼
狐狸爸爸 发表于:2011/5/17 22:23:00

可以

7楼
blackzhu 发表于:2011/5/17 22:25:00

Dim g As New CrossTableBuilder("运作单窗口", DataTables("运作单"))
g.HGroups.AddDef("制单ID")
g.HGroups.AddDef("递交面料")
g.HGroups.AddDef("递交辅料")
g.HGroups.AddDef("递交样卡")
g.HGroups.AddDef("款号")
g.HGroups.AddDef("英文款名")
g.HGroups.AddDef("中文款名")
g.HGroups.AddDef("类别")
g.HGroups.AddDef("面辅料ID")
g.HGroups.AddDef("面辅料名称")
g.HGroups.AddDef("用于部位")
g.HGroups.AddDef("面辅料单耗")
g.HGroups.AddDef("供应来源")
g.VGroups.AddDef("颜色")
g.Totals.AddDef("配色说明", "配色说明")
Tables("运作单_Table1").DataSource = g.BuildDataSource()

 

 

老大,帮帮忙,这一段代码生成的临时表,报表的名称叫运作单,写一个模版打印的代码给我,行吗?从来没有接触过和弄过这个.

8楼
狐狸爸爸 发表于:2011/5/17 22:33:00

既然表名固定,设计模板的时候,表名直接指定为<运作单窗口>即可。

打印代码:

 

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()

9楼
blackzhu 发表于:2011/5/17 22:41:00
怎么没有用啊?
图片点击可在新窗口打开查看此主题相关图片如下:tm截图未命名.jpg
图片点击可在新窗口打开查看
10楼
狐狸爸爸 发表于:2011/5/17 22:47:00

正常,注意文件和路径,如果不正确,就会出现你说的的错误:

 

Dim Book As New XLS.Book(ProjectPath & "Attachments\模板名称.xls")

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

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02344 s, 2 queries.