湖南長沙八年做網站,網絡優化推廣服務團隊,讓您小投資大回報,幫您打開網絡營銷財富之門!
 業務服務熱線:0731-88571521  13637482004  
 


地址:長沙市韶山南路248號南園503
      室(瀟湘晨報旁)
電話:0731-88571521
手機:136-3748-2004
Q  Q:44377655 522392221
網址:www.2633555.live
郵箱:[email protected]
建站知識
長沙做網站聯系電話:0731-88571521 13637482004

做網站中 asp獲取遠程網頁的指定內容的實現代碼

信息來源:長沙個人做網站   發布時間:2010-11-3   瀏覽:

用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.com.cn');
$out = preg_replace($search, $replace, $document);
echo $out;
?>

存為get.php即可。



相關熱點文章


地址:長沙市韶山南路248號南園503室(瀟湘晨報旁)  網站ICP備案號:湘ICP備09008272號  版權所有:長沙斌網網絡工作室
咨詢電話:0731-88571521   136-3748-2004
業務 QQ:客服一 1306053142 客服二 1320506001 技術/售后 522392221 高級顧問 44377655
服務郵箱:[email protected]   [email protected]
官方網址:www.2633555.live   www.pk0731.com
旗下網站:斌網網絡  長沙信息處  佛佛網  曬土貨網

澳通金服配资