狠狠色丁香婷婷综合尤物/久久精品综合一区二区三区/中国有色金属学报/国产日韩欧美在线观看 - 国产一区二区三区四区五区tv

[p]function html2ubb(str)[br] if str<>"" and not isnull(str) then[br] dim re[br] set re=new regexp[br] re.ignorecase =true[br] re.global=true[br] re.pattern="(on(load|click|dbclick|mouseover|mouseout|mousedown|mouseup|mousewheel|keydown|submit|change|focus)=""[^""]+"")"[br] str = re.replace(str, "")[br] re.pattern="((name|id|class)=""[^""]+"")"[br] str = re.replace(str, "")[br] re.pattern = "(]*?>([\w\w]*?)<\/s+cript>)"[br] str = re.replace(str, "")[br] re.pattern = "(]*?>([\w\w]*?)<\/iframe>)"[br] str = re.replace(str, "")[br] re.pattern = "(

 <\/p>)"[br] str = re.replace(str, "")[br] 're.pattern = "<(\w*) class\s*=\s*([^>|\s]*)([^>]*)>"[br] 'str = re.replace(str,"<$1$3>")[br] set re=nothing[br] html2ubb = str[br] else[br] html2ubb = ""[br] end if[br]end function [/p]

該文章在 2010/3/6 12:15:21 編輯過