<% Dim finalKeysToHighLite:finalKeysToHighLite = replace(CheckDelimitedFormat(replace(replace(key&"",",","|"),"/",""),"|"),"|","|\b") Dim finalBadWordToBan:finalBadWordToBan = replace(CheckDelimitedFormat(replace(Application(dbName&"wordFilter")&"","/",""),"|"),"|","|\b") %> function highlite(str){ <% if len(finalKeysToHighLite)=0 or (lcase(language&"")<>"single" and lcase(language&"")<>"double") then %> return str; <% Else %> var re = /(<%= "\b"&finalKeysToHighLite %>)/gi str = str.replace(re,"$1"); return str; <% End If %> } function replaceBadWords(str){ <% if len(finalBadWordToBan)=0 then %> return str; <% Else %> var re = /(<%= "\b"&finalBadWordToBan %>)/gi str = str.replace(re,"[s][i]$1[/i][/s]"); return str; <% End If %> }