omarswan
Dec 8th, 1999, 05:29 AM
Hi I'm Creating a chat program and I'm having a problem sending and recieving the list of users online.
------------------------------------------
This is the structure that I use to store the users in an array.
Public Chat_Users(0 To MAX_USERS) As ChatUsers
Type ChatUsers
'User's Nick Name
User_Nick_Name As String
'Users IP-Address
User_IP_Address As String
'User's Communication Port
User_Communication_Port As String
'Server's IP-Address
Server_IP_Address As String
'Used To Check If Socket is Free
LoggedIn As Boolean
End Type
------------------------------------------
------------------------------------------
"Server"
To Send the List of all the users online this is what I used
For IL = 0 To Sockets.Count - 1
Sockets(NewUserIndex).SendData "USER_LIST" Chat_Users(IL).User_Nick_Name
Next IL
------------------------------------------
The New Users Recieves the data but somewhere
along the line the data gets messed up.
Any Help Please.
------------------
OmarSwan
Student
omarswan@yahoo.com
"Jesus Lives"
------------------------------------------
This is the structure that I use to store the users in an array.
Public Chat_Users(0 To MAX_USERS) As ChatUsers
Type ChatUsers
'User's Nick Name
User_Nick_Name As String
'Users IP-Address
User_IP_Address As String
'User's Communication Port
User_Communication_Port As String
'Server's IP-Address
Server_IP_Address As String
'Used To Check If Socket is Free
LoggedIn As Boolean
End Type
------------------------------------------
------------------------------------------
"Server"
To Send the List of all the users online this is what I used
For IL = 0 To Sockets.Count - 1
Sockets(NewUserIndex).SendData "USER_LIST" Chat_Users(IL).User_Nick_Name
Next IL
------------------------------------------
The New Users Recieves the data but somewhere
along the line the data gets messed up.
Any Help Please.
------------------
OmarSwan
Student
omarswan@yahoo.com
"Jesus Lives"