deyvyd
18 de Marzo del 2004

Quiero recibir una imagen desde el usuario i con conexion winsock.

Pongo el siguiente codigo para que se me muestre la imagen en un PictureBox:

Private Sub Form_Load()
Winsock1.Listen

End Sub
Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
Winsock1.Close
Winsock1.Accept requestID
End Sub
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim a As Variant
Winsock1.GetData a
a = Picture1.Picture
End Sub

Gracias...

pau_f
18 de Marzo del 2004

Yo no soy muy experto, pero creo que lo que envias a través del socket no puede ser compatible directamente con un picture. Si me equivoco que alguien me corrija.
He hecho algo parecido pero enviando un archivo BMP, recontruyendolo en el cliente y asignando ese BMP al picture.
Espero que te sirva de ayuda.