vb 中WebBrowser1打开网址点击 50
比例在WebBrowser1打开百度后点击贴吧有点像鼠标模拟点击可能只接抓文字点击更好。<DIValign=centerid="xxx">巡查</DIV>没有ID只有巡查...
比例在WebBrowser1打开百度后 点击 贴 吧 有点像鼠标模拟点击
可能只接抓文字点击更好。
<DIV align=center id="xxx">巡查</DIV>
没有ID 只有巡查 文字怎么只接打开巡查链接 展开
可能只接抓文字点击更好。
<DIV align=center id="xxx">巡查</DIV>
没有ID 只有巡查 文字怎么只接打开巡查链接 展开
2个回答
展开全部
Set dc = WebBrowser1.Document
Set tt = dc.All("xxx")
tt.Click
xxx是要点击的网页控件id
如不是要点击的对象id,应像下面:
<DIV align=center id="xxx">巡查</DIV>
还有一种方法 获取网页中的链接集合,然后根据链接指向再进行点击
1.点击超连接
' Webbrowser控件一个
Private Sub Form_Load()
WebBrowser1.Silent = True
WebBrowser1.Navigate "http://hi.baidu.com/992558183"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
For i = 0 To WebBrowser1.Document.All.length - 1
If UCase(WebBrowser1.Document.All(i).tagname) = "A" Then
If WebBrowser1.Document.All(i).href = "http://www.baidu.com/" Then '这是条件,如果链接指向百度就被点击,如链接不固定用查找链接中的域名HOST
WebBrowser1.Document.All(i).Click
End If
End If
Next i
End Sub
Set tt = dc.All("xxx")
tt.Click
xxx是要点击的网页控件id
如不是要点击的对象id,应像下面:
<DIV align=center id="xxx">巡查</DIV>
还有一种方法 获取网页中的链接集合,然后根据链接指向再进行点击
1.点击超连接
' Webbrowser控件一个
Private Sub Form_Load()
WebBrowser1.Silent = True
WebBrowser1.Navigate "http://hi.baidu.com/992558183"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
For i = 0 To WebBrowser1.Document.All.length - 1
If UCase(WebBrowser1.Document.All(i).tagname) = "A" Then
If WebBrowser1.Document.All(i).href = "http://www.baidu.com/" Then '这是条件,如果链接指向百度就被点击,如链接不固定用查找链接中的域名HOST
WebBrowser1.Document.All(i).Click
End If
End If
Next i
End Sub
追问
巡查
没有ID 只有巡查 文字怎么只接打开巡查链接
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
AiPPT
2024-09-19 广告
2024-09-19 广告
随着AI技术的飞速发展,如今市面上涌现了许多实用易操作的AI生成工具1、简介:AiPPT: 这款AI工具智能理解用户输入的主题,提供“AI智能生成”和“导入本地大纲”的选项,生成的PPT内容丰富多样,可自由编辑和添加元素,图表类型包括柱状图...
点击进入详情页
本回答由AiPPT提供
展开全部
关注,N久前就想弄明白的一个问题,有答案了,麻烦楼主贴一下代码啊,谢过了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询