帮助中的例子：
保存为PDF文件
为了避免用户修改生成好的Word报表，我们可以将报表保存为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()
出现以下错误提示：
---------------------------
版本:2014.4.16.1
---------------------------
代码执行出错，错误信息：
System.Runtime.InteropServices.COMException (0x80004005): 导出失败，因为此功能尚未安装。
在 Microsoft.Office.Interop.Word.DocumentClass.ExportAsFixedFormat(String OutputFileName, WdExportFormat ExportFormat, Boolean OpenAfterExport, WdExportOptimizeFor OptimizeFor, WdExportRange Range, Int32 From, Int32 To, WdExportItem Item, Boolean IncludeDocProps, Boolean KeepIRM, WdExportCreateBookmarks CreateBookmarks, Boolean DocStructureTags, Boolean BitmapMissingFonts, Boolean UseISO19005_1, Object& FixedFormatExtClassPtr)
在 Foxtable.WordReport.SaveToPDF(String O1)
在 UserCode.Test()
---------------------------
确定
---------------------------
请测试。
加好友 
发短信
Post By：2014/4/17 6:13:00 [显示全部帖子]
