php獲取訪(fǎng)客所在城市名稱(chēng)代碼-創(chuàng)新互聯(lián)
php獲取訪(fǎng)客所在城市名稱(chēng)代碼，采用純真QQ IP數(shù)據(jù)庫(kù)，想要使用最新版IP數(shù)據(jù)庫(kù)可到純真官網(wǎng)獲取。
純真IP數(shù)據(jù)庫(kù)官網(wǎng)：http://www.cz88.net/
將下載的IP數(shù)據(jù)庫(kù)文件替換壓縮包中的qqwry.dat文件即可。
壓縮包下載：php獲取訪(fǎng)客所在城市名稱(chēng)代碼
代碼如下：
$ip=getip(); $area=convertip($ip); $city = explode(" ",$area); header('Content-type: text/javascript;charset=gb2312'); echo "document.write('".$city[0]."')"; //echo "document.write('您好，來(lái)自".$city[0]."的朋友')";代碼中封裝了兩個(gè)函數(shù)，分別是getip()和convertip($ip)，其中g(shù)etip()函數(shù)的功能是獲取當(dāng)前訪(fǎng)客的IP地址，convertip($ip)函數(shù)為獲取訪(fǎng)客的所在地名稱(chēng)，傳入的參數(shù)$ip為使用getip()獲取到的IP地址。
完整代碼：
$ipNum || $ip2num<$ipNum) { $Middle= intval(($EndNum + $BeginNum) / 2); //偏移指針到索引位置讀取4個(gè)字節(jié) fseek($fd, $ipbegin + 7 * $Middle); $ipData1 = fread($fd, 4); if(strlen($ipData1) < 4) { fclose($fd); return 'System Error'; } //提取出來(lái)的數(shù)據(jù)轉(zhuǎn)換成長(zhǎng)×××，如果數(shù)據(jù)是負(fù)數(shù)則加上2的32次冪 $ip1num = implode('', unpack('L', $ipData1)); if($ip1num < 0) $ip1num += pow(2, 32); //提取的長(zhǎng)整型數(shù)大于我們IP地址則修改結(jié)束位置進(jìn)行下一次循環(huán) if($ip1num > $ipNum) { $EndNum = $Middle; continue; } //取完上一個(gè)索引后取下一個(gè)索引 $DataSeek = fread($fd, 3); if(strlen($DataSeek) < 3) { fclose($fd); return 'System Error'; } $DataSeek = implode('', unpack('L', $DataSeek.chr(0))); fseek($fd, $DataSeek); $ipData2 = fread($fd, 4); if(strlen($ipData2) < 4) { fclose($fd); return 'System Error'; } $ip2num = implode('', unpack('L', $ipData2)); if($ip2num < 0) $ip2num += pow(2, 32); //沒(méi)找到提示未知 if($ip2num < $ipNum) { if($Middle == $BeginNum) { fclose($fd); return 'Unknown'; } $BeginNum = $Middle; } } //下面的代碼讀暈了，沒(méi)讀明白，有興趣的慢慢讀 $ipFlag = fread($fd, 1); if($ipFlag == chr(1)) { $ipSeek = fread($fd, 3); if(strlen($ipSeek) < 3) { fclose($fd); return 'System Error'; } $ipSeek = implode('', unpack('L', $ipSeek.chr(0))); fseek($fd, $ipSeek); $ipFlag = fread($fd, 1); } if($ipFlag == chr(2)) { $AddrSeek = fread($fd, 3); if(strlen($AddrSeek) < 3) { fclose($fd); return 'System Error'; } $ipFlag = fread($fd, 1); if($ipFlag == chr(2)) { $AddrSeek2 = fread($fd, 3); if(strlen($AddrSeek2) < 3) { fclose($fd); return 'System Error'; } $AddrSeek2 = implode('', unpack('L', $AddrSeek2.chr(0))); fseek($fd, $AddrSeek2); } else { fseek($fd, -1, SEEK_CUR); } while(($char = fread($fd, 1)) != chr(0)) $ipAddr2 .= $char; $AddrSeek = implode('', unpack('L', $AddrSeek.chr(0))); fseek($fd, $AddrSeek); while(($char = fread($fd, 1)) != chr(0)) $ipAddr1 .= $char; } else { fseek($fd, -1, SEEK_CUR); while(($char = fread($fd, 1)) != chr(0)) $ipAddr1 .= $char; $ipFlag = fread($fd, 1); if($ipFlag == chr(2)) { $AddrSeek2 = fread($fd, 3); if(strlen($AddrSeek2) < 3) { fclose($fd); return 'System Error'; } $AddrSeek2 = implode('', unpack('L', $AddrSeek2.chr(0))); fseek($fd, $AddrSeek2); } else { fseek($fd, -1, SEEK_CUR); } while(($char = fread($fd, 1)) != chr(0)){ $ipAddr2 .= $char; } } fclose($fd); //最后做相應(yīng)的替換操作后返回結(jié)果 if(preg_match('/http/i', $ipAddr2)) { $ipAddr2 = ''; } $ipaddr = "$ipAddr1 $ipAddr2"; $ipaddr = preg_replace('/CZ88.Net/is', '', $ipaddr); $ipaddr = preg_replace('/^s*/is', '', $ipaddr); $ipaddr = preg_replace('/s*$/is', '', $ipaddr); if(preg_match('/http/i', $ipaddr) || $ipaddr == '') { $ipaddr = 'Unknown'; } return $ipaddr; } $ip=getip(); $area=convertip($ip); $city = explode(" ",$area); header('Content-type: text/javascript;charset=gb2312'); echo "document.write('".$city[0]."')"; //echo "document.write('您好，來(lái)自".$city[0]."的朋友')"; ?>另外有需要云服務(wù)器可以了解下創(chuàng)新互聯(lián)cdcxhl.cn，海內(nèi)外云服務(wù)器15元起步，三天無(wú)理由+7*72小時(shí)售后在線(xiàn)，公司持有idc許可證，提供“云服務(wù)器、裸金屬服務(wù)器、高防服務(wù)器、香港服務(wù)器、美國(guó)服務(wù)器、虛擬主機(jī)、免備案服務(wù)器”等云主機(jī)租用服務(wù)以及企業(yè)上云的綜合解決方案，具有“安全穩(wěn)定、簡(jiǎn)單易用、服務(wù)可用性高、性?xún)r(jià)比高”等特點(diǎn)與優(yōu)勢(shì)，專(zhuān)為企業(yè)上云打造定制，能夠滿(mǎn)足用戶(hù)豐富、多元化的應(yīng)用場(chǎng)景需求。
本文題目：php獲取訪(fǎng)客所在城市名稱(chēng)代碼-創(chuàng)新互聯(lián)
轉(zhuǎn)載來(lái)于：http://m.jiaotiyi.com/article/hgsdd.html