Shoutbox

ok, example in VB: first u have to define a variable in the general declarations. for example:

code:

---

Dim ignore as integer

---

then u do the following in the parsecommand:

code:

---

ElseIf (StrComp(LCase(sCommand), "/xpingvb", vbTextCompare) = 0)
Then
sResult = Chr(nCCNotify) + "ping." 'The notify code must be 5 characters long
sResult = sResult + "Ping?"
ignore = 1       
ParseCommand = True
Exit Function
End If

---

and, finally in the recieve notify:

code:

---

If (StrComp(sNotifyCode, "ping.", vbTextCompare) = 0) Then
If ignore = 1 Then
ignore = 0
Else       
sTextToSend = "Pong!"
End If
ReceiveNotify = True
Exit Function
End If

---