以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  在窗口中显示word报表运行时项目自动退出了  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=154654)
--  作者：zyxhx
--  发布时间：2020/9/22 9:21:00
--  在窗口中显示word报表运行时项目自动退出了

老师，在窗口中显示word报表运行时项目自动退出了。是什么原因呢？


按以下方法设置的：


新建一个窗口（建议使用模式窗口或独立窗口），在窗口中加入一个WebBrowser控件，窗口的AfterLoad事件代码设置为：

Dim tmp As String  = ProjectPath & "Attachments\\资料卡.doc"
Dim rep As String = ProjectPath & "Reports\\资料卡.doc"
Dim mht As String = ProjectPath & "Reports\\资料卡.mhtml"
Dim wrt As New WordReport(Tables("员工"),tmp,rep)
wrt.Build()
wrt.SaveToMHT(mht)
wrt.Quit
e.Form.Controls("WebBrowser1").Address = mht
--  作者：有点蓝
--  发布时间：2020/9/22 9:41:00
--  
office安装的是什么版本？
--  作者：zyxhx
--  发布时间：2020/9/22 9:47:00
--  
2007
--  作者：有点蓝
--  发布时间：2020/9/22 9:48:00
--  
更新到高版本吧，比如2010/2013/2016
--  作者：zyxhx
--  发布时间：2020/9/22 11:13:00
--  
好的