監(jiān)理公司管理系統(tǒng) | 工程企業(yè)管理系統(tǒng) | OA系統(tǒng) | ERP系統(tǒng) | 造價咨詢管理系統(tǒng) | 工程設(shè)計管理系統(tǒng) | 甲方項目管理系統(tǒng) | 簽約案例 | 客戶案例 | 在線試用
X 關(guān)閉
株洲網(wǎng)站建設(shè)公司

當(dāng)前位置:工程項目OA系統(tǒng) > 泛普各地 > 湖南OA系統(tǒng) > 株洲OA > 株洲網(wǎng)站建設(shè)公司

純代碼實現(xiàn)WordPress評論者顯示地理位置

申請免費試用、咨詢電話:400-8352-114

相信經(jīng)常到博客的朋友可能注意到了最近把評論者的地理位置顯示出來了,前兩天也有朋友問是如何實現(xiàn)的,以前使用Pjblog的時候就使用過評論者顯示地理位置,最近也研究了下如何在WordPress下實現(xiàn)評論者地理位置的問題,找了相關(guān)資料,可以利用插件實現(xiàn),可是筆者一貫就是能不用插件則不用插件,所以就找了許多相關(guān)資料。

下面給大家分享下WordPress評論者利用純代碼實現(xiàn)添加地址位置及所處網(wǎng)絡(luò)的功能,下面是這個功能的截圖:

第一步: 下載一個IP 數(shù)據(jù)庫 QQWry.Dat 文件放到正在使用主題的根目錄下,下面大蔥給大家提供下載地址,大家也可以百度或Google、搜狗這些搜索引擎搜索下最新數(shù)據(jù)的,記住是上傳到主題根目錄:

http://www.congblog.cn/url/aHR0cDovL3hhLmN0ZnMuZnRuLnFxLmNvbS9mdG5faGFuZGxlci9lZjMwYjVkMGM1ZWU3YTFkY2E1NzcwOWEwOWRkZjI5NDM0YmNmOTI3OWMwY2IzNWUxZWE2NzQ3MWUzZWQ0NzgyM2JiNTYyYjNkZGU4NjQzZTY1OGFjNmEwZjZkMDNhOGRiODE5NjgwYWU1Yzk1YzcwMmQxZTQwMzhiNjM5Njg0YS9RUVdyeS5EQVQ=

第二步: 我們先找到正在使用的主題根目錄下的 functions.php 這個文件進行編輯,在最后的?》前面添加以下代碼(再此之前大蔥建議大家先進行備份該文件,以免編碼出錯無法還原。):

######## 顯示評論者地理位置 #########
function convertip($ip) {
$dat_path = TEMPLATEPATH.’/QQWry.Dat’;
if(!$fd = @fopen($dat_path, ‘rb’)){
return ‘IP date file not exists or access denied’;
}
$ip = explode(‘.’, $ip);
$ipNum = $ip[0] * 16777216 + $ip[1] * 65536 + $ip[2] * 256 + $ip[3];
$DataBegin = fread($fd, 4);
$DataEnd = fread($fd, 4);
$ipbegin = implode(”, unpack(‘L’, $DataBegin));
if($ipbegin < 0) $ipbegin += pow(2, 32);
$ipend = implode(”, unpack(‘L’, $DataEnd));
if($ipend < 0) $ipend += pow(2, 32); $ipAllNum = ($ipend – $ipbegin) / 7 + 1; $BeginNum = 0; $EndNum = $ipAllNum; while($ip1num>$ipNum || $ip2num $Middle= intval(($EndNum + $BeginNum) / 2);
fseek($fd, $ipbegin + 7 * $Middle);
$ipData1 = fread($fd, 4);
if(strlen($ipData1) < 4) {
fclose($fd);
return ‘System Error’;
}
$ip1num = implode(”, unpack(‘L’, $ipData1));
if($ip1num < 0) $ip1num += pow(2, 32); if($ip1num > $ipNum) {
$EndNum = $Middle;
continue;
}
$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);
if($ip2num < $ipNum) {
if($Middle == $BeginNum) {
fclose($fd);
return ‘Unknown’;
}
$BeginNum = $Middle;
}
}
$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);
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’;
}
$ipaddr = iconv(‘gbk’, ‘utf-8//IGNORE’, $ipaddr);
if( $ipaddr != ‘ ‘ )
return $ipaddr;
else
$ipaddr = ‘火星來客’;
return $ipaddr;
}

######## 顯示評論者地理位置 END#########

第三步: 這一步根據(jù)所使用的主題同添加的地方也有些不同

我所使用主題的設(shè)置:同樣是在主題目錄下的functions.php 文件搜索下面的這段代碼:

<?php comment_date(‘Y-m-d’) ?>

在其后面添加:

<?php if ( is_user_logged_in() ) echo convertip(get_comment_author_ip()); ?>

上面我是將要顯示的地理及網(wǎng)絡(luò)信息顯示在時間后面,當(dāng)然你可以添加到你喜歡的位置。

在這段代碼下添加以下代碼:

if ( is_user_logged_in() ){
echo convertip(get_comment_author_ip());
}

添加好后保存并上傳覆蓋到主題根目錄里。

注:

if ( is_user_logged_in())

這里用了一個判斷僅讓管理員可見,如果你想跟大蔥一樣讓全部訪客可見,那就把其去掉即可。

發(fā)布:2007-03-31 14:11    編輯:泛普軟件 · xiaona    [打印此頁]    [關(guān)閉]
相關(guān)欄目:
相關(guān)文章:
株洲OA
聯(lián)系方式

成都公司:成都市成華區(qū)建設(shè)南路160號1層9號

重慶公司:重慶市江北區(qū)紅旗河溝華創(chuàng)商務(wù)大廈18樓

咨詢:400-8352-114

加微信,免費獲取試用系統(tǒng)

QQ在線咨詢

泛普株洲網(wǎng)站建設(shè)公司其他應(yīng)用

株洲軟件開發(fā)公司 株洲門禁系統(tǒng) 株洲物業(yè)管理軟件 株洲倉庫管理軟件 株洲餐飲管理軟件 株洲網(wǎng)站建設(shè)公司