Vb6 如果页面上有文本,如何让程序提醒用户?

Vb6 如果页面上有文本,如何让程序提醒用户?,vb6,Vb6,在VB6中,如果网页上出现“ERROR:”一词,我希望弹出一个消息框。如果有人能将我链接到一个网站或帮助我们,那就太好了。请在下面提供示例代码: URL = "www.yoursite.com" Set http = CreateObject("Microsoft.XmlHttp") http.open "GET", URL, FALSE http.send "" IF InStr(http.responseText, "ERROR:") > 0 THEN MsgBox "Some

在VB6中,如果网页上出现“ERROR:”一词,我希望弹出一个消息框。如果有人能将我链接到一个网站或帮助我们,那就太好了。

请在下面提供示例代码:

URL = "www.yoursite.com"
Set http = CreateObject("Microsoft.XmlHttp")
http.open "GET", URL, FALSE
http.send ""
IF InStr(http.responseText, "ERROR:") > 0 THEN
    MsgBox "Some error occurred"
END IF

vb6和网页??你能详细说明你的问题吗。您有一个加载网页的vb6软件,您想扫描源??