Foxtable(狐表)用户栏目专家坐堂 → WORD报表的保存为PDF文件出现错误提示!


  共有8016人关注过本帖树形打印复制链接

主题:WORD报表的保存为PDF文件出现错误提示!

帅哥,在线噢!
y2287958
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4733 积分:34458 威望:0 精华:0 注册:2008/8/31 22:44:00
WORD报表的保存为PDF文件出现错误提示!  发帖心情 Post By:2014/4/17 6:13:00 [只看该作者]

帮助中的例子:

保存为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
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4733 积分:34458 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By: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()
---------------------------
确定   
---------------------------


 回到顶部
帅哥,在线噢!
狐狸爸爸
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251397 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2014/4/17 8:28:00 [只看该作者]

可能你的office安装不完整,这个是直接利用office的功能老保存的,你试试在word中能否将文件另存为pdf

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By: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
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4733 积分:34458 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2014/4/17 13:30:00 [只看该作者]

谢谢
安装插件后问题搞定。

 回到顶部