-jacopo-
29-01-2008, 21:38
Ciao, sono nuovo!
Vi scrivo per chiedervi un aiuto:
Ho creato un semplice client e un server che si scambiano messaggi di testo tramite i sockets.
Ora però vorrei fare qualcosa di più, ovvero trasferire non più solo testo ma un immagine da una picturebox a un'altra!
Come devo fare?
Per i messaggi invio così:
If NetStr.CanWrite Then
'converte messaggio in bytes
Dim Bytes() As Byte = _
System.Text.ASCIIEncoding.ASCII.GetBytes(messaggio.Text)
'scrive sullo stream
NetStr.Write(Bytes, 0, Bytes.Length)
E ricevo così:
If Client.Available > 0 And NetStr.CanRead Then
'Legge i dati come array di bytes
Dim Bytes(Client.ReceiveBufferSize) As Byte
NetStr.Read(Bytes, 0, Client.ReceiveBufferSize)
'Trasforma i bytes ricevuti in stringa
Dim S As String = System.Text.ASCIIEncoding.ASCII.GetString(Bytes)
Ma per delle immagini come faccio?
Grazie
Vi scrivo per chiedervi un aiuto:
Ho creato un semplice client e un server che si scambiano messaggi di testo tramite i sockets.
Ora però vorrei fare qualcosa di più, ovvero trasferire non più solo testo ma un immagine da una picturebox a un'altra!
Come devo fare?
Per i messaggi invio così:
If NetStr.CanWrite Then
'converte messaggio in bytes
Dim Bytes() As Byte = _
System.Text.ASCIIEncoding.ASCII.GetBytes(messaggio.Text)
'scrive sullo stream
NetStr.Write(Bytes, 0, Bytes.Length)
E ricevo così:
If Client.Available > 0 And NetStr.CanRead Then
'Legge i dati come array di bytes
Dim Bytes(Client.ReceiveBufferSize) As Byte
NetStr.Read(Bytes, 0, Client.ReceiveBufferSize)
'Trasforma i bytes ricevuti in stringa
Dim S As String = System.Text.ASCIIEncoding.ASCII.GetString(Bytes)
Ma per delle immagini come faccio?
Grazie