io non so + cosa pensare e mi kiedo perke mi succede una cosa:
allora questo è il codice:
Private Sub objInet_StateChanged(ByVal State As Integer)
Dim strbuffer As String
Dim strdati As String
On Error GoTo errore
Do
strbuffer = objInet.GetChunk(512)
strdati = strdati & strbuffer
txtPaginaWeb.Text = strdati
Loop Until Len(strbuffer) = 0
Exit Sub
errore:
txtPaginaWeb.Text = "Si è verificato un errore codice: " & Err.Number & " " & Err.Description
End Sub
il problema è ke ogni tanto (ed è proprio questo il motivo) il programma arriva ad exit sub e poi NON si sa il perkè rientra nel ciclo annullando tutte le variabili..
perkè!?!
il codice funziona bene...ma ogni tanto fa questa cosa...
HELP ME PLEASE!!!:master:
Rispondi quotando
