11/10/09 10:33
GoLDBeRG
LATO CLIENT
LATO SERVER
la domanda è... perche in ufficio dove ce la 7 mega busness va a 700 mentre a casa che ho la 7 mega di zio tom va a 90 kb/s? potrei trovare uin modo per far andare giusto un po meglio il trasferimento anche su connessioni deboli? deboli nel senso non lente... tipo da irc scarico a 500... ma con il mio 90 massimo 150... perche? cosa ce che potrebbe rallentar eil trasferimento? il protocollo? non so >.<
While (True) Dim buff(impo.bufferint) As Byte Dim u As Integer = sock.Receive(buff, buff.Length, SocketFlags.None) Dim file As New FileStream(nome, FileMode.Append) file.Write(buff, 0, u) file.Close() quanti += u impo.totatlissimo += u totali += u If u < 1 Then disconnetti() Exit Sub End If End While
LATO SERVER
f = New FileStream(percorso, FileMode.Open, FileAccess.Read, FileShare.Read) f.Seek(partibyte, SeekOrigin.Current) While (True) Dim buff(100000) As Byte Dim p As Integer = f.Read(buff, 0, buff.Length) Module1.impostazioni.banda += p Module1.protocol.byteinviati += p If p > 0 Then nuovo.Send(buff, 0, p, SocketFlags.None) Else disconnetti() Exit Sub End If End While
la domanda è... perche in ufficio dove ce la 7 mega busness va a 700 mentre a casa che ho la 7 mega di zio tom va a 90 kb/s? potrei trovare uin modo per far andare giusto un po meglio il trasferimento anche su connessioni deboli? deboli nel senso non lente... tipo da irc scarico a 500... ma con il mio 90 massimo 150... perche? cosa ce che potrebbe rallentar eil trasferimento? il protocollo? non so >.<
aaa