Oppure

Loading
15/04/10 11:26
davifumi89
Ragazzi ho un programma che dato un IP raggiunge la sua pagina di configurazione, ne estrapola il codice HTML, lo inserisce dentro una stringa e poi cerco le informazioni che mi interessano dentro la stringa con il codice.

Alcuni IP però...presenti nel database a volte non sono raggiungibili..e il programma sta per troppo tempo piantanto su XMLHTTP.SEND

ecco il codice:

--------------------------

Dim OggettoHttp As Object

Set OggettoHttp = CreateObject("microsoft.xmlhttp";)

Url = "......";

OggettoHttp.Open "GET", Url, False

OggettoHttp.send

-----------------------------



Vorrei fare un controllo che se il tempo di attesa fosse troppo lungo restituisca un messaggio di errore.

Non posso usare il Timer....


Grazie
aaa
15/04/10 20:30
GrG
forse (se esiste) ti potrebbe essere utile la funzione .busy che restituisce true se il prog sta ancora mandando i dati o false se è libero... perchè non puoi usare un timer?
aaa
16/04/10 6:36
davifumi89
probabilmente non esiste...ho provato e non è una proprietà dell'oggetto.

Il timer non posso usarlo perchè in VBA è da installare se non sbaglio...e siccome lavoro in una macchina che non ha i diritti Administrator non ho i diritti per farlo.
aaa
16/04/10 14:52
GrG
ah, non avevo letto che usavi VBA, mi spiace ma non saprei come aiutarti..
aaa