WebBrowser1??
Hi there.
I've read a fair number of postings on the web about this, but still can't
seem to get it to work properly.
Basically, I'm trying to open a HTML page (over the network) in a WebBrowser
window. I call a sub from my code, which is as follows:
Sub ShowWebBrowserIE()
Dim intI As Integer
UserForm1.Show
UserForm1.WebBrowser1.Navigate ("file:///K:/users/tf/t1009.htm")
DoEvents
Do Until (UserForm1.WebBrowser1.ReadyState = READYSTATE_LOADED)
DoEvents
Loop
MsgBox "Should be done"
End Sub
The above does not seem to load my page. I have also tried
READYSTATE_COMPLETE, but this seems to cause my session to hang (although
does load the page). The above examples are consistent with the methods
recommended on the web. Can anyone advise as to what might be going on?
Any help would be very much appreciated. Please post your responses to this
channel.
Many thanks in advance,
David
|