色狠久久av北条麻妃081-国产一级一级va-日日干天天-欧美拍拍视频免费大全-99精品欧美一区二区三区小说-国产视频aa-亚洲一区二区色情苍井空-日韩精品中文字幕在线播放-久草国产精品-www.欧美黄-两根大肉大捧一进一出好爽视频-欧美91精品久久久久国产性生爱-一级国产片-国产精品久久久久久99-成人免费看黄色片-青青在线久青草免费观看

Set objRegExp = New Regexp
objRegExp.IgnoreCase = True
objRegExp.Global = True

objRegExp.Pattern = "<script[^>]*?>.*?</script>"
strHTML = objRegExp.Replace(strHTML,"")

objRegExp.Pattern = "<style[^>]*?>.*?</style>"
strHTML = objRegExp.Replace(strHTML,"")

objRegExp.Pattern = "<.+?>"
strHTML = objRegExp.Replace(strHTML,"")

Set objRegExp = Nothing

RemoveHTML=strHTML
End Function
%>

php中的代碼
復(fù)制代碼 代碼如下:
<?php
$search = array ("'<script[^>]*?>.*?</script>'si", // 去掉 javascript
"'<style[^>]*?>.*?</style>'si", // 去掉 css
"'<[/!]*?[^<>]*?>'si", // 去掉 HTML 標(biāo)記
"'<!--[/!]*?[^<>]*?>'si", // 去掉 注釋標(biāo)記
"'([rn])[s]+'", // 去掉空白字符
"'&(quot|#34);'i", // 替換 HTML 實體
"'&(amp|#38);'i",
"'&(lt|#60);'i",
"'&(gt|#62);'i",
"'&(nbsp|#160);'i",
"'&(iexcl|#161);'i",
"'&(cent|#162);'i",
"'&(pound|#163);'i",
"'&(copy|#169);'i",
"'&#(d+);'e"); // 作為 PHP 代碼運行

$replace = array ("",
"",
"",
"",
"\1",
"\"",
"&",
"<",
">",
" ",
chr(161),
chr(162),
chr(163),
chr(169),
"chr(\1)");
//$document為需要處理字符串，如果來源為文件可以$document = file_get_contents('http://www.sina.com.cn');
$out = preg_replace($search, $replace, $document);
echo $out;
?>