窗口的AfterLoad事件代码设置为:
Dim wbr As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")Dim tm As String = ProjectPath & "Attachments\出库单.doc" '指定模板文件Dim fl1 As String = ProjectPath & "Reports\出库单.doc" '指定目标文件Dim fl2 As String = ProjectPath & "Reports\出库单.pdf" '指定目标PDF文件Dim wrt As New WordReport(Tables("出库"),tm,fl1) '定义一个WordReportwrt.Build() '逐行生成报表wrt.SaveToPDF(fl2) '保存为PDF文件wrt.Quit() '退出wbr.AddRess = fl2
在应用过程中出现错误提示:尝试读取或写入受保护的内存。这通常指示其他内存已损坏。