23/07/08 13:52
giusy_m86
Dim x As Integer
Dim ricevuto(0 To 100) As String
For x = 0 To 100
Winsock2.GetData ricevuto(x)
Next x
txtImp96.Text = ricevuto(0)
txtImp91.Text = ricevuto(1)
End Sub
avevo pensato a questo come soluzione...potrebbe andare? ps:cmq nn mi dà il risultato sperato...
aaa
23/07/08 15:07
gantonio
Ma dove usi questo codice?
Sempre all'interno dell'evento in questione?
Se e' cosi', siamo nelle stesse condizioni di prima, anzi peggio, perche' invece di chiamare il metodo due volte nell'evento lo chiami cento volte ...
Inserisci nel progetto un controllo ListBox e prova
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim ricevuto As String
Winsock1.GetData ricevuto
List1.AddItem ricevuto
End Sub
... ricevi le stringhe nella listbox?
Ultima modifica effettuata da gantonio 23/07/08 15:09
aaa
24/07/08 12:51
giusy_m86
si!!! i dati arrivano tutti nella listbox...ma ora?dalla listbox come faccio a smistarli nelle textbox?
aaa
24/07/08 13:43
giusy_m86
come tu mi suggerisci nn va bene, in entrambi i textbox mi restuisce l'ultima stringa che riceve dal getData...
aaa
24/07/08 14:56
GrG
ah!...nn avevo capito bene...allora ricapitoliamo:
server = manda 2 stringhe al client [tipo: "ciao" e "come stai?"
client = ha 2 textbox e in ogni textbox ci deve essere scritto sia "ciao"che "come stai?"
giusto?
aaa