老师好!个别电脑生成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