Text Capturing Problem

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
 
Back
Top