filtrare parolaccie in testi

[stewe19]

Ciao a tutti!

volevo sapere come si puo fare a filtrare i messaggi che vengono scritti e inseriti in db....
nel senso che voglio togliere tutte le parolaccie e magari modificarle con xxx tipo cxxo trxxa....
esiste uno script particolare?

[optime]

direi di andare di replace, e soprattutto direi che è fondamentale conoscere l'itaGLiano

parolaccIe ???? VVoVe:

[stewe19]

aaaaaaa che figura di mxxa!!!

comunque ok ho trovato quello che fa per me!

grazie!

[optime]

dillo a tutti cos'hai trovato!

[stewe19]

a scusa comunque il codice è questo:

<%
words = Array("cretino","stupido","imbecille"...e altre che ho omesso..)
stringa = request("testo")
For k = LBound(words) To UBound(words)
stringa = Replace(stringa, words(k), String(Len(words(k)),"*"))
Next
badWords = stringa
%>

pero' con questo script mi sostituisce tutte le lettere con * e non mi lascia le lettere visibili agli estremi.

[optime]

stringa = Replace(stringa, words(k), left(words(k),1) & String(Len(words(k)-2),"*") & right(words(k),1))

[stewe19]

Microsoft VBScript runtime error '800a000d'

Type mismatch: 'words(...)'

/public/guest.asp, line 35

mi da errore nella stringa che hai modificato

[optime]

non è che hai una words(k) vuota? fattele stampare

[stewe19]

nono non è vuoto me le stampa e cmq con l'altro codice funziona

[optime]

basta UN elemento vuoto. comunque, metti una IF di controllo