19/05/12 18:41
ertoti
Salve a tutti,
ho da poco cominciato ad usare VB, ho creato questa funzione che dovrebbe permettermi di inviare i vari valori della variabile stringa ad un client che si connette. Ma non va
Sul client (hyper terminal) Vedo scorrere le stringhe una ad una solo se faccio connetti/disconnetti.
Dove sbaglio? Un enorme grazie a chi potrà darmi un aiuto.
Ciao.
Private Sub Listening()
Dim stato As Boolean = True
Listener.Start()
Dim Client As TcpClient = Listener.AcceptTcpClient() ' associazione client connesso con listener
Dim networkStream As NetworkStream = Client.GetStream()
While stato = True
'MessageBox.Show(stringa)
Dim sendBytes() As Byte = System.Text.ASCIIEncoding.ASCII.GetBytes(stringa & vbCrLf)
networkStream.Write(sendbytes, 0, sendbytes.Length)
End While
End Sub
ho da poco cominciato ad usare VB, ho creato questa funzione che dovrebbe permettermi di inviare i vari valori della variabile stringa ad un client che si connette. Ma non va
Sul client (hyper terminal) Vedo scorrere le stringhe una ad una solo se faccio connetti/disconnetti.
Dove sbaglio? Un enorme grazie a chi potrà darmi un aiuto.
Ciao.
Private Sub Listening()
Dim stato As Boolean = True
Listener.Start()
Dim Client As TcpClient = Listener.AcceptTcpClient() ' associazione client connesso con listener
Dim networkStream As NetworkStream = Client.GetStream()
While stato = True
'MessageBox.Show(stringa)
Dim sendBytes() As Byte = System.Text.ASCIIEncoding.ASCII.GetBytes(stringa & vbCrLf)
networkStream.Write(sendbytes, 0, sendbytes.Length)
End While
End Sub
aaa