以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]将EXCEL报表保存为PDF时,提示错误  (http://foxtable.net/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"