以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  WebBrowser 引用时的一个问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=50744)

--  作者:ndxfke
--  发布时间:2014/5/12 16:56:00
--  WebBrowser 引用时的一个问题
WebBrowser来打开一个 http 地址,如果这个地址有弹出式广告。能屏蔽吗
--  作者:Bin
--  发布时间:2014/5/12 17:02:00
--  
可以是可以,不能简单做到.
--  作者:有点甜
--  发布时间:2014/5/12 17:04:00
--  
 是指弹出新窗口这种情况吗?做个例子发上来吧。要绑定个事件。
--  作者:有点甜
--  发布时间:2014/5/12 17:13:00
--  

全局代码区

Public Sub web_OpenNew(sender As object, e As system.ComponentModel.CancelEventArgs)
    e.cancel = True
End Sub

 

绑定事件

Dim web as object = e.form.controls("Webbrowser1").BaseControl

addhandler web.NewWindow, addressof web_opennew


--  作者:ndxfke
--  发布时间:2014/5/12 17:29:00
--  
 
以下是引用有点甜在2014-5-12 17:04:00的发言:
 是指弹出新窗口这种情况吗?做个例子发上来吧。要绑定个事件。

 

想用这个控件,用户来收发外部邮件。

暂时碰到三个问题,具体内容写在例子的窗体上了。烦请帮忙下..

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:web.foxdb


--  作者:ndxfke
--  发布时间:2014/5/12 17:31:00
--  

哈,刚在埋头弄例子。才看到4#内容。

 

不过,在原来基础上新增了两个问题,图片点击可在新窗口打开查看


--  作者:Bin
--  发布时间:2014/5/12 17:52:00
--  
不提示错误只需要设置.ScriptErrorsSuppressed=true 即可

不弹出参考4楼

最后一个功能在加载完成时间,替换一遍页面的代码.把A标签的弹出属性改掉或者去掉即可.

思路如上,暂时没时间写. 

--  作者:有点甜
--  发布时间:2014/5/12 17:53:00
--  

 如下

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:web.foxdb


--  作者:有点甜
--  发布时间:2014/5/12 17:54:00
--  

 简单改一下,一些广告的弹出窗口,还需要额外处理才行。

 

 基本够用了。


--  作者:ndxfke
--  发布时间:2014/5/12 18:01:00
--  

看来还得懂点web语言才行呐..

 

多谢,我先用到起。