此主题相关图片如下:qq图片20160117.png
老师,用下面这段代码打印出现上面的错误提示,打印还是完成了。请指点,谢谢!
Dim tm As String = ProjectPath & "Attachments\出库单.doc" '指定模板文件
Dim fl As String = ProjectPath & "Reports\出库单.doc" '指定目标文件
Dim wrt As New WordReport(Tables("药品出库单"),tm,fl) '定义一个WordReport
wrt.Build() '逐行生成报表
Dim Proc As New Process
Proc.File = fl
Proc.Verb = "Print" '指定动作
Proc.Start()
wrt.quit()
[此贴子已经被作者于2016/1/17 19:36:08编辑过]