清华大佬耗费三个月吐血整理的几百G的资源,免费分享!....>>>
'清除HTML代码 function clearhtml(content) content=replacehtml("&#[^>]*;","",content) content=replacehtml("</?marquee[^>]*>","",content) content=replacehtml("</?object[^>]*>","",content) content=replacehtml("</?param[^>]*>","",content) content=replacehtml("</?embed[^>]*>","",content) content=replacehtml("</?table[^>]*>","",content) content=replacehtml(" ","",content) content=replacehtml("</?tr[^>]*>","",content) content=replacehtml("</?th[^>]*>","",content) content=replacehtml("</?p[^>]*>","",content) content=replacehtml("</?a[^>]*>","",content) content=replacehtml("</?img[^>]*>","",content) content=replacehtml("</?tbody[^>]*>","",content) content=replacehtml("</?li[^>]*>","",content) content=replacehtml("</?span[^>]*>","",content) content=replacehtml("</?div[^>]*>","",content) content=replacehtml("</?th[^>]*>","",content) content=replacehtml("</?td[^>]*>","",content) content=replacehtml("</?script[^>]*>","",content) content=replacehtml("(javascript|jscript|vbscript|vbs):","",content) content=replacehtml("on(mouse|exit|error|click|key)","",content) content=replacehtml("<\\?xml[^>]*>","",content) content=replacehtml("<\/?[a-z]+:[^>]*>","",content) content=replacehtml("</?font[^>]*>","",content) content=replacehtml("</?h[^>]*>","",content) content=replacehtml("</?u[^>]*>","",content) content=replacehtml("</?i[^>]*>","",content) content=replacehtml("</?center[^>]*>","",content) content=replacehtml("</?center[^>]*>","",content) content=replacehtml("</?nobr[^>]*>","",content) content=replacehtml("</?clk[^>]*>","",content) content=replacehtml("</?muti[^>]*>","",content) content=replacehtml("</?/option[^>]*>","",content) content=replacehtml("</?o[^>]*>","",content) content=replacehtml("</?strong[^>]*>","",content) clearhtml=content end function