说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

如何设置webbrowser控件,使它打开的网页不跳出那些广告框?如何屏蔽当提交网页后,网页弹出的反馈框?

编辑:说三道四文库 发布时间:2017-10-18 02:46
HTML文档下载 WORD文档下载 PDF文档下载
1、如何设置webbrowser控件,使它打开的网页不跳出那些广告框?
比如:
Private Sub Command1_Click()
WebBrowser1.Navigate2 "www.163.com"
End Sub

会跳出很多广告框。如何屏蔽掉?
2、如何屏蔽当提交网页后,网页弹出的反馈框?
比如:当填写
      http://mark.yalaso.net/mark_post1.asp
后,按“提交资料”,则会返回类似“你的信息已经发表成功,稍后会发表在跳蚤市场”的信息,如何在VB里用webbrowser控件屏蔽掉该网页的反馈信息框?

谢谢先!
我也想要,有的话给我,谢谢
518@15518.com
在 OnNewWindow事件
 Cancel = true
newwindow2事件中
Cancel = true
主要采用如下
Public Flag as Boolean 
Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
    Cancel=Flag
End Sub
当flag=True时屏蔽弹出窗口
  Flag=False时不起作用
关键要控制好Flag的值,以防止所有的弹出窗口都被屏蔽
http://www.skycn.com/soft/11498.html
这是我做的,你可以参考一下.
我这还有一个关于WebBrowser控件的程序,可以对你有帮助,对程序改动一下,可实现你还要的功能。email:luckyhorsew@163.com
谢谢楼上几位大侠!
    但我加了下面的代码
Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
    Cancel=Flag
End Sub
加到我的代码里后,好像也屏蔽不了问题2的那个跳出来的提示框.(“你的信息已经发表成功,稍后会发表在跳蚤市场”)

怎么办?
Flag换成True
啊,sorry,我其实是
Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
    Cancel=true
End Sub
的,只是copy时copy错了地方。但就是这个代码也是不行.

请教!

是啊,这个功能我也要
大哥,我可完成这个任务了,这都困了我好几年了
webbrowser1.Silent = True
太简单了,交个朋友吧
QQ:23232300
Email:518@15518.com
这可是我从delphi里面看到的,本人对网络非常喜欢,建议做网络编程以后大家不要用vb了,没用的,就学delphi吧,强烈推荐呀
学VC吧,我也强烈推荐。
应该是findwindow然后sendkeys("(enter)")就可以了
我发现下面的代码:
Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
    Cancel=true
End Sub
可以解决我的第一个问题:
1、如何设置webbrowser控件,使它打开的网页不跳出那些广告框?
比如:
Private Sub Command1_Click()
WebBrowser1.Navigate2 "www.163.com"
End Sub

会跳出很多广告框。如何屏蔽掉?

但webbrowser1.Silent = True还是不行。不知xiaoyao961(逍遥浪子) 大侠是怎么达到的。我是说在VB里,而不是dephi里。

另:我的第二个问题:
2、如何屏蔽当提交网页后,网页弹出的反馈框?
比如:当填写
      http://mark.yalaso.net/mark_post1.asp
后,按“提交资料”,则会返回类似“你的信息已经发表成功,稍后会发表在跳蚤市场”的信息,如何在VB里用webbrowser控件屏蔽掉该网页的反馈信息框?
就算用了
Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
    Cancel=true
End Sub
也是不行。

不知哪位大侠可以到该网站试一试,帮找到办法。
谢谢先!
呵呵。。你的VB这么牛。。
帮你up
up
dim lwnd as long
lwnd = FindWindow(vbNullString, "Microsoft Internet Explorer")
If lwnd > 0 Then
        Call SendMessage(lwnd, WM_CLOSE, 0, ByVal 0&)
