用ASP獲取遠程網頁的指定內容,可以輕易獲取到別人網頁的指定的某些內容,其實也就是ASP小偷程序原理了,需要的朋友可以參考下。
asp函數代碼
復制代碼 代碼如下:
<%
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中的代碼
復制代碼 代碼如下:
<?php
$search = array ("'<script[^>]*?>.*?</script>'si", // 去掉 javascript
"'<style[^>]*?>.*?</style>'si", // 去掉 css
"'<[/!]*?[^<>]*?>'si", // 去掉 HTML 標記
"'<!--[/!]*?[^<>]*?>'si", // 去掉 注釋標記
"'([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.cn');
$out = preg_replace($search, $replace, $document);
echo $out;
?>
存為get.php即可。
長沙科聯環保科技有限公司
長沙科聯環保科技有限公司坐落于國家級長沙經濟技術開發區,星沙工業園、我們以“科技創新,聯合共...南京尚上防腐木
南京尚上防腐木是一家專業致力于加工、制作、銷售戶外景觀防腐木,并為客戶設計安裝一站式服務的現...長沙昱霆機電有限公司
長沙昱霆機電有限公司是長沙空壓機_長沙空壓機保養_湖南空壓機維修_長沙空壓機機頭維修-長沙昱...湖南省土地學會,湖南土地學會,湖南土地學會官網
湖南省土地學會是全省土地科技工作者自愿組成,并依法登記的學術性、非盈利性、公益性的法人社會團...湖南為美環保技術有限公司,醫療污水凈化機組...
湖南為美環保技術有限公司應“綠水青山就是金山銀山”之勢而生,秉持“為民環保,美麗干凈”理想信...長沙租車公司-長沙鑫晨租車
長沙鑫晨租車(長沙租車網)于2008年,已精工細作多年。現以成為長沙地區較早的租車公司之一。...聯系方式
地址:湖南省長沙市天心區韶山南路248號南園503室
電話:13637482004 0731-88571521
網址:http://m.testtao.net/
郵箱:123@123007.com
微信咨詢
掃一掃進移動端