主题：[求助]打印问题

发布后无法打印报表

请大侠帮忙解决一下下

什么报表？excel这样打印

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\test.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)

Wb.Saved = True
App.DisplayAlerts = False '加上此行可禁止弹出合并前的提示
app.Visible = True
Ws.PrintPreview '预览
'ws.printout '打印
app.quit

打钱WORD文件，打印控件代码如下：

Dim tm As String  = ProjectPath & "Attachments\违法行为抄告书.doc" '指定模板文件
Dim fl As String = ProjectPath & "Reports\违法行为抄告书.doc" '指定目标文件
Dim wrt As New WordReport(Tables("zhubiao"),tm,fl) '定义一个WordReport
wrt.Build() '生成报表

wrt.Show() '显示报表

我在本机上是可以打印的，但把发布的系统复制到别的电脑就不能打印了

 不能打印，报什么错？

 如果人家安装的不是完整版的word，生成的时候，是会假死的。

安装完整版的MS Office才可以。