Italian UpLad file xml con FTP

[corrado]

Ciao a tuti
Ho realizzato un programma che carica un file xml
in un sito, con la funzione FTP.
Il mio problema è che non riesco a sapere quando termina
la fase di aggiornamento del sito per chiudere il programma
solo alla fine del caricamento.
Ho provato a mettere un ritardo, ma non serve, poichè
potrebbe essere poco o molto.

Di seguito la routine di aggiornamento

Sub aggiorna_Click
Table3.SaveXML("attivaXmlCel.xml")
fileFtp = "attivaXml.xml"
ftp.PutFile(AppPath & "\attivaXmlCel.xml",fileFtp)
msg.Text = "ATTESA AGGIONAMENTO INTERNET"
' tempo di ritardo per il cellulare 50 secondi circa
For n = 0 To 40
msg.Text = " ATTESA AGGIONAMENTO INTERNET"
For m = 0 To 4000
Next m
msg.Text = ""
For z = 0 To 4000
Next z
Next n
form3.close
End Sub

Ciao

Corrado

email: corrado.carbonaro2@virgilio.it
cell. 3933535215

 

[Deleted member 103]

Ciao corrado,

io non sò come si fa a sapere quando termina la fase di aggiornamento con la funzione FTP, però mi domando perchè non usi un Timer invece della funzione For-Next?


Ciao,
Filippo

 

[corrado]

Ciao corrado,

io non sò come si fa a sapere quando termina la fase di aggiornamento con la funzione FTP, però mi domando perchè non usi un Timer invece della funzione For-Next?


Ciao,
Filippo

Ciao Filippo,

In riferimento al tuo consiglio, credo che non cambi molto,
in quando, anche con il timer, non sai mai quando devi chiudere il programma.
Ci sarà qualche funzione che ti dica quando il trasferimento è terminato.

Ciao
Corrado

 

[giannimaione]

ciao ragazzi,

verificate questo http://www.b4x.com/forum/attachment...level-ftp-upload-progress-ftp_progress_v1.zip

un saluto,