End If
高通业务拓展总监沈周全:以软件为基础建立差异化优势 设计你所需要的,而不是你想要的 疯狂谷歌建广告天网:电冰箱、汽车仪表盘、恒温器、眼镜和手表 开发者眼中的编程语言…… 寻下一突破口?黑莓推Project Ion项目,正式进军物联网 无人驾驶汽车真的要来了:飞思卡尔研制视觉芯片 支持物联网开发! Qt发布5.3版与嵌入式企业版 5月23日:Java已经19岁啦! Google发布Dart1.4版本,新增Observatory工具 《近匠》Mixtile:跑在盒子中的嵌入式平台 从研发、平台化到营销:移动时代,汽车厂商如何升级? CTO俱乐部“云计算创新与实践”沙龙:云计算的发展趋势与那些“坑” 一周消息树:大型网站系统与Java中间件 良心推荐:6款基于云的移动应用开发工具 Google Project Tango第二弹:可生成3D图像的平板电脑 API企业化战略部署三部曲(一) 高通产品市场经理刘晓光:详解骁龙Android SDK 苹果史上最大交易:斥资30亿美元收购Beats 微软是否应该提高Windows版本的推送频率? 咸鱼大翻身?索尼将发展可穿戴游戏设备 popping:基于Facebook Pop引擎的iOS动画库 《近匠》专访极路由CTO康神 真正智能中心应当这样做 为什么说Android才是游戏开发者的乐土? 开发移动医疗应用必知的10个掘金点 个推CTO叶新江:云推送技术如何助力产品开发 《近匠》Face++:漫谈人脸识别 无线充电技术赛高:随意走动也能电量满格 体验至上!移动Web应用JavaScript UI库App.js 专访中国国航:传统行业的“轻应用观” 开发者找众筹,哪些网站更靠谱? 48小时脑力激荡 中美青年创客大赛英特尔北京选拔赛 如何將字符串以十六進制的形式顯示在Edit中 关于SOCK5代理服务器的第二次协商问题? 为什么oracle的sql语句的表名必须加“”??? 谁能解决工具条中的一问题?50分相送 ##### 100分求教:如何实现框架集下页面的定向输出?##### 菜单菜单!!! 如何用Schema验证XML文档 JSP中jsp文件和bean的class文件的相对位置是怎么样啊? excel中的两个问题:1、如何关闭userForm1窗口?2、如何在打开userForm1窗口时使主窗口最小化? Dll函数问题 咋判断用户点的四点能围成一个四边形? 网站中的某一页嵌入VB的AtiveX 控件,客户端能访问网站,但不能打开AtiveX控件。。。高分 请问怎么把 string 型转换成 System.Data.SqlDbType 型? 机器无法启动 主板有问题吗 高分请教 创建不了C#Web项目,急!!!(刚学C#) [求助] 用fopen函数读不出URL文件? 怎么判断listview是否有一个item被选中? 请说一下硬盘容量和内存容量的关系! ▄▅▆▇█ 水园的大背景离不开吵架 █▇▆▅▄ 请教mm有个问题! linux下的编程问题 以Oracle为例说明如何通过ODBC将数据库中的指定表导出到MDB数据库。(原创) 关于一种特殊按钮 SQL语句小问题!!在线等待! 想学ColdFusion 请看我的转载的贴子 Troj_Hacline.A是什么病毒? 关于XML的问题,150分赠送,急 dll问题。很简单。 感慨!!!(潜水一年,吐个泡,顺便发表一点意见) 帮个忙 怎么在Installshield中创建对话框,并操作ACCESS数据库? 连续给分:邮件服务器防病毒问题! 我想编译一个像API一样的dll 启动rose就出错,高手来看,100分 关于打印的一个问题 急!!!请提供一段设置Session的全部代码,谢谢!! 请问,从第二帧开始播放的代码的什么??? 老师要求编写五子棋的程序可是我实在想不出该怎么设定估价函数啊帮帮忙啊? 感觉压力比较大,活不下去,想跳楼自杀的进来侃侃 一个关于php提交表单的问题。 各位大侠,要命问题! 怎么在Installshield中创建对话框,并操作ACCESS数据库? win2000server的管理员密码让人改了,怎么办呀! 太气愤了,帮帮我? 用BDE连接MS SQL SERVER,为什么运行后出现未知用户名或密码的错误? datagrid中能不能进行统计 如何编写“outlook”风格的界面 如何实现flash截图?我研究了好久也不明白,希高手指点!(在线等待) 程序调用的DLL 在delphi中,用ADO如何实现将SQL中多表导出到一个Access中? 膀胱欠充盈是什么意思 热力学上的二级相变是什么? 1.管理原理的主要特征为____、____、____、____.2.管理和战略,____告诉我们怎样"做正确的事",____在 We have an English class___9:30___Friday.急……谢谢哈. 陨石 爆炸会引发黑洞不? 一、填空题 1.管理原理的主要特征为____、____、____、____. 2.管理和战略,____告诉我们怎样"做正确的 when do you have English?答句可以是We have English at 10:00 on Friday. 宇宙里,被卷入黑洞后,会去哪里?我觉得不应该消失的无影无踪,因为你可以自己想想,一个物体不会忽然没有这个物质了吧?我觉得被卷入黑洞后,是不是带物体去了另外一个空间?(不是宇宙里 管理原理是具有普遍指导意义的基本规律,它的主要特征有? 可以用吸管做什么科学小实验?想在物理课上做一些小实验- 3Q 我国武装力量是由哪几部分组成的?分别说明,具体点, 自动控制原理的主要特征是什么 怎样用吸管搭出能承受一定重量的桥?材料为25根吸管,20根牙签,以及103型粘性标签纸,不能使用其他材料.求详细的设计说明,最好有图. 果园今年收苹果450千克,收的梨比苹果的4倍少168千克,果园今年收梨多少千克? 岛津义弘怎么死的 6跟吸管搭桥6根吸管搭桥吸管直径5mm,长19cm还有线绳1.6m怎么搭出最结实的桥?蓝色的是原封不动的吸管绿色的是剪过之后的吸管黑色的是固定三根长吸管的线红色的点是用线固定的点这是我设 人非生而知之者 孰能无惑的而 鬼石曼子是谁? 沉重的反义词是 2012光子带 什么样子的人会死去 岛津公司与战国时的岛津义弘等有何关系?家徽都一样. 沉重的反义词时是什么 2012进入光子带时会怎样,要全一点的,进入之后呢?什么人会死 丑鬼只是一种外号而已吗?很多人都说我不丑``但是又有很多人老是叫我丑鬼!难道只是外号而已吗?还是为了不想伤我自尊而说的? 沉重的反义词是什么? 急! 2012会进入光子带吗?我们会死吗?我才14岁啊 不要复制 看多了我艹 真死假死 不能开玩笑的! 《春望》中表达诗人对国土沦陷触目伤情的诗句是? 沉重-( )[反义词] 想自己在家里用电灯泡孵化小鸡,我找到个资料,不到能不能孵,有经验的人提提意见.准备个箱子要孵多一些箱子就大些,在底下垫棉花,把鸡蛋放在上面,拿一个60瓦的灯泡,放在比鸡蛋高一寸的地 国土半壁沦陷,民族存亡危难怎么翻译成英文呢? 如果南极的企鹅养在我们居住的地方,要注意什么问题?要 注意的是温度. 人非生而知之者,孰能无惑告诉我们一个什么道理 1、我的名字叫勾践,士兵被杀,国土沦陷,堂堂国王当马夫,每天卧薪尝胆.我的名字叫张海迪,每天只能坐轮椅,高位截唐虽然苦,自强不息超过你.我的名字叫桑兰,本是优秀运动员,一朝不慎身瘫痪, MT是什么意思 用19这个数字和创造结合起来设计一个标志, 英语翻译最好能体现出"本就"这两个字(我用google翻译本就为this to,用这个怎么造句) Western杂交就是western blot 莫, 如图,直线CD,EF相交于点O,OA⊥OB,OF平分∠AOD,∠BOE=2∠BOC,求∠BOC的度数如题 沦陷区比实际控制国土还大的国家有哪些?东亚的这几个不用说. Western杂交中,为何要引入二抗?为何不在一抗上直接加上放射性同位素或者GFP? 含反义词的成语写出五个 战国名将岛津义弘名气为什么比将他打的落花流水的陈璘大有此看来 前田和真田和伊达和柴田等都是垃圾 western杂交可否用于检测酵母菌基因组特征 谁能打出下面这个符号 急用 已有林权证,是否还需办理土地使用证?某部队与村委会购买林地,已办理林权证,期限至2078年.现某部队又申请办理土地使用证,是否能给予办理? 要是住在南极的企鹅生活在热带会怎么样 人非生而知之者 孰能无惑的意思 历史上的武则天到底是什么样的人? 南极的企鹅可以在北极生活吗? 怎样防止小鸟吃田地里的庄家 武则天有喜欢的女人吗?很多皇帝不仅有女宠也有男宠,武则天有女宠或者是比较喜欢的女人吗?拜托三楼的,你们不要乱讲可以么,贾静雯是饰演武则天的演员的名字啦.你们可以给点具体的确切 如何去掉质谱中的杂峰? 用LCMS测试样品时质谱中总是存在143的峰,更换流动相后仍有此问题,请问如何解决 诱使1998年嫩江和松花江大洪涝灾害的根本原因是什么 武则天是个怎么样的人? 为什么热力学基本关系式不适用与相变? 人非生而知之者,孰能无惑.快 武则天是哪个皇帝的女人啊? 请问为什么说热力学公式一般只适用于恒组成的均相封闭体系?比如等压反应热等于焓的改变值的公式适用条件是封闭体系等压的物理化学变化过程就可以了,那和上面的说法又不一样了…… 测泥浆性能个种仪器的使用方法 求赞美家乡的作文!家乡比较有名的是蔬菜,是著名蔬菜之乡家乡变化比较大 着重写家乡的道路,城市建设,晚间景色(喷泉,霓虹灯等),家乡的弥河水 “叙利亚之友”反对巴沙尔在叙未来政府俄南部爆炸案致6人亡 女凶手原计划袭法国调查显示大量法国工程师赴中国等国中国土豪钟爱韩国皮草 炒高韩国皮草价数据显示日韩航路日本乘客骤减 创历史新华国际时评:中美航天应少猜忌、多合浙江义乌一处道路中间竖竹梯顶替电线杆美国否认与沙特阿拉伯关系紧张 坚称关2047年:全球高温临界点?沙特突然变脸 拒绝接受安理会席位阿拉伯国家呼吁沙特重新考虑拒绝安理会沙特拒非常任理事国席位 美媒:欲挑战潘基文说尚未收到沙特拒绝担任安理会非沙特拒安理会席位 美国作说客寻与沙特澳报:沙特拒安理会席位系赌气?沙特拒入安理会不只是赌气沙特拒绝安理会席位 日媒谋取而代之反联合国合唱”在中东响起 地区大动荡俄罗斯富豪赠女友奢华电子香烟 镶24南非一警察开枪打死津巴布韦外交官黑白简约揭幕多伦多2014春季时装周托起山里娃的梦想“变阵大师”应有奇招股指小幅上涨,个股大幅活跃习近平在首尔大学发表重要演讲农村文化礼堂花开阿克苏证券投资实盘擂台赛点评震荡不改强势 个股炒作仍是焦点切实扩大有效投资促进经济稳定增长今年亮点关注聂家兄妹遭遇来杭讲创意听主席演讲 品中韩史话习近平再晤朴槿惠山里孩子想要给绿城当一次球童298路明天起调整为全天运营习近平会晤韩国会议长切实管好家门口这片海你的眼神新一轮退市制度改革启动临海 山村用上放心电运河画院展示精品
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