以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  WORD报表保存  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=79982)

--  作者:一笑
--  发布时间:2016/1/13 14:07:00
--  WORD报表保存
想用代码生成一个WORD报表,但不需要打开直接退出,发现报表没完成,如何在不显示情况下生成和保存报表,谢谢

Dim tm As String  = ProjectPath & "Attachments\\值班日志.doc" \'指定模板文件
        Dim fl As String = ProjectPath & "Reports\\值班日志.doc" \'指定目标文件
        Dim wrt As New WordReport(Tables("值班日志"),tm,fl) \'定义一个WordReport
        wrt.quit()



--  作者:Hyphen
--  发布时间:2016/1/13 14:53:00
--  
wrt.Build()