Foxtable(狐表)用户栏目专家坐堂 → [求助]生成的Word报表无法预览


  共有2086人关注过本帖树形打印复制链接

主题:[求助]生成的Word报表无法预览

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


加好友 发短信
等级:五尾狐 帖子:1140 积分:11255 威望:0 精华:0 注册:2017/9/26 16:30:00
[求助]生成的Word报表无法预览  发帖心情 Post By:2020/10/23 16:25:00 [只看该作者]

老师好!
个别电脑生成Word报表时,无法显示预览。任务管理器中的进程显示“Word正在...”;该电脑使用的是office2010,卸载重装了一次,还是不行,但是以前预览没有问题。
主要代码如下,请老师看看是哪里的问题。谢谢!

Dim tm As String  = ProjectPath & "Attachments\通知书.doc" '指定模板文件
With Tables("文书_table1")
    If .TopPosition > -1 Then '如果选定区域包括数据行
        Dim fileName As String = ProjectPath & "Reports\通知书\预览.doc" '指定目标文件
        Dim wrt As New WordReport(Tables("文书_table1"),tm,fileName) '定义一个WordReport
        For Each r As Row In .GetCheckedRows    '复选框选中
            wrt.BuildOne(r)
            wrt.RecordsOnEachPage  =1
        Next
        wrt.Show() '显示报表
        ShowAppWindow("预览.doc",2)   '最大化显示此窗口
    End If
End With


 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107720 积分:547933 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/10/23 16:33:00 [只看该作者]

换个不同版本的office程序安装,安装完整版,32位的office。如果有安装wps,卸载掉

 回到顶部