Question

如何用vb检测当前打开的IE网页中是否包含特定文字

比如我用iE打开一个网页，我想用vb检测这个页面中是否包含有特定字符，怎么做呢？最好给个例子，谢谢
我是用IE浏览器，不是用webbrowser控件打开网页

Answer 1

'定义一个全局变量：
Dim b As Boolean

Private Sub Command1_Click()
b = False

WebBrowser1.Navigate ("http://panda.www.net.cn/cgi-bin/Whois.cgi?domain=xiaoa8&cn=yes&referer=")
End Sub

Private Sub Command2_Click()

Dim s As String
Dim i As Long

While b = False
DoEvents
Wend
RichTextBox1.Text = WebBrowser1.Document.All(0).outerHTML
End Sub

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
'页面下载完毕
If WebBrowser1.Busy = False Then
b = True
End If
End Sub

然后用FOR循环或者INSTR函数都可以~

Answer 2

用.NET好做。用一个WebBrowser控件的Navigate(URL)方法浏览你要的页面，再用GetHtmlStream之类的方法得到文本，返回值是一个Unicode流，用readString的方法来读取这个流，以得到String.你多参考MSDN。我最初用web控件的时候也是看MSDN学的。

如果你仅仅是要得到HTML特定标签，或者表单里某控件的值，可以用GetHtmlDocument的方法来得到一个HTML文档对象，这个对象提供类似于JavaScript的访问方法，可以得到inerText/inerHtml，或者Value属性。

编程重在试验。

Answer 3

用webborwser 打开网页,获取源码,用 instr 检测