我想打印一报表,而报表模板为WORD格式,但在帮助里却只有打印EXCEL格式模板打印代码,请问我将套用那段代码,应如何修改才不会出错
Dim Book As New XLS.Book(ProjectPath & "Attachments\出库单.xls")
Dim fl As String = ProjectPath & "Reports\出库单.xls"
Book.Build()
Book.Save(fl)
Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open(fl)
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Ws.PrintOut
App.Quit
我的模板文件为:明细单.DOC,我把上段代码机械变为“
Dim Book As New XLS.Book(ProjectPath & "Attachments\明细单.DOC")
Dim fl As String = ProjectPath & "Reports\明细单.DOC"
Book.Build()
Book.Save(fl)
Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open(fl)
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Ws.PrintOut
App.Quit
结果运行出错,请问应如何修改呢?