Fonction pour filtrer les caractères non civilisés dans le programme asp
<%
Fonction cutbadchar(str)
badstr = caractères non civilisés | formats de colonnes |
mauvais mot=split(badstr,|)
Pour i = 0 à Ubound (mauvais mot)
Si instr(str,badword(i)) > 0 alors
str=Remplacer(str,mauvais mot(i),***)
Fin si
Suivant
cutbadchar=str
Fonction de fin
%>