linusfishing
Member
- Joined
- Jun 6, 2005
- Messages
- 15
- Programming Experience
- Beginner
Hello,
I am trying to check if the following of my codes are correct.
If Data.StartsWith("<Send_All>") Then
RemoveProtocol(Data)
UpdateStatus(str & " ")
For Each d In mcolClients
objClient = d.Value
objClient.Send(str & vbCrLf)
Next
End If
These codes are extracted from part of my server chat application. Data is everything that is going through the stream. Every message that a client sends has a "tag" which is "<Send_All>" at the start. So these codes are supposed to send the message to all the clients connected to the server if the message sent by a particular client contains the "<Send_All>" tag. If you are wondering what the RemoveProtocol is about, its purpose is to remove the tag so that clients won't see it.
However, the problem i am facing now is that the message that the client actually sends, isn't captured properly. Therefore, i would like to find out if i have coded in a wrong way.
Thanks,
Linus
I am trying to check if the following of my codes are correct.
If Data.StartsWith("<Send_All>") Then
RemoveProtocol(Data)
UpdateStatus(str & " ")
For Each d In mcolClients
objClient = d.Value
objClient.Send(str & vbCrLf)
Next
End If
These codes are extracted from part of my server chat application. Data is everything that is going through the stream. Every message that a client sends has a "tag" which is "<Send_All>" at the start. So these codes are supposed to send the message to all the clients connected to the server if the message sent by a particular client contains the "<Send_All>" tag. If you are wondering what the RemoveProtocol is about, its purpose is to remove the tag so that clients won't see it.
However, the problem i am facing now is that the message that the client actually sends, isn't captured properly. Therefore, i would like to find out if i have coded in a wrong way.
Thanks,
Linus
