Is there a way i can have text, and when the website is loading the text says 'Loading Site..' , and after the site is finishes loading it would say 'Finished' . That sounds simple, so can someone plz help me?
Printable View
Is there a way i can have text, and when the website is loading the text says 'Loading Site..' , and after the site is finishes loading it would say 'Finished' . That sounds simple, so can someone plz help me?
Check the vbscript forum..
are you talking about like a webcontrol then here
hope this is what you wantCode:Private Sub timTimer_Timer()
If brwWebBrowser.Busy = False Then
timTimer.Enabled = False
Me.Caption = brwWebBrowser.LocationName
Else
Me.Caption = "Working..."
End If
End Sub
Private Sub cboAddress_Click()
If mbDontNavigateNow Then Exit Sub
timTimer.Enabled = True
brwWebBrowser.Navigate cboAddress.Text
End Sub
Code:Private Sub WebBrowser1_DownloadBegin()
Label2.Caption = "Loading Site.."
End Sub
Private Sub WebBrowser1_DownloadComplete()
Label2.Caption = "Finished"
End Sub
Private Sub WebBrowser1_NavigateComplete2(ByVal pDisp As Object, URL As Variant)
Label2.Caption = "Finished"
End Sub