Agus
Admin
Mensajes : 69
Fecha de inscripción : 01/07/2008
 | Tema: /RMSG dice nick  Miér Jul 02, 2008 3:57 am | |
| Buscan - Citación :
If UCase$(Left$(rdata, 6)) = "/RMSG " Then
y lo reemplazan por - Citación :
If UCase$(Left$(rdata, 6)) = "/RMSG " Then
rdata = Right$(rdata, Len(rdata) - 6)
Call LogGM(UserList(UserIndex).Name, "Mensaje Broadcast:" & rdata, False)
If rdata <> "" Then
Call SendData(ToAll, 0, 0, "||" & UserList(UserIndex).Name & "> " & rdata & FONTTYPE_TALK & ENDC)
End If
Exit Sub
End If
| |
|
