以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]由excel报表生成的PDF文件只有迅捷PDF打得开,其他的PDF软件打不开 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=126292) |
-- 作者:18825761682 -- 发布时间:2018/10/18 11:05:00 -- [求助]由excel报表生成的PDF文件只有迅捷PDF打得开,其他的PDF软件打不开 如附件截图,由excel报表模板生成的PDF文件只有迅捷PDF打得开,其他的PDF软件打不开,用其他电脑打开也是这样 请各位大师解答下是哪里有问题
[此贴子已经被作者于2018/10/18 11:07:37编辑过]
|
-- 作者:有点甜 -- 发布时间:2018/10/18 11:21:00 -- 我测试代码没问题,你请单独测试下面代码,然后测试。
Dim Book As New XLS.Book(ProjectPath & "Attachments\\123.xls") |
-- 作者:18825761682 -- 发布时间:2018/10/18 11:31:00 -- 下面是我导出PDF报表的代码,PDF文件能正常导出,但是只能用迅捷PDF打得开导出的文件,其他的PDF软件打不开 Dim Book As New XLS.Book(ProjectPath & "Attachments\\整柜司机资料.xls") Dim r As Row = Tables("SH").current Dim fl As String = ProjectPath & "Reports\\" & ("司机资料-日期") & r("DCSJ") & ("--SO号") & r("DCH") & ("--") & r("CX") & ".PDF" Dim Sheet As XLS.Sheet = Book.Sheets(0) Book.Build() Book.Save(fl) Dim Proc As New Process Proc.File = fl Proc.Start()\'
|
-- 作者:有点甜 -- 发布时间:2018/10/18 11:42:00 -- Book.Save(fl)
改成
book.SaveToPDF(fl)
http://www.foxtable.com/webhelp/scr/2930.htm
|