以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  打印SQLTABLE的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=102421)
--  作者：douglas738888
--  发布时间：2017/6/19 17:02:00
--  打印SQLTABLE的问题

请教老师，下面代码想实现打印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编辑过]
--  作者：有点色
--  发布时间：2017/6/19 17:25:00
--  

1、没必要用sqlTable。每一台电脑、每一个打开的项目，都是独立的，不会影响到其它人员的项目或电脑的。

 

2、如果要用sqlTable的话，你需要修改你的模板，把定义的表名改成 窗口1_Table1