matty
Scripting Guru
Posts: 8336 Reputation: 109
39 / /
Joined: Dec 2002
Status: Away
|
RE: "Reading" web page in VB6
code: Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Dim HTML
HTML = pDisp.Document.body.innerhtml
Debug.Print HTML
End Sub
Can also do
code: Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Debug.Print pDisp.Document.body.innerhtml
End Sub
This post was edited on 03-18-2008 at 01:11 PM by matty.
|
|