以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  WPS环境下输出PDF报错，要怎么处理？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=184830)
--  作者：jiterp
--  发布时间：2023/1/7 16:38:00
--  WPS环境下输出PDF报错，要怎么处理？
下面这段是输出PDF的代码,用OFFICE不报错，但在WPS下报错，这是什么原因？    
    \'判断打印单据路径
        Dim printdir As String
        If FileSys.FileExists(ProjectPath & "RemoteFiles\\aaa.xls") Then
            printdir = ProjectPath & "RemoteFiles\\aaa.xls"
        End If
        Dim Book As New XLS.Book(printdir)  \'指定打印模板文件
        Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog
        dlg.FileName = print
        dlg.Filter = "PDF|*.pdf" \'设置筛选器
        If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
            If dlg.FileName = Nothing Then
                Return
            Else
                Book.Build()  \'展开报表
                Book.SaveToPDF(dlg.FileName) \'保存为PDF文件
                e.Form.Close
            End If
        End If

附：报错截图

图片点击可在新窗口打开查看此主题相关图片如下：微信图片_20230107163541.png
图片点击可在新窗口打开查看
--  作者：有点蓝
--  发布时间：2023/1/7 16:46:00
--  
office 有支持pdf转换的组件。可能wps没有吧，或者wpd处理pdf的类型不兼容office。上面的提示就是缺少处理pdf使用的类型
--  作者：jiterp
--  发布时间：2023/1/7 16:52:00
--  
现在用WPS的更多，狐表可否考虑兼容WPS的组件？
--  作者：有点蓝
--  发布时间：2023/1/7 17:02:00
--  
我反馈一下