|
1- Private Sub WebTarayıcısı60_DocumentComplete(ByVal pDisp As Object, URL As Variant)
2- Set IE = Me.WebTarayıcısı60
3- If Len(IE.Document.body.innerHTML) >= 0 Then
4- Call Harita
5- MsgBox ("Harita yeniden yüklendi...")
6- End If
7- End Sub
örnek uygulama çok kapsamlı olduğu için buraya koyamadım.
form üzerine (Access 2010) bir adet web browser denetimi var bu webbrowser bazen hataya düşüyor ve sayfayı yükleyemiyor böyle durumlard
|