Foxtable(狐表)用户栏目专家坐堂 → [求助]WIN10下PrintDoc.SavePDF无法用?


  共有2881人关注过本帖平板打印复制链接

主题:[求助]WIN10下PrintDoc.SavePDF无法用?

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


加好友 发短信
等级:八尾狐 帖子:1909 积分:16993 威望:0 精华:0 注册:2014/7/29 19:09:00
  发帖心情 Post By:2017/9/27 21:19:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:print.jpg
图片点击可在新窗口打开查看


 '---选择打印方式
    If prt_method = "Preview" Then
        Doc.Preview() '预览报表
    ElseIf prt_method = "Print" Then
        Doc.Print()
    ElseIf prt_method = "Pdf" Then
        '---输出为pdf
        doc.SavePDF( "D:\print.pdf") '保存为PDF文件
        Dim Proc As New Process '打开PDF文件
        Proc.File = "D:\print.pdf"
        Proc.Start()
    End If

我的win10是存在C盘会出现上面的错误,如果改成D盘下面就没有问题


 回到顶部
总数 15 1 2 下一页