- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 如何不显示如下窗口？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=63357)
-- 发布时间：2015/1/19 14:47:00
-- 如何不显示如下窗口？
如何不显示这个窗口，但能应用
此主题相关图片如下：qq截图20150119144703.png
[此贴子已经被作者于2015-1-19 14:48:16编辑过]
-- 发布时间：2015/1/19 14:48:00
--
呃，什么意思
-- 发布时间：2015/1/19 14:48:00
--
无图无真相。。
-- 发布时间：2015/1/19 14:50:00
--
已发图，我是用窗口打开文档，但总是多出来一个上面的图，不美观
[此贴子已经被作者于2015-1-19 14:51:12编辑过]
-- 发布时间：2015/1/19 14:52:00
--
显示那个，说明指定的文件不存在。
一开始的时候，你可以设置其地址为空或者nothing
-- 发布时间：2015/1/19 15:19:00
--
请问在哪里设置啊？
是在这里改吗？如何改
Dim wbr As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
Dim tm As String = ProjectPath & "Attachments\\施工劳务承包合同范本.doc"
Dim fl As String = ProjectPath & "Reports\\"& Tables("合同管理").Current("工程名称") & "施工劳务承包合同" & ".doc"
Dim wrt As New WordReport(Tables("合同管理"),tm,fl)
wrt.Build()
wrt.Quit()
wbr.AddRess = fl
-- 发布时间：2015/1/19 15:21:00
--
执行代码后出错，还是打开窗口的时候有问题？
afterLoad事件
Dim wbr As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
wbr.AddRess = Nothing
-- 发布时间：2015/1/19 15:23:00
--
这个代码按道理不会无文件
你可以改一下
If FileSys.FileExists(fl) Then
wbr.AddRess = fl
wbr.AddRess = fl
else
wbr.AddRess = nothing
end if
end if