湖南長(zhǎng)沙八年做網(wǎng)站，網(wǎng)絡(luò)優(yōu)化推廣服務(wù)團(tuán)隊(duì)，讓您小投資大回報(bào)，幫您打開網(wǎng)絡(luò)營(yíng)銷財(cái)富之門！
業(yè)務(wù)服務(wù)熱線：0731-88571521 13637482004
用ASP獲取遠(yuǎn)程網(wǎng)頁(yè)的指定內(nèi)容，可以輕易獲取到別人網(wǎng)頁(yè)的指定的某些內(nèi)容，其實(shí)也就是ASP小偷程序原理了，需要的朋友可以參考下。
asp函數(shù)代碼
復(fù)制代碼 代碼如下:
<%
Function RemoveHTML(str)
Dim objRegExp, Match,strHTML
if isnull(str) then
str=""
end if
strHTML=str
strHTML=replace(replace(replace(strHTML,vblf,""),vbcr,""),vbcrlf,"")
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 實(shí)體
"'&(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 代碼運(yùn)行
$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;
?>
存為get.php即可。
咨詢電話：0731-88571521 136-3748-2004