[VB6] INet FTP e verifiche operazioni in corso

[giano118]

ciao a tutti e come sempre ben trovati!

Questa volta ho un bel consiglio da chiedervi...

ho fatto un applicazione che mi genera un pacchetto di file da inviare in ftp su un altra macchina.
tuttto funziona a meraviglia....ma solo in modalità DEBUG, infatti se lo metto in esecuzione mi tira fuori un errore del tipo ""L'ultima richiesta è ancora in esecuzione"! o cmq la disconnessione avviene prima che il primo file sia arrivato a destinazione.

ho pensato allora ad un controllo che mi lasciasse in attesa finchè il PUT non fosse terminato...
ma come farlo? oppure posso inserire un while - wend?????

su che proprietà dell'oggetto INET devo fare il controllo?

posto il mio codice della sola fase di PUT:

        On Error GoTo ERRORE

            FrmFtp.Inet1.Execute "", "PUT " & " " & PathFilesLocali & Nomefile & " " & Nomefile
          
     ERRORE:
     MsgBox "ERRORE: " & Err.Description, vbCritical + vbOKOnly

sarebbe opportuno inserire dopo il put una riga del tipo:

While Inet.StillExecuting: DoEvents: Wend

o ci sarebbe ancora qualche controllo da poter fare?
giacchè ci siamo...anche nella fase di connessione è necessario inserire qualche controllo??? a dir la verità non mi sembra di avere problemi in connessione...ma ogni suggerimento è ben accetto...

ciao e grazie

[giano118]

ma nessuno sa dirmi nulla in merito???

Originariamente inviato da giano118
ciao a tutti e come sempre ben trovati!

Questa volta ho un bel consiglio da chiedervi...

ho fatto un applicazione che mi genera un pacchetto di file da inviare in ftp su un altra macchina.
tuttto funziona a meraviglia....ma solo in modalità DEBUG, infatti se lo metto in esecuzione mi tira fuori un errore del tipo ""L'ultima richiesta è ancora in esecuzione"! o cmq la disconnessione avviene prima che il primo file sia arrivato a destinazione.

ho pensato allora ad un controllo che mi lasciasse in attesa finchè il PUT non fosse terminato...
ma come farlo? oppure posso inserire un while - wend?????

su che proprietà dell'oggetto INET devo fare il controllo?

posto il mio codice della sola fase di PUT:

        On Error GoTo ERRORE

            FrmFtp.Inet1.Execute "", "PUT " & " " & PathFilesLocali & Nomefile & " " & Nomefile
          
     ERRORE:
     MsgBox "ERRORE: " & Err.Description, vbCritical + vbOKOnly

sarebbe opportuno inserire dopo il put una riga del tipo:

While Inet.StillExecuting: DoEvents: Wend

o ci sarebbe ancora qualche controllo da poter fare?
giacchè ci siamo...anche nella fase di connessione è necessario inserire qualche controllo??? a dir la verità non mi sembra di avere problemi in connessione...ma ogni suggerimento è ben accetto...

ciao e grazie

[oregon]

Le istruzioni che indichi sicuramente ci vogliono.

In piu', ti faccio notare che prima della label ERRORE: ci vuole una Exit Sub (o Exit Function) altrimenti dopo la Execute viene eseguita sempre la MsgBox ...