Esto es lo que tengo pero solo me envia 1 solo dato no se si es por que el puerto ya esta ocupado mandando 1 y los otros no llegan, pero solo me llega 1 y cuando pongo las variables en 1 solo SENDDATA pues se me envia todo pero solo se ve en 1 texto
Este es el Code mas o menos que tengo!:
ESTE ES PARA QUE EL CLIENTE RECIBA LOS DATOS:
Código:
Dim De1, Color1, Msg1, Act1 As String
Winsock1.GetData De1
Winsock1.GetData Color1
Winsock1.GetData Msg1
Winsock1.GetData Act1
Colortxt.Text = Color1
Activacion.Caption = Act1
De.Caption = De1
MsgRecibido.Text = Msg1
ESTA ES PARA QUE EL SERVIDOR ENVIE LOS DATOS:
Código:
Msg1 = Mensaje.Text
De1 = De.Text
Color1 = EnviarColor.Text
Act1 = Para.Text
Winsock1.SendData Msg1
Winsock1.SendData De1
Winsock1.SendData Color1
Winsock1.SendData Act1
Bueno si necesitan otras partes del Code o no entendieron bien lo que quiero porfavor Diganme que necesito que me ayuden!