- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 浏览器控件内点击会跳到外部浏览器上问题 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=73886)
-- 发布时间：2015/8/28 14:10:00
-- 浏览器控件内点击会跳到外部浏览器上问题
就是用内部浏览器打开一个网站~ 点击网页内的内容的时候~ 会弹出另一个网页~ 这时候直接跳转到外部浏览器啦！ 这个问题咋解决啊？？？ 为什么不能都在内部浏览器内显示的呢
这样内部浏览器好像感觉就是只能打开一个网页的感觉啦！·~~ 完全不能用啊~~~~
-- 发布时间：2015/8/28 14:29:00
--
| 下载信息 [文件大小：320.0 KB 下载次数：48] | |
 点击浏览该文件:web.foxdb |
[此贴子已经被作者于2015/8/28 14:29:08编辑过]
-- 发布时间：2015/8/28 14:31:00
--
mark 新窗口
全局代码
Public Sub web_DocumentCompleted(sender As object, e As windows.forms.WebBrowserDocumentCompletedEventArgs)
For Each archor As object In sender.Document.Links
archor.SetAttribute("target", "_self")
Next
End Sub
Public Sub web_NewWindow(sender As object, e As system.ComponentModel.CancelEventArgs)
e.cancel = True
End Sub
afterLoad事件
Dim web As windows.Forms.webbrowser = e.Form.Controls("WebBrowser1").basecontrol
web.ScriptErrorsSuppressed = True
addhandler web.DocumentCompleted, addressof web_DocumentCompleted
addhandler web.NewWindow, addressof web_NewWindow
-- 发布时间：2015/8/28 15:52:00
--
感谢！
-- 发布时间：2019/2/27 23:46:00
-- 找啥资料看
这种代码貌似不认识我，找啥资料学习？？
-- 发布时间：2019/2/28 9:20:00
--
以下是引用WWK740318在2019/2/27 23:46:00的发言：
这种代码貌似不认识我，找啥资料学习？？
这种代码貌似不认识我，找啥资料学习？？
照抄代码，不就行了？全局代码
http://www.foxtable.com/webhelp/scr/1938.htm
-- 发布时间：2019/2/28 9:26:00
--
如果需要别的，参考
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=100997&skin=0