ayuda uegente

[lauta777]

hola ,favor necesito ayuda con un programilla que estoy tratando de hechar a andar soy aficionado a visual basic ..bien les cuento es un cliente -servidor ,el problema se me presenta cuando necesito ver una base de datos en un list del cliente ya que este solo recibe un getdata y me lo muestra en una sola linea .

Dim sData As String

Winsock1.GetData sData, vbString

'Label1.Caption = sData
txtPrice.Text = sData
Label4.Caption = sData
Label5.Caption = sData






With List1
.AddItem "Maestro: " & sData
.AddItem "tarjeta :" & sData
.AddItem "rut :" & strOutData
End With

Label3.Caption = "Recibiendo datos"
shpGo.Visible = True
shpWait.Visible = False
shpError.Visible = False

[pkj]

No he usado winsock, pero como nadie te contesta te daré mi opinion.
Como creo que tu problema se refiere a que solo recibes un dato cada vez, igual lo que necesitas sería un bucle hasta que recibas una cadena en blanco.


Dim sData As String

Do

Winsock1.GetData sData, vbString

If sData="" Then Exit Do

'Label1.Caption = sData
txtPrice.Text = sData
Label4.Caption = sData
Label5.Caption = sData






With List1
.AddItem "Maestro: " & sData
.AddItem "tarjeta :" & sData
.AddItem "rut :" & strOutData
End With

Label3.Caption = "Recibiendo datos"
shpGo.Visible = True
shpWait.Visible = False
shpError.Visible = False

Loop

Saludos y suerte