Ver Mensaje Individual
  #3 (permalink)  
Antiguo 03/09/2002, 22:09
Avatar de lexus
lexus
 
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 4 meses
Puntos: 4
Re: Palabras obcenas

Hola, lo que puedes hacer es lo siguiente, en la pagina donde haces el proceso para cambiar o actualizar y tambien donde se crea el nuevo usuario, por medio de un request llamas el campo del formulario que necesites filtrar.
por ejemplo, que necesitemos filtrar el campo donde colocan su descripcion.

descripcion = Request.Form("descripcion")


descripcion = Replace(descripcion, "malapalabra1", "***")
descripcion = Replace(descripcion, "malapalabra2", "@*&;etc...")
descripcion = Replace(descripcion, "groseria3", "cualquiercosa")
descripcion = Replace(descripcion, "groseria4", "nada")


y asi.. puedes crear una lista por lo menos de 30 palabras, las mas conocidas, y listo..
cada que alguien coloqe una mala palabra, el programa la reemplaza por lo que quieras, ya sean caracteres, asteriscos, etc..

espero te sirva..

cualquier cosa mi email es [email protected]


<img src="http://www.lexus.com/images/nav/nav_i_logo.gif" width="109" height="47" alt="Lexus" border="0">