Visual Basic 6 - Inviare i files con Winsock [ definitivo ]

Ecco quì finalmente il sorgente di un programma per inviare i files con il componente winsock...le sue funzioni sono:

barra che indica a che punto sta il trasferimento;
velocità in Kb/sec;
visualizzazione del nome del file;

ed ora vi spiegherò il metodo che usa il mio programma:

maiuscolo = client ; minuscolo = server

STO PER INVIARE IL FILE PIPPO.JPG
creo e apro il file pippo.jpg, invio avvenuto ricevimento comando ( "ok" )
RICEVO LA CONFERMA E INVIO PRIMA PARTE DEL FILE
ricevo prima parte del file, invio avvenuto ricevimento comando ( "ok" )
RICEVO LA CONFERMA E INVIO SECONDA PARTE DEL FILE
ricevo seconda parte del file, invio avvenuto ricevimento comando ( "ok" )
RICEVO LA CONFERMA E INVIO TERZA PARTE DEL FILE
ricevo terza parte del file, invio avvenuto ricevimento comando ( "ok" )
etc. etc.
RICEVO LA CONFERMA E INVIO ULTIMA PARTE DEL FILE
ricevo ultima parte del file, invio avvenuto ricevimento comando ( "ok" )
RICEVO LA CONFERMA E INVIO COMANDO PER CHIUDERE IL FILE
ricevo comando per chiudere il file

in questo modo si può usare una barra per controllare la quantità di file inviato e la sua velocità di trasferimento.

con vari test ho misurato che in locale la velocità è intorno ai 700 kb/sec mentre in 2, tutti e 2 con l'adsl la velocità era intorno ai 18 kb/sec.

Spero di essere stato utile a qualcuno

Ottimo lavoro, ma visto che sei membro perchè non lo pubblichi? Di sicuro sarà 100 volte + rintracciabile...

Naturalmente, non si deve usare con file lunghi oltre 2 G (un iso di un dvd ad esempio) perche' la LOF andrebbe in errore ...

ok ho pubblicato i miei programmi: sia quello per trasferire i file sia quello della web cam.

OT: come mai sono member? o.o

ehm...se non lo sai tu...lol

Allora, quando ci si registra si è normal user... poi puoi diventare member mandando a pierotofy un tuo progetto per dimostrare le tue competenze informatiche e mostrare che sei "degno" (diciamo così...) di diventar membro...

xDDD no è ke ho visto ke ho pochi messaggi mentre mi ricordo ke una volta...quando avevo condiviso un po di programmi appunti avevo molti piu messaggi. ma ora vedo ke mi si sono resettati i messaggi...bho

vabbè comunque è OT

Si quando si passa da normal user a member il conteggio dei mex riparte da 0