simple client server program

Hey

I am trying to make a simple client server program where i send a Username and Password from the client to the server. The server then uses this to get info from a db. My problem is that when i sent the Username and Password they get to the server as one bit of info not two separate ones.

For the client so far i have:

Private Sub btnSend_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSend.Click
Dim Uname As String
Dim Pword As String

Uname = TxtUsername.Text
MC_Socket.SendData(Uname)
Pword = TxtPassword.Text
MC_Socket.SendData(Pword)

End Sub

the server:

Private Sub CS_Socket_DataArrival(ByVal sender As Object, ByVal e As AxMSWinsockLib.DMSWinsockControlEvents_DataArrivalEvent) Handles CS_Socket.DataArrival

CS_Socket.GetData(TxtUsername.Text)
TxtUsername.Text = (TxtUsername.Text)

End Sub


I am using the same name for the text boxes on both programs. I want to send what ever is entered in the client username textbox to the server username textbox, and the same for the password.


Any help would be appreciated.

Dan