Filtro de palabras

[luisvasquez]

Buen día Amigas y amigos!

Estoy desarrollando una sección de mi web en la que los usuarios pueden hacerse preguntas entre si y obviamente responderse, pero quiero evitar que se pasen datos personales, como teléfonos y/o direcciones de correo, tal como lo hace mercadolibre.com en las preguntas y respuestas entre compradores y vendedores.

Debo suponer que mercadolibre tiene una tabla con las palabras prohibidas, tales como "hotmail", "yahoo", etc, pero también detecta algunas cosas que parecen numeros telefónicos, pues, en una oportunidad traté de enviar un número de serial en una pregunta y me rechazó.

Saben de algun código ASP que me pueda ayudar a reemplazar las palabras prohibidas por ******.??

Mil gracias por sus comentarios,
Luis Vásquez

[JuanRAPerez]

usa el replace(string,"hotmail","*******")

[luisvasquez]

Gracias!

Aca publico un código que encontré que puede ser de utilidad:

Código:

Function filtrar(ByVal strYourString) 
Dim arrBadLanguageWords(2) 
Dim I '-------------[ Array of dirty words ]----------------------- 
arrBadLanguageWords(0) = "badwords1" 
arrBadLanguageWords(1) = "badwords2" 
arrBadLanguageWords(2) = "badwords3" 
'-------------[ /Array of dirty words ]-----------------------
 For Each I in arrBadLanguageWords 
    strYourString = Replace(strYourString,I," " & String(Len(I) ,"*") & " ") 
 Next 
filtrar = strYourString 
End Function

Podrían mejorarse aspectos como :

1- Sacar las palabras prohibidas de la base de datos.
2- Detectar otras posibles palabras, como número de teléfonos, etc.
3- reemplazar palabras antes y despues de algunas prohibidas (como "arroba")
si el usuario escribe algo como "escribeme a fulano arroba hot mail", debería reemplazar también la palabra fulano, pues, se puede intuir o probar con hotmail, yahoo etc y dar con la dirección.

Si alguien quiere dedicarle un rato de su tiempo a esto y publicarlo sería genial, pues, es por el bien de todos...yo haré mi parte y lo publicaré.

Saludos, Luis