程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 網頁編程 >> PHP編程 >> 關於PHP編程 >> php goolge pr值檢測程序

php goolge pr值檢測程序

編輯:關於PHP編程

這是一款用來檢測網站pr值的源碼了,下載後直接就會可以使用的哦。

這是一款用來檢測網站pr值的源碼了,下載後直接就會可以使用的哦。

function my_file_get_contents($url, $timeout=30) {
 if ( function_exists('curl_init') ) {
  $ch = curl_init();
  curl_setopt ($ch, CURLOPT_URL, $url);
  curl_setopt ($ch, CURLOPT_RETURNTRANSFER, 1);
  curl_setopt ($ch, CURLOPT_CONNECTTIMEOUT, $timeout);
  $file_contents = curl_exec($ch);
  curl_close($ch);
 } else if ( ini_get('allow_url_fopen') == 1 || strtolower(ini_get('allow_url_fopen')) == 'on' ) {
  $file_contents = @file_get_contents($url);
 } else {
  $file_contents = '';
 }
 return $file_contents;
}

// 開始檢查
if( isset($_GET['mod']) && $_GET['mod'] == 'check_now' && isset($_GET['id']) && isset($_GET['my_url']) && isset($_GET['url']) && isset($_GET['auto_check']) ){
 $js_id = 'parent.document.getElementById("s_' . $_GET['id'] . '").innerHTML';
 if( strstr($_GET['url'],$_GET['my_url']) ) {
   echo '<script>' . $js_id . ' = "內部鏈接";</script>';

 } else if( !stristr($_GET['url'],'http://') ) {
   echo '<script>' . $js_id . ' = "錯誤鏈接";</script>';
 } else {
  $s = my_file_get_contents($_GET['url']);

  if( trim($s) == '' ){
   echo '<script>' . $js_id . ' = "抓取內容失敗";</script>';
  } else  if( stristr($s,$_GET['my_url']) ){
   echo '<script>' . $js_id . ' = "<font color=green>包含鏈接,檢查通過</font>";</script>';
  } else {
   echo '<script>' . $js_id . ' = "<font color=red>沒有找到鏈接,請核查</font>";</script>';
  }
 }

 if($_GET['auto_check']==1){
  echo '<script>parent.checkLink(' . ($_GET['id']+1) . ');</script>';
 }

 exit('<br />done!');
 
}
?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
 <head>
  <title>《做網站》友情鏈接自動檢查程序</title>
  <meta name="generator" content="editplus" />
  <meta name="author" content="www.zuowangzhang.com.cn" />
 
  <meta name="description" content="我們很BS這樣的人,當時雙方都交換了首頁鏈接,但對方卻隨意取消和您交換的友情鏈接(即對方去掉您網站的鏈接,而您卻還保留了它的鏈接)有了本程序,您可以快速、自動的檢查您的友情鏈接網址,查看對方的網站是否去掉了您的鏈接。" />
 <style>
body,td{font-size:9pt;font-family:arial;}
a:link,a:visited{color:blue;}
a:hover{color:red;}

A.black:link,A.black:visited{color:black;text-decoration: none;}

