Todo sobre AO
 
ÍndiceFAQBuscarMiembrosGrupos de UsuariosRegistrarseConectarse

Comparte | 
 

 /RMSG dice nick

Ir abajo 
AutorMensaje
Agus
Admin


Mensajes : 69
Fecha de inscripción : 01/07/2008

MensajeTema: /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
Volver arriba Ir abajo
Ver perfil de usuario http://recompilacionao.forosactivos.com
 
/RMSG dice nick
Volver arriba 
Página 1 de 1.

Permisos de este foro:No puedes responder a temas en este foro.
 :: Argentum Online :: Programación :: 0.11.2-
Cambiar a: