以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何让WORD模板打印,不生成临时文件?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=175264)

--  作者:lgz518
--  发布时间:2022/2/26 12:08:00
--  如何让WORD模板打印,不生成临时文件?
用WORD做打印模,执行时,提示会生成临时文件,如何让WORD模板打印,不生成临时文件?


图片点击可在新窗口打开查看此主题相关图片如下:word打印.jpg
图片点击可在新窗口打开查看


--  作者:lgz518
--  发布时间:2022/2/26 12:10:00
--  
Dim tm As String  = ProjectPath & "Attachments\\订单.docx" 
Dim fl As String = ProjectPath & "Reports\\订单.docx" 
Dim wrt As New WordReport(Tables("订单"),tm,fl) 
wrt.Build() 
wrt.Show() 

--  作者:cnsjroom
--  发布时间:2022/2/26 12:20:00
--  回复:(lgz518)Dim tm As String  = ProjectPa...

我的方法:

Dim tm As String  = ProjectPath & "Attachments\\" & e.Form.Name & ".docx" \'指定模板文件
Dim time As String =Format(Date.Now,"yyyyMMddHHmmss")
Dim fl As String = ProjectPath & "Reports\\" & time & e.Form.Name & ".docx" \'指定目标文件
Dim fl2 As String = ProjectPath & "Reports\\" & time & e.Form.Name & ".pdf" \'指定目标文件

 

增加一个格式化数据,确保每次生成的目标文件都不重名,即可解决!

 

论坛还有其他方法:

判断生成的目标文件是否存在,如果存在就先关闭它,然后再生成目标文件


--  作者:lgz518
--  发布时间:2022/2/26 12:24:00
--  
谢谢,我试试