Programación General > Visual Basic 6.0 e inferiores

 Como Enviar Varios Datos Con Winsock

<< < (2/2)

tiquinho:
Yo lo que hago es enviar todo de una vez, en una sóla string, y para separarlas utilizo un caracter raro, y después lo separas:


--- Código: Text ---  Private Sub CmdSend_Click()Dim send1 As Stringsend1 = Text1.Text & Chr(174) & Text2.Text & Chr(174) & Text3.TextWinsock1.SendData send1End Sub  
Y para recibir:


--- Código: Text --- Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long) Dim datos1 As StringDim datosArray() As StringWinsock1.GetData datos1datosArray = Split(datos1,Chr(174))Text1.Text=datosArray(0)Text2.Text=datosArray(1)Text3.Text=datosArray(2)End Sub  
Espero que te funcione, alguna duda pregunta :)

oscar_937:
:comp: MUCHAS GRACIAS ME FUNCIONO COMO DICE TIQUINHO ASI SI SE RECIBEN LOS DATOS DE UNO POR UNO Y YA LOS PUEDO MANIPULAR CORRECTAMENTE, GRACIAS A TODOS. :smartass:  :devil:

OTRA DUDA: :rolleyes:

COMO PUEDO ENVIAR POR EL PUERTO SERIE BYTES, CREO QUE LOS TENGO QUE ENVIAR COMO MATRIZ O COMO LE HAGO? KIERO ENVIAR DATOS NUMERICOS POR EJEMPLO: 2, 5 , 56, 34, 78 ETC ETC, ASI TAL CUAL LOS MANDO POR EL MSCOMM? CON MSCOMM.OUTPUT Y  LA MAQUINA LOS CAMBIA A BYTES? O LOS TENGO QUE CAMBIAR A BYTES? O COMO LE HAGO?

DE ANTEMANO GRACIAS AMIGOS PROGRAMADORES

Y PARA ENVIAR UNA IMAGEN CAPTADA POR UNA WEBCAM ESTO MEDIANTE EL CONTROL WINSOCK COMO SE LE HACE ;)  :unsure:  :blink:

HAST APRONTO AMIGOS :comp:

Navegación

[0] Índice de Mensajes

[*] Página Anterior