<%
PublicFunctionubBcode (Strcontent)
Dimre
Setre = newregexp
re.ignorecase = true
re.global = true
'过滤危险脚本
re.pattern = "(</script>)"
strcontent = re.replace (strcontent, "</cript>")
re.pattern = "(skrip :)"
strcontent = re.replace (strcontent, "skrip:")
re.pattern = "(skrip)"
strcontent = re.replace (strcontent, "skrip")
re.pattern = "(js :)"
strcontent = re.replace (strcontent, "js:")
re.pattern = "(nilai)"
strcontent = re.replace (strcontent, "value")
re.pattern = "(tentang :)"
strcontent = re.replace (strcontent, "tentang:")
re.pattern = "(file :)"
strcontent = re.replace (strcontent, "file:")
re.pattern = "(document.cookie)"
strcontent = re.replace (strcontent, "documents.cookie")
re.pattern = "(VBS :)"
strcontent = re.replace (strcontent, "vbs:")
re.pattern = "(on (mouse | Exit | error | klik | key))"
strcontent = re.replace (strcontent, "on $ 2")
re.pattern = "<img. [^>]*src (= |) (. [^>]*)>"
'strcontent = re.replace (strcontent, "<imgsrc = $ 2Onclick =" "JavaScript: window.open (this.src);" "style =" "" Kursor: pointer "" border = "" "" ")
strcontent = re.replace (strcontent, "<imgsrc = $ 2border =" "0" ">")
're.pattern = "<img (. [^>]*)>"
'strcontent = re.replace (strcontent, "<img $ 1onload =" "returnimgzoom (ini, 550)" ">")
