Función para filtrar personajes incivilizados en programa asp.
<%
Función cutbadchar(cadena)
badstr = incivilizado | caracteres | columnas | formatos |
mala palabra=split(badstr,|)
Para i=0 a Ubound(palabra incorrecta)
Si instr(str,badword(i)) > 0 entonces
str=Reemplazar(str,palabramala(i),***)
Terminar si
Próximo
cutbadchar=cadena
Función final
%>