<%
PublicFunctionUbbCode (StrContent)
Dimre
Setre = newRegexp
re.Innorecase = true
re.global = true
'过滤危险脚本
re.Pattern = "(</script>)"
StrContent = re.Replace (StrContent, "</script>")
Re.Pattern = "(Skript :)"
StrContent = Re.Replace (StrContent, "Skript:")
Re.Pattern = "(Skript)"
StrContent = Re.Replace (StrContent, "Skript")
re.Pattern = "(js :)"
StrContent = Re.Replace (StrContent, "JS:")
Re.Pattern = "(Wert)"
StrContent = Re.Replace (StrContent, "Wert")
re.Pattern = "(über :)"
StrContent = Re.Replace (StrContent, "über:")
re.Pattern = "(Datei :)"
StrContent = Re.Replace (StrContent, "Datei:")
re.Pattern = "(document.cookie)"
StrContent = Re.Replace (StrContent, "documents.cookie")
Re.Pattern = "(VBS :)"
StrContent = Re.Replace (StrContent, "VBS:")
re.Pattern = "(on (Maus | Beenden | Fehler | Klick | Taste)") "
StrContent = Re.Replace (StrContent, "auf $ 2")
re.pattern = "<img. [^>]*src (= |) (. [^>]*)>"
'StrContent = re.Replace (StrContent, "<imgsrc = $ 2onclick =" "JavaScript: window.open (this.src);" style = "" cursor: pointer "" border = "" 0 ">")
StrContent = re.Replace (StrContent, "<imgsrc = $ 2border =" "0" ">")
're.Pattern = "<img (. [^>]*)>"
'StrContent = Re.Replace (StrContent, "<img $ 1onload =" "returnImgzoom (this, 550)" ">")
