Grazie MItaly infatti ero partito con quell'idea, ma gia che ci sto
utilizzo WebBrowser che mi offre anche la possibilità di vedere in tempo reale
le modifiche, non solo di notificarle all'utente.
Ho provato con i tuoi suggerimenti ziobill però cè qualcosina che non va...
dovrebbe trattarsi dello StatusText, infatti nonostante cambi il contenuto
della pagina mi restituisce StatusText uguali. Questo il codice
Inizializzo i tutto sull' onclick della voce Connetti in questo modocodice:Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick WebBrowser2.Refresh() Dim a As String = WebBrowser1.StatusText Dim b As String = WebBrowser2.StatusText If a = b Then Else MsgBox("E' diverso") WebBrowser1.Navigate("www.myserverpage.it") End If End Sub
codice:Private Sub Connetti_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Connetti.Click MsgBox("Tentativo di Connessione...") Try WebBrowser1.Dock = DockStyle.Fill WebBrowser1.Navigate("www.myserverpage.it") WebBrowser2.Dock = DockStyle.Fill WebBrowser2.Navigate("www.myserverpage.it") Catch ex As Exception MessageBox.Show("Access Failed" & vbCrLf & ex.Message) End Try End Sub

Rispondi quotando