专家坐堂-[求助]将EXCEL报表保存为PDF时,提示错误Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]将EXCEL报表保存为PDF时,提示错误  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=93476)

--  作者：农村人
--  发布时间：2016/11/29 17:20:00
--  [求助]将EXCEL报表保存为PDF时,提示错误

代码如下:

Dim Book As New XLS.Book(ProjectPath & "Attachments\\班组统计.xls")
Dim fl As String = ProjectPath & "Reports\\班组统计.xls"
Book.Build() \'生成细节区
\'Book.Save(fl) \'保存工作簿
Book.SaveToPDF(fl) \'保存为PDF文件
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()

提示:尝试读取或写入受保护的内存。这通常指示其他内存已损坏。

--  作者：有点蓝
--  发布时间：2016/11/29 17:46:00
--

Dim Book As New XLS.Book(ProjectPath & "Attachments\\班组统计.xls")
Dim fl As String = ProjectPath & "Reports\\班组统计.pdf"
Book.Build() \'生成细节区
\'Book.Save(fl) \'保存工作簿
Book.SaveToPDF(fl) \'保存为PDF文件
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()

如果仍然有问题看看：http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&replyID=614442&ID=88943&skin=1

--  作者：农村人
--  发布时间：2016/11/29 18:31:00
--
在这代码的基础上,如何直接为文件命名?

--  作者：有点蓝
--  发布时间：2016/11/29 20:37:00
--
Dim fl As String = ProjectPath & "Reports\\XXXXXXXX名称.pdf"