Visual Basic 6 - Problema invio immagine con winsock....

Forum - Visual Basic 6 - Problema invio immagine con winsock....

luca94 (Normal User)
Pro

Messaggi: 71
Iscritto: 07/05/2008

Postato alle 19:52
Sabato, 14/02/2009

Salve a tutti,
premetto che già ho letto tutte le discussioni riduardanti quest' argomento, su questo forum. Ma non hanno risolto il mio problema che è il seguente:
allora vorrei sapere cosa c'è di sbagliato in questo codice:
Server:

Codice sorgente - presumibilmente VB.NET

Private Sub Form_Load()
Winsock1.Listen
End Sub
 
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim c As Byte
Winsock1.GetData c
Open ("C:\aaaaaaaa.jpg") For Binary As #1
Put #1, , c
Close #1
End Sub
 
Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
If Winsock1.State <> sckClosed Then Winsock1.Close
Winsock1.Accept requestID
End Sub

Client:

Codice sorgente - presumibilmente VB.NET

Private Sub Command1_Click()
Dim c As Byte
Open ("C:\img.jpg") For Binary As #1
While Not EOF(1)
Get 1, , c
Winsock1.SendData c
DoEvents
Wend
Close #1
End Sub
 
Private Sub Form_Load()
Dim x As String
x = Text1.Text
Winsock1.Connect x, "10"
End Sub

Il problema nn è nella connessione ma nell' immagine che viene creata dal server, non è buona...
Grazie in anticipo...

theprogrammer (Normal User)
Guru^2

Messaggi: 2509
Iscritto: 28/01/2009

Postato alle 20:23
Sabato, 14/02/2009

Testo quotato

Postato originariamente da luca94:
vorrei sapere cosa c'è di sbagliato in questo codice

Praticamente tutto nel DataArrival del server.

In quell'evento arriva un flusso di dati che rappresenta il file (dal primo all'ultimo byte).

Se, ad ogni arrivo, tu apri il file e lo chiudi, non farai altro che sovrascrivere ogni volta i dati arrivati su quelli gia' scritti. In pratica, alla fine, avrai solamente l'ultimo blocco di dati inviati.

Inoltre, nel client, e' sbagliato inviare un byte alla volta.

luca94 (Normal User)
Pro

Messaggi: 71
Iscritto: 07/05/2008

Postato alle 20:43
Sabato, 14/02/2009

E come andrebbe scritto il codice risolutivo?

theprogrammer (Normal User)
Guru^2

Messaggi: 2509
Iscritto: 28/01/2009

Postato alle 21:18
Sabato, 14/02/2009

Andrebbe scritto tenendo conto del fatto che il programma che riceve sa quando inizia il file, ma NON SA quando finisce perche' NON ne conosce la lunghezza.

Queste informazioni devono essere quindi inviate dal programma che invia, prima di inviare i dati veri e propri.

Pero', non ho assolutamente il tempo di scrivere tutto il codice corretto e testato. Dovrai farlo tu ... se hai altri problemi, posta.