Foxtable(狐表)用户栏目专家坐堂 → 打印SQLTABLE的问题


  共有1790人关注过本帖树形打印复制链接

主题:打印SQLTABLE的问题

帅哥哟,离线,有人找我吗?
douglas738888
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1175 积分:8792 威望:0 精华:0 注册:2012/4/18 16:28:00
打印SQLTABLE的问题  发帖心情 Post By:2017/6/19 17:02:00 [显示全部帖子]

请教老师,下面代码想实现打印SQLTABLE表,模板已经设计好(关联表打印),如果通过正本表可以打印,SQLTABLE表应该怎样打印

 

为了不影响其他人员使用正本表,故采用已设计好的模板对SQLTABLE表进行打印

 

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,9).Value = "<日期 = # " & Date.Today & "#>"  '写入打印条件
Book.Build() '生成报表
Book.Save(fl)
Dim Proc As New Process
Proc.File = fl
Proc.Start()

[此贴子已经被作者于2017/6/19 17:03:12编辑过]

 回到顶部