<rt id="tf2wb"><bdo id="tf2wb"><kbd id="tf2wb"></kbd></bdo></rt>
    1. <button id="tf2wb"><thead id="tf2wb"></thead></button>

      <rp id="tf2wb"><bdo id="tf2wb"></bdo></rp>
      <delect id="tf2wb"><td id="tf2wb"></td></delect>
      <rt id="tf2wb"></rt>
      <rt id="tf2wb"><bdo id="tf2wb"></bdo></rt>
    2. 企業(yè)與個(gè)人網(wǎng)絡(luò )營(yíng)銷(xiāo)一站式服務(wù)商
      網(wǎng)站建設 / SEO優(yōu)化排名 / 小程序開(kāi)發(fā) / OA
      0731-88571521
      136-3748-2004
      做網(wǎng)站中 asp獲取遠程網(wǎng)頁(yè)的指定內容的實(shí)現代碼
      信息來(lái)源:長(cháng)沙個(gè)人做網(wǎng)站   發(fā)布時(shí)間:2010-11-3   瀏覽:

      用ASP獲取遠程網(wǎng)頁(yè)的指定內容,可以輕易獲取到別人網(wǎng)頁(yè)的指定的某些內容,其實(shí)也就是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 實(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 代碼運行

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

      存為get.php即可。




      上一條: 做企業(yè)網(wǎng) 網(wǎng)站設計成功要素之一
      下一條: 網(wǎng)站制作公司與企業(yè)客戶(hù)互動(dòng)流程
      案例鑒賞
      多年的網(wǎng)站建設經(jīng)驗,斌網(wǎng)網(wǎng)絡(luò )不斷提升技術(shù)設計服務(wù)水平,迎合搜索引擎優(yōu)化規則
      法律法規
      多年的網(wǎng)站建設經(jīng)驗,網(wǎng)至普不斷提升技術(shù)設計服務(wù)水平,迎合搜索引擎優(yōu)化規則
      長(cháng)沙私人做網(wǎng)站    長(cháng)沙做網(wǎng)站    深圳網(wǎng)站建設    株洲做網(wǎng)站    東莞做網(wǎng)站    南京防腐木    湖南大拇指養豬設備    株洲做網(wǎng)站    
      版權所有 © 長(cháng)沙市天心區斌網(wǎng)網(wǎng)絡(luò )技術(shù)服務(wù)部    湘公網(wǎng)安備 43010302000270號  統一社會(huì )信用代碼:92430103MA4LAMB24R  網(wǎng)站ICP備案號:湘ICP備13006070號-2  
      国产精品久久久久精品|久久网国产精品色婷婷免费|国产另类小说 视频 中文字幕|亚洲欧洲日产国码在线|2020最新国产在线不卡A|无码人妻少妇久久中文字幕蜜|99国产一区二区精品久久

          <rt id="tf2wb"><bdo id="tf2wb"><kbd id="tf2wb"></kbd></bdo></rt>
        1. <button id="tf2wb"><thead id="tf2wb"></thead></button>

          <rp id="tf2wb"><bdo id="tf2wb"></bdo></rp>
          <delect id="tf2wb"><td id="tf2wb"></td></delect>
          <rt id="tf2wb"></rt>
          <rt id="tf2wb"><bdo id="tf2wb"></bdo></rt>