[VB.NET] Comment envoyer deux Stream

Version imprimable

Bonjour,

Je fais un petit programme. J'aimerais envoyer deux requete de ce type, pour obtenir deux réponses de mon serveur.

Quelqu'un a une idée?

Code:

1
2
3
4
5
6
7
8
9
        Dim client As New TcpClient(OV_Server, port)
        Dim data As [Byte]() = System.Text.Encoding.ASCII.GetBytes("GETUNIWELCOMEMSG")
        Dim stream As NetworkStream = client.GetStream()
        stream.Write(data, 0, data.Length)
        data = New [Byte](256) {}
        Dim responseData As [String] = [String].Empty
        Dim bytes As Int32 = stream.Read(data, 0, data.Length)
        responseData = System.Text.Encoding.ASCII.GetString(data, 0, bytes)
        TextBox1.Text = "Immigration:	" + responseData

Quand je le fais deux fois, mon programme gèle

14/02/2006, 05h19
FeaR

En passant, c'est les objets Sockets du Framework 2.0 :D
14/02/2006, 17h49
JauB

une boucle ça donne pas :?:
15/02/2006, 00h12
FeaR

Comment je pourrais la faire. Ta un exemple?
15/02/2006, 00h22
FeaR

Voilà j'ai retoucher mon code un petit peu.

Dim connexion As New TcpClient(OV_Server, port)
Dim MsgToTranslateinByte As String = "Connection avec le build " + Browser_Build
Dim byteformat As [Byte]() = Encoding.UTF8.GetBytes(MsgToTranslateinByte)
Dim stream As NetworkStream = connexion.GetStream()
stream.Write(byteformat, 0, byteformat.Length)

MsgToTranslateinByte = "Test"
byteformat = Encoding.UTF8.GetBytes(MsgToTranslateinByte)
stream.Write(byteformat, 0, byteformat.Length)

Ce qui est en rouge, c'est le Socket qui ne se rend pas a mon serveur