Foxtable(狐表)用户栏目专家坐堂 → excle报表保存为PDF后,无法打开


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

主题:excle报表保存为PDF后,无法打开

帅哥哟,离线,有人找我吗?
dengzhihao
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:252 积分:2169 威望:0 精华:0 注册:2012/11/4 22:07:00
excle报表保存为PDF后,无法打开  发帖心情 Post By:2014/5/25 23:32:00 [只看该作者]

Dim wbr As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
Dim
 tmp As String = ProjectPath & "Attachments\资料卡.xls"
Dim
 rpt As String = ProjectPath & "Reports\资料卡.pdf"
Dim
 Book As New XLS.Book(tmp)
Book
.Build() 
Book
.SaveToPDF(rpt) '保存为pdf文件
wbr
.AddRess = rpt




这段代码经过多次测试后,在win8。1下,可以保存,但无法自动打开。
测试过很多次,执行代码后,发现后台自动打开excle后,就无法继续调用了,用“任务管理器”关闭excle后,显示:远程过程调用失败。 (异常来自 HRESULT:0x800706BE)
用“任务管理器”关闭excle后,在不关闭“任务管理器”下,再重复执行一边上面的代码后,居然可以了。
奇就奇在,关闭“任务管理器”后,再重复执行又不行了!


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


加好友 发短信
等级:童狐 帖子:252 积分:2169 威望:0 精华:0 注册:2012/11/4 22:07:00
  发帖心情 Post By:2014/5/25 23:33:00 [只看该作者]

在win8.1下是用excle2013的

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/5/26 9:22:00 [只看该作者]

 没有遇到过类似情况,应该是自己电脑的问题,卸载重装office和pdf软件。

 回到顶部