以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]SaveToPDF能把多页保存到一个pdf文件吗?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=160459)

--  作者:浙江仔
--  发布时间:2021/2/3 14:02:00
--  [求助]SaveToPDF能把多页保存到一个pdf文件吗?
能把两个不同的内容打印在一个pdf中么?比如:

1、有个窗体打印
    Dim lj As String = id+ ".pdf"
    Dim doc As PrintDoc = e.Form.GernatePrintDoc()
    doc.SavePDF(ProjectPath +"Attachments\\" + lj )

2、有个word报表
Dim tm As String  = ProjectPath & "Attachments\\出库单.doc" \'指定模板文件
Dim
 fl1 As String = ProjectPath & "Reports\\出库单.doc" \'指定目标文件
Dim
 fl2 As String = ProjectPath & "Reports\\出库单.pdf" \'指定目标PDF文件
Dim
 wrt As New WordReport(Tables("出库"),tm,fl1) \'定义一个WordReport
wrt
.Build() \'逐行生成报表
wrt
.SaveToPDF(fl2) \'保存为PDF文件

能把后面的wrt追加到上面的doc上吗?如能,怎么写代码?

--  作者:有点蓝
--  发布时间:2021/2/3 14:06:00
--  
不能的。需要使用第三方的组件,比如:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=151835
--  作者:浙江仔
--  发布时间:2021/2/3 14:50:00
--  
谢谢