VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)

VB爱好者乐园(VBGood)

 找回密码
 立即注册
搜索
查看: 7294|回复: 5

[讨论] webbrowser控件弹出脚本错误 这个如何让屏蔽

[复制链接]
 楼主| 发表于 2010-11-30 14:19:46 | 显示全部楼层 |阅读模式
使用webbroser控件 运行时有时会弹出脚本错误 是否在页面上继续运行的弹窗  如何屏蔽掉这个弹窗让程序继续运行呢   

这个代码运行时候就会弹出  
Private Sub Form_Load()
    Web.Navigate "http://hi.baidu.com/"
End Sub

Private Sub Command1_Click()
Dim i As Integer
    Dim vTag As Object
    Dim vDoc As Object
    Set vDoc = Web.Document
        For i = 0 To vDoc.All.tags("input").length - 1
            If UCase(vDoc.All.tags("input")(i).Name) = "USERNAME" Then
                vDoc.All.tags("input")(i).Value = "caonibdxyz"
            End If
            If UCase(vDoc.All.tags("input")(i).Name) = "PASSWORD" Then
                 vDoc.All.tags("input")(i).Value = "bailang"
            End If
             If UCase(vDoc.All.tags("input")(i).Name) = "SUBMIT" Then
                 vDoc.All.tags("input")(i).Click
            End If
        Next
   
End Sub



最好能给出个解决的代码 谢谢
www.007dianying.tk
发表于 2010-11-30 20:48:18 | 显示全部楼层
加一条错误处理语句试试!!
回复 支持 反对

使用道具 举报

发表于 2010-11-30 22:22:21 | 显示全部楼层
本帖最后由 bakurise 于 2010-11-30 22:24 编辑

经鉴定 LZ很懒 有提问的时间你都能百度出来N种解决方法了

最简单的解决方法 在form_load的属性里加上

webbrowser1.silent=true

OK
回复 支持 反对

使用道具 举报

发表于 2010-11-30 23:06:20 | 显示全部楼层
不客气的说,webbrowser1.silent=true是不负责任的,因为会禁止一切提示。

实现IOleCommandTarget接口,在IOleCommandTarget_Exec里面处理
回复 支持 反对

使用道具 举报

 楼主| 发表于 2010-12-3 08:46:39 | 显示全部楼层
回复三楼,加上slient=true 不行才来的,晕
回复 支持 反对

使用道具 举报

 楼主| 发表于 2010-12-5 12:22:21 | 显示全部楼层
看看..................
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

文字版|手机版|小黑屋|VBGood  

GMT+8, 2023-2-6 07:27

VB爱好者乐园(VBGood)
快速回复 返回顶部 返回列表