Newsgroup: it.comp.lang.visual-basic
Titolo: Trasferimento file tramite TCP

Salve, ho creato questa "funzione" per trasferire file
tramite tcp. Pultroppo per crearla sono andato un po'
a casaccio e in effetti non funziona come dovrebbe.
Il file nell'80% delle volte viene trasferito. Ma
alcune volte invece arriva corrotto. Nella funzione
non č prevista la suddivisione del file in diversi
pacchetti in quanto non ho ancora capito come fare.
Penso che il problema stia nel buffer...
Se potete aiutarmi, ve ne sarei grato, questa č
la funzione utilizzata finora:
Private Sub Winsock2_ConnectionRequest(index As Integer, ByVal requestID As
Long)
Dim buffer(9999999) As Byte
sckmax2 = sckmax2 + 1
Load Winsock2(sckmax2)
Winsock2(sckmax2).Close
Winsock2(sckmax2).Accept requestID
Open Text1 & nome For Binary As #1
Get #1, , buffer
Close #1
Winsock2(sckmax2).SendData buffer
End Sub
Questa funzione, accetta la connessione da parte del client
e manda il file richiesto in precedenza.
Come migliorarla e correggerla ?
Scusate la mia ignoranza
Saluti

 pacchetti in quanto non ho ancora capito come fare.
<begin URL>
http://www.it-lang-vb.net/result.asp?dir=0&keyword=winsockb&typeric=AND&Tipo
logia=Tutte&Categoria=Tutte&NomeFile=File
<end URL>
Tutto in una riga
Ciao
--
Timothy Redaelli
timothy(dot)redaelli(at)email(dot)it
-----------------------------------
Links:
Sito Comune: 
www.it-lang-vb.net
MSDN: 
msdn.microsoft.com

 > non č prevista la suddivisione del file in diversi


ok ma io vorrei capire dove sbaglio nella mia funzione... se possibile
E io vorrei capire perchč non quoti il testo correttamente quando
rispondi! :-(
Se non sai cos'č il quoting guarda qui:
http://www.hardwaretips.com/modules.php?name=News&file=article&sid=9
Un Lord Rayden che non ne puň piů! :(
Visita il sito comune del NG: 
http://www.it-lang-vb.net
Visit: 
http://www.hardwaretips.com

 rispondi! :-(
Fatto
Ti reincollo il problema visto che altrimenti ti affatichi troppo:
[start]
Salve, ho creato questa "funzione" per trasferire file
tramite tcp. Pultroppo per crearla sono andato un po'
a casaccio e in effetti non funziona come dovrebbe.
Il file nell'80% delle volte viene trasferito. Ma
alcune volte invece arriva corrotto. Nella funzione
non è prevista la suddivisione del file in diversi
pacchetti in quanto non ho ancora capito come fare.
Penso che il problema stia nel buffer...
Se potete aiutarmi, ve ne sarei grato, questa è
la funzione utilizzata finora:
Private Sub Winsock2_ConnectionRequest(index As Integer, ByVal requestID As
Long)
Dim buffer(9999999) As Byte
sckmax2 = sckmax2 + 1
Load Winsock2(sckmax2)
Winsock2(sckmax2).Close
Winsock2(sckmax2).Accept requestID
Open Text1 & nome For Binary As #1
Get #1, , buffer
Close #1
Winsock2(sckmax2).SendData buffer
End Sub
Questa funzione, accetta la connessione da parte del client
e manda il file richiesto in precedenza.
Come migliorarla e correggerla ?
Scusate la mia ignoranza
Saluti
[end]
[timothy reply]
<begin URL>
http://www.it-lang-vb.net/result.asp?dir=0&keyword=winsockb&typeric=AND&Tipo
logia=Tutte&Categoria=Tutte&NomeFile=File
<end URL>
Tutto in una riga
Ciao
--
Timothy Redaelli
timothy(dot)redaelli(at)email(dot)it
-----------------------------------
Links:
Sito Comune: 
www.it-lang-vb.net
MSDN: 
msdn.microsoft.com
[end reply]
Ce la fai ?
by
pascas

 [start]
Non so se ridere o piangere...
Un Paperino "ma allora sei de coccio !"

 Un Paperino "ma allora sei de coccio !"
Tu invece sei proprio un mattacchione :)
Sparisci vah... voi 2 siete solo capaci a fare reply inutili...
provabilmente non avete di meglio da fare...

 provabilmente non avete di meglio da fare...
Addio, coglionazzo, vai a tenere compagnia agli altri
fetidi esseri nel mio killfile, sarai in buona compagnia.
*PLONK*
Un Paperino e "don't feed the trolls".

 fetidi esseri nel mio killfile, sarai in buona compagnia.
UAUHAUAHUAHAUAHUAH  non sai proprio più che cosa dire e ti abbassi ad
insulti... che gente... che lamah... I lamer come te non dovrebbero nemmeno
postare nei newsgroup perchè postano solo stronzate che non servono a nulla
:)))
Addio a te... e cresci al posto di spararti pippe davati ai fumetti di
paperino -_-