以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  WORD报表的保存为PDF文件出现错误提示!  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=49375)

--  作者:y2287958
--  发布时间:2014/4/17 6:13:00
--  WORD报表的保存为PDF文件出现错误提示!
帮助中的例子:

保存为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()
---------------------------
确定   
---------------------------


请测试。

--  作者:y2287958
--  发布时间:2014/4/17 6:21:00
--  
试了一下EXCEL报表,出现如下错误提示:

---------------------------
版本:2014.4.18.1
---------------------------
代码执行出错,错误信息:



System.ArgumentException: 值不在预期的范围内。

   在 Microsoft.Office.Interop.Excel.WorkbookClass.ExportAsFixedFormat(XlFixedFormatType Type, Object Filename, Object Quality, Object IncludeDocProperties, Object IgnorePrintAreas, Object From, Object To, Object OpenAfterPublish, Object FixedFormatExtClassPtr)

   在 Foxtable.XLS.Book.SaveToPdf(String O1)

   在 UserCode.Test()
---------------------------
确定   
---------------------------


--  作者:狐狸爸爸
--  发布时间:2014/4/17 8:28:00
--  
可能你的office安装不完整,这个是直接利用office的功能老保存的,你试试在word中能否将文件另存为pdf
--  作者:有点甜
--  发布时间:2014/4/17 9:12:00
--  

 savePDF应该是office2007以上的版本才支持的,而且必须是完整版的office。

 

 如果2007提示这个错误,还需要安装一个插件

http://download.microsoft.com/download/6/2/5/6259b99f-1abf-4f27-b2a0-ad018b04f0a6/SaveAsPDFandXPS.exe

--  作者:y2287958
--  发布时间:2014/4/17 13:30:00
--  
谢谢
安装插件后问题搞定。