11/10/05 20:49
Impakto
Private Sub wsk_DataArrival(ByVal sender As Object, ByVal e As AxMSWinsockLib.DMSWinsockControlEvents_DataArrivalEvent) Handles wsk.DataArrival Dim a As Object wsk.GetData(a) thedata = System.Text.Encoding.Default.GetString(a) Me.Text = "Connesso a: " & txtHost.Text & " sulla porta " & txtPort.Text txtDebug.Text = txtDebug.Text & "<" & TimeOfDay & "> " & "Connesso..." & vbCrLf txtDebug.Text = txtDebug.Text & "<" & TimeOfDay & "> " & thedata & vbCrLf End Sub
ecco il codice del dataarrival del mio telnet.
Il mio problema ? che se io mi connetto, il server risponde correttamente, mentre se, una volta connesso, mando una stringa, esso non risponde. Credo che dipenda da questo pezzo perch? ho provato con vb6 e funziona correttamente. Guardate se mi potete dare una mano, grazie
aaa