-- 作者:cd_tdh
-- 发布时间:2017/10/19 11:26:00
-- [求助]生成PDF报表报错
Office2010版本,PDF浏览器、word转PDF插件都安装了,教程代码生成PDF报表出错
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.Quit() \'退出 Dim
Proc
As
New
Process
\'打开PDF文件 Proc.File = fl2 Proc.Start()
此主题相关图片如下:qq截图20171019112322.jpg
[此贴子已经被作者于2017/10/19 11:29:56编辑过]
|