Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Ho incluso nel mio Visual Basic 2010 il vecchio controllo Winsock del VB6.
Sono al corrente che è vecchio come controllo, e che sarebbe meglio passare ai sockets del VB.NET; ma faccio parte di un piccolo gruppo di programmatori (quindicenni) che vogliono mettere su una semplice chat (per divertirci un pò xD), e mi hanno chiesto di fare la parte del trasferimento file e immagini.
Purtroppo io però non sono molto bravo con il VB.NET (Di solito programmo in Java, ma ero l' unico a conoscerlo), ho scritto un piccolo codice che legge l' immagine su disco in modalità binaria e che la invia sottoforma di byte, e fin qui ci siamo. Il problema è che l' immagine, quando viene ricreata dall' altra parte, è illeggibile (Nonostante chiudo il file dopo averlo creato).
Dunque dovrei riuscire a creare un codice che legge e invia i byte pian piano, ovvero non tutti assieme.
Vi posto i miei due blocchi di codice (Client che invia e Server che riceve):
Client:
Codice sorgente - presumibilmente VB.NET
Dim Image AsByte
FileOpen(1, "C:\Foto.jpg", OpenMode.Binary)
WhileNotEOF(1)
FileGet(1, Image)
Winsock2.SendData(Image)
EndWhile
FileClose(1)
Server:
Codice sorgente - presumibilmente VB.NET
FileOpen(1, "C:\Img.jpg", OpenMode.Binary)
PrivateSub Winsock1_DataArrival(ByVal sender AsObject, ByVal e As AxMSWinsockLib.DMSWinsockControlEvents_DataArrivalEvent)Handles Winsock1.DataArrival
Naturalmente in questi due pezzi di codice i file sono già scelti da me, ma perchè fanno parte solo di un programma test per poi applicare questo codice nella chat.
Inoltre ne approfitto: Con questo codice, ho provato a trasferire un file TXT che all' interno contiene "Ciao Mondo"; solo che il file non veniva mai creato completamente, a volte vi era scritto "Ciao M", a volte solo "Ci" etc.
Mi rivolgo a voi dato che siete esperti in questo campo.
a parte qualsiasi considerazione sull' !OLD! grande come una casa che stai facendo,
ti darò comunque la soluzione al tuo problema
a causa di un algoritmo di rete chiamato nagle algorithm che gioca un ruolo fondamentale nella frammentazione dei pacchetti TCP, una SendData _NON_ corrisponde necessariamente ad _UN_ evento DataArrival
quindi per risolvere il tuo problema basta che nell'evento DataArrival aggiungi i byte ricevuti ad un buffer, e, mettiamo caso che la "fine trasmissione immagine" sia la chiusura della connessione, nell'evento close scrivi il contenuto del buffer nel file immagine.
spero di essermi spiegato.
N.B: si sceglie per semplicità l'evento di chiusura della connessione per delimitare la fine dell'immagine, questo implica che, data la connessione principale su cui viaggiano i messaggi della chat, verrà aperta una connessione parallela per inviare ogni immagine.
nulla vieta di inviare l'immagine nello stream principale di dati, peccato che poi bisogna gestirsi la detection della fine immagine e non è semplice.
Grazie per aver risposto ; ma come ho detto non sono molto bravo con il vb.net, ed un piccolo esempio pratico non mi guasterebbe; non che voglia fare un copia e incolla ma non ho capito precisamente cosa intendi...
Grazie per aver risposto ; ma come ho detto non sono molto bravo con il vb.net, ed un piccolo esempio pratico non mi guasterebbe; non che voglia fare un copia e incolla ma non ho capito precisamente cosa intendi...
preciso ma non fornisco codice
può darsi che il pacchetto che invii con senddata contenente l'immagine venga diviso in più pacchettini, questo comporta lo scatenamento di più di un evento dataarrival, ognuno con un pezzo dell'immagine (in ordine ovviamente). la soluzione sta proprio qui, bisogna predisporre un buffer in cui accumulare ad ogni evento dataarrival i dati ricevuti, una volta chiusa la connessione scrivere i dati contenuti nel buffer nel file dell'immagine.
il mio consiglio è aprire uno streamreader verso il file e ad ogni dataarrivar scriverci dentro i dati come vengono, all'evento close chiudere il file.
Postato originariamente da VBasicPC: Sono disperato... Sono 4 giorni che cerco di trasferire una stupida immagine... xD
per il tuo bene non ti dico nulla sul codice, però invece ti dico altro: prima di programmare in vb.net devi studiare a fondo il framework, non ci si può improvvisare come si faceva in vb6 (mica vero poi).
il vb.net è solo uno specchietto per le allodole, cioè i programmatori vb6 che vogliono passare alla nuova versione, peccato poi sfugga che vb.net è un linguaggio full oop basato totalmente su un framework che VA SAPUTO.
detto questo posso solo augurarti buono studio, è per il tuo bene.
Lavorando un pò con la logica sono riuscito a ricevere file e immagini. Ma il problema è che l' immagine arriva al 70%, cioè si vede il 70% dell' immagine ed il resto è nero xD.
Comunque il VB.NET lo sto utilizzando solo in questo programma, cioè come ho detto di solito programmo in Java, ho solo voluto fare parte ad un progetto di alcuni miei amici.
Ultima modifica effettuata da VBasicPC il 18/08/2010 alle 3:08
| 
.