以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  WORD报表的保存为PDF文件出现错误提示！  (http://foxtable.net/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
--  
谢谢
安装插件后问题搞定。