Badwords filter i weblog

Jeg vil gerne lave en funktion hvor jeg kan sortere forskellige ord fra inden en kommentar bliver tilføjet databasen.

jeg har nu en funktion der tjekker om ordet "poker" indgår, og hvis det gør skriver den en advarsel.

den ser således ud:

strTekst = Request.Form("kommentar")


if instr(strTekst, "poker") > 0 then
Response.write ("Du kan ikke skrive ordet ""POKER"" på grund af spam")

Else

.. Update database

End If


Nu vil jeg gerne have bygget lidt videre på den, så jeg kan tilføje flere ord, ala..

badWords = "poker, pis, porno, osv.."

Er der nogle experter der kan hjælpe med det?

På forhånd tak