Funktion zum Filtern unzivilisierter Zeichen im ASP-Programm
<%
Funktion cutbadchar(str)
badstr = unzivilisierte |. Zeichen |
badword=split(badstr,|)
Für i=0 bis Ubound(badword)
Wenn instr(str,badword(i)) > 0 dann
str=Replace(str,badword(i),***)
Ende wenn
Nächste
cutbadchar=str
Funktion beenden
%>