.main_tb {width:580px;}
.main_tb .tb_title {background-color: #CCFFFF;}
.main_tb .tr_title {background-color: #A6D9D2;height:40px;}

</style>
<base target=_blank></base>
 </head>

 <body>
<iframe src="about:blank" width=0  height=0 name="hidden_iframe" id="hidden_iframe"></iframe>

<script type="text/javascript">
<!--
my_url = '';
checking_str = "正在檢查...";
check_time_out = 25000;
auto_check = 0;


function checkZuoWangZhang() {
 var all_code = window.frames["zuoWangZhang.com.cn"].document.body.innerHTML;
 if(all_code.indexOf('http://') ==-1){
  alert("請直接將您網站的文字和圖片鏈接復制Ctrl+c,粘貼Ctrl+v進來 ");
  return false;
 }
 if(f.my_url.value.indexOf('.') ==-1){
  alert("請輸入您的網站首頁地址");
  return false;
 }

 if(f.my_url.value.indexOf('http://') ==-1){
  f.my_url.value = 'http://' + f.my_url.value;
 }

 if( f.my_url.value.substr(f.my_url.value.length-1,1) == '/' ) {
  f.my_url.value = f.my_url.value.substr(0,f.my_url.value.length-1);
 }

 f.html_code.value = all_code;
 return true;
}

function checkTimeout(id) {
 if(document.getElementById('s_'+id).innerHTML!=checking_str){
  return false;
 }
 document.getElementById('s_'+id).innerHTML = "可能超時,<a href='#' onclick='return checkLink("+id+");'>重新檢查</a>";

 if(auto_check==1){
  checkLink((id+1));
 }
 return true;
}

function checkLink(id) {
 if(document.getElementById('s_'+id)==null){
  auto_check = 0;
  return false;
 }
 if( auto_check==1 && document.getElementById('s_'+id).innerHTML.indexOf('超時')!=-1 ){
  alert("請等自動檢查全部結束以後,再進行操作!");
  return false;
 }
 document.getElementById('hidden_iframe').src = 'check_links.php?mod=check_now&url=' + escape(document.getElementById('u_'+id).href) + '&id=' + id + '&my_url='+ escape(my_url) + '&auto_check=' + auto_check + '';

 document.getElementById('s_'+id).innerHTML = checking_str;

 setTimeout("checkTimeout("+id+")",check_time_out);

 return false;
}

function autoCheckLink(id) {
 checkLink(id);
 //setTimeout("checkLink("+(id+1)+")",(check_time_out+1000));
}
//-->
</script>

 

<center>
<h4>友情鏈接自動檢查程序</h4>
我們很BS這樣的人,當時雙方都交換了首頁鏈接,但對方卻隨意取消和您交換的友情鏈接(即對方去掉您網站的鏈接,而您卻還保留了它的鏈接)
<br />&nbsp;<br />
有了本程序,您可以快速、自動的檢查您的友情鏈接網址,查看對方的網站是否去掉了您的鏈接。

<br />

<?php

// 顯示獲取到的鏈接地址
if( isset($_POST['html_code']) && isset($_POST['my_url']) ){
 
 preg_match_all("/<a[strn]{1,}[^<]{0,}href=["']{0,}(https?://.*)[strn"'>]{1,}/isU",stripslashes($_POST['html_code']),$ary);

 if( isset($ary[1]) && count($ary[1])>0 ){
  echo '<table bordercolordark="#ffffff" align="center" bordercolorlight="#000000" border="1"  cellspacing="0" cellpadding="4" class=main_tb><tr><td colspan=10 class=tb_title> <font size="4" ><b>開始檢查</b></font>
  <br />
   檢查下列網址是否包含有 <font color=green>' . $_POST['my_url'] . '</font> 的鏈接
  </td></tr>
  <tr class=tr_title>
   <td>序號</td>
   <td align=left>被檢查的網址</td>
   <td >檢查結果</td>
   </tr>
  ';
  for($i=0; $i<count($ary[1]); $i++){
   
   $check_str = ($_POST['auto_check']==0) ? '<a href="#" onclick="return checkLink(' . $i . ');">開始檢查</a>' : '<font color=gray>等待中...</font>';

   echo '<tr>
   <td>' . ($i+1) . '.</td>
   <td align=left><a href="' . $ary[1][$i] . '" id=u_' . $i . '  target=_blank>' . $ary[1][$i] . '</a></td>
   <td id=s_' . $i . '>' . $check_str . '</td>
   </tr>';

   if($i>$max_allow_links){
    break;
   }
  }
  echo '</table>';
 }
 echo '<script>my_url="' . trim($_POST['my_url']) . '";auto_check=' . (int)$_POST['auto_check'] . ';</script>';

 if( $_POST['auto_check']==1 ){
  echo '<script>autoCheckLink(0);</script>';
 }
 
}

?>
 

<form method="post" action="check_links.php" name="formZuoWangZhang" target=_top>

必須包含地址(自己網站首頁):<input type="text" name="my_url" size=50 value="<?php if(isset($_POST['my_url'])){echo $_POST['my_url'];}?>" />
<br />
自動或手工檢查:<select name="auto_check"><option value=1>自動</option><option value=0>手工</option></select>
<br />&nbsp;<br />
要檢查的網站(下面是可視化輸入框,請直接將文字鏈接和圖片鏈接復制,粘貼 到下面即可):<br />
<iframe id="zuoWangZhang.com.cn" name="zuoWangZhang.com.cn" height="150" width="600" style="padding:0px;"></iframe>
<script>window.frames["zuoWangZhang.com.cn"].document.designMode="On";</script>

 

<br />&nbsp;<br />
<input type="hidden" name="html_code" />

 

<table width=600>
 <tr>
  <td width=100 align=center>&nbsp;</td>
  <td width=400 align=center><input type="submit" onclick="return checkZuoWangZhang();" value="  開始檢查  " /></td>
  <td width=100 align=right><a href=# onclick="return setTestLinks(this);">載入測試數據</a>
</td>
 </tr>
</table>
 
<br />&nbsp;<br />

如果您不知道怎麼開始,請點擊 <a href=# onclick="return setTestLinks(this);">載入測試數據</a>,然後點擊 <input type="submit" onclick="return checkZuoWangZhang();" value="開始檢查" style="height:19px;" /> 查看演示

<br />&nbsp;<br />&nbsp;<br />&nbsp;<br />

<!-- 歡迎轉載,但請保留下面的文字和鏈接,修改鏈接會被BS,謝謝合作 -->

本程序由《<A HREF="http://www.ZuoWangZhanG.com.cn/" class=black>做網站</a>》原創,完全開源!<a href="http://www.zuowangzhang.com.cn/download/check_links.zip">下載</a>
<br />&nbsp;<br />歡迎各位轉載,但請保留<A HREF="http://www.ZuoWangZhang.com.cn/ZuoWangZhan/RuHeZuoWangZhan/"  class=black>如何做網站</a>的文字,謝謝!

<br />&nbsp;<br />

歡迎您 <a href="http://www.zuowangzhang.com.cn/hbcms/user/add_msg.php?to_user_id=1&to_user_name=網站管理員" target=_blank>給作者提出反饋意見</a>,我會不斷的改善它,推出更好用的版本。

</form>
<script type="text/javascript">
f = document.formZuoWangZhang;
</script>


</center>

<?php
if(isset($_POST['html_code'])){
 echo '
 <div id=old_links style="display:none;">
 ' . stripslashes($_POST['html_code']) . '
 </div>
 <script type="text/javascript">

 function setOldLinks() {

  window.frames["zuoWangZhang.com.cn"].document.body.innerHTML = document.getElementById("old_links").innerHTML;
  document.getElementById("old_links").innerHTML = "";
 }
 setTimeout("setOldLinks()",3000);

 </script>';
 
}
 
?>


<p>&nbsp;</p>

 

 

 

 

 


<span id=test_links>

<TABLE align=center  cellpadding='1' cellspacing='0' style="font-size:9pt;">
<TR >
 <TD colspan="6">
我的友情連接:
</td><TD colspan=2>
<div align=right>
</td></tr><tr>
<!-- 文字鏈接 -->
 <td>
 <A HREF="http://www.hao123.com/">Hao123
 </td>
   <td>
 <A HREF="http://www.265.com/">265
 </td>
   <td>
 <A HREF="http://site.baidu.com/">百度網址
 </td>
   <td>
 <A HREF="http://www.zuoWANGZHANG.com.cn/">建網站</a>
 </td>
   <td>
 <a class="l" href="http://site.yahoo.com.cn/" target="_blank">雅虎網址</a>
 
 </td>
   <td>
 <A HREF="http://www.baidu.com/">baidu
 </td>

   <td>
<a  href="http://daohang.google.cn/" target="_blank">Google導航</a>
 </td>  
  </tr>

<!-- 圖片鏈接 -->
<tr>

 
   <td>
 <A HREF="http://www.lian123.com/"><img src="http://cn.yimg.com/sp/yahoohp060323/logo_yahoo.gif" width=88 height=31 border=0  ></A>
 </td>
   <td>
 <A HREF="http://www.yisou.com/"><img src="http://static.php.net/www.php.net/images/logos/php-power-white.gif" width=88 height=31 border=0 ></A>
 </td>
   <td>
 <A HREF="http://www.google.cn/"><img src="http://www.mysql.com/common/logos/mysql_100x52-64.gif" width=88 height=31 border=0  ></A>
 </td>
 <td>
 
   <td>
 <A HREF="http://www.jipiaojiage.cn/"><img src="http://image2.sina.com.cn/home/images/sina_logo2.gif" width=88 height=31 border=0  ></A>
 </td>
   <td>
 <A HREF="http://www.google.com/"><img src="http://www.google.com/logos/lunarnewyear03.gif" width=88 height=31 border=0 alt="谷歌Google"></A>
 </td>
  <td>
 <a class="l"   href="http://123.sogou.com/" target="_blank">搜狗網址</a>
 </td>
  </tr>
  <tr><td colspan=10>
其他測試鏈接:
<a href="http://www.163.com/">163內部鏈接測試</a>
  </td></tr>
</TABLE>

 

</span>


<script type="text/javascript">
<!--

document.write('<sty'+'le>#te'+'st_li'+'nks {disp'+'lay:no'+'ne;}</sty'+'le>');
function setTestLinks(t) {
 window.frames["zuoWangZhang.com.cn"].document.body.innerHTML = document.getElementById('test_links').innerHTML;

 document.getElementById('test_links').innerHTML = '';

 f.my_url.value = 'http://www.111cn.cn/';
 return false;
}

 
 
 
//-->
</script>
演示地地址:

http://tool.111cn.cn/pr/pr.php


  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved