Salve a tutti,
Sto realizzando un programmino che invia files tramite il protocollo TCP/IP.
Per lo scambio di file non ci sono problemi, funziona a meraviglia, ma sto cercando di aggiungere la funzione resume, ecco quanto fatto finora.
- Verifico che il file esiste, se esiste leggo la dimensione con FileLen e comunico al client che deve partire dal byte XXX.
- Il client riceve il byte di partenza e inizia il trasferimento.
ora, il problema è che non riesco a leggere il file da un determinato punto di partenza, e scrivere da un punto di partenza.
ecco come faccio per inviare:
t= freefile
Open SourceFilename For Binary Access Read As #t
Do Until (CurrentFileSize - ByteNow) < ChunkSize
DoEvents
ByteNow = ByteNow + ChunkSize
DoEvents
wsSender.SendData bytBuf
Loop
Come faccio a far legegre il file dal punto XXX (già ricevuto e contenuto in una variabile di nome StartByte).
Grazie a tutti.
Rispondi quotando
