Sono gli errori che mi fanno diventare matto...Originariamente inviato da Runtime
Forse non funziona perchè esegui le stesse operazioni...... che sia vera una condizione o l'altra?!?!?!
codice:if webbrowser1.documenttext.contains("Impossibile visualizzare la pagina web") then webbrowser1.visible=False Panel1.visible=true else webbrowser1.visible=False Panel1.visible=true end if
Comunque, la verifica della connessione/url si possono fare a prescindere dal webbrowser:
http://msdn.microsoft.com/it-it/libr...(v=vs.90).aspx
http://forum.html.it/forum/showthread/t-1475977.html
Ho avuto un problema simile e usando i due metodi "dirotto" il webbrowser su una stringa "HTML" o file che spiega l' errore, semplice esempio con stringa:
codice:Private Sub chk_internet() If My.Computer.Network.IsAvailable = True Then WebBrowser1.Navigate("url del sito") Else WebBrowser1.DocumentText = "<head>" & vbCrLf & _ " <title>Errore connessione</title>" & vbCrLf & _ "</head>" & vbCrLf & _ "<body>" & vbCrLf & _ "<font size=""4"">Verifica la connessione internet</font>" & vbCrLf & _ "</body>" & vbCrLf & _ "</html>" End If End Sub

 
			
			 
					
					
					
						 Rispondi quotando
  Rispondi quotando