以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 生成word报表后发送邮件 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=91074) |
-- 作者:有点蓝 -- 发布时间:2016/9/28 18:05:00 -- Dim tm As String = ProjectPath & "Attachments\\JH_Booking.docx" Dim fl As String = ProjectPath & "Reports\\JH_Booking.docx" \'指定目标文件 Dim wrt As New WordReport(Tables("BookingMail"),tm,fl) \'定义一个WordReport wrt.Build() \'逐行生成报表 wrt.quit 重要提示:
用WordReport生成报表之后,必须执行Quit方法退出,或者执行Show方法显示报表,否则内存将常驻一个Word进程, 影响后续报表的生成和设计,直到你中断这个进程,切记切记。 |