Some functions I often use when I write ASP (2)

'// Filter Torge Function Function Chkbadwords (FString, Badwords) Dim BWORDS BWORDS = Split (Badwords, "|") FString = Replace (Fstring, BWORDS (I), String (Len (BWORDS (I) Regexp Objregexp.Ignorecase = true objRegexp.global = True

ObjregExp.pattern = "(" & Word & ")" strcontent = objRegexp.replace (strcontent, " $ 1 ")