2.打开ACCESS，工具－自定义，命令选项卡，把导入选项拖动到上面的工具栏。
3.建库，建一个表，四个字段
startip 16 文本
endip 16 文本
country 100 文本
local 20 文本
依次为：字段名，长度，类型
4.点导入按钮，文件类型选文本文件，找到刚才导出的1.txt文件，导入到刚才建的表里~
你是使用php来读取数据库的吗？如果是的话，那么，你把下面的这个类保存成一个文件：
————————————————————
<?php
/**
* IP 地理位置查询类
*
* @author joyphper
* @version 1.0
* @copyright 2010 joyphper.net
*/
class ip_area {
/**
*
*
* @var resource
*/
private $fp//IP库文件指针 resource
private $firstip//第一条IP记录的偏移地址 int
private $lastip//最后一条IP记录的偏移地址 int
private $totalip//IP记录的总条数（不包含版本信息记录） int
/**
* 构造函数，打开 QQWry.Dat 文件并初始化类中的信息
*
* @param string $filename
* @return IpLocation
*/
public function __construct($filename = "data/ipdb.Dat") {//////////////////////////////////////////////这里注意，根据你的数据库存放位置不同，把这个数据库进行引入。
$this->fp = 0
if (($this->fp = fopen($filename, 'rb')) !== false) {
$this->firstip = $this->getlong()
$this->lastip = $this->getlong()
$this->totalip = ($this->lastip - $this->firstip) / 7//注册析构函数，使其在程序执行结束时执行
register_shutdown_function(array(&$this, '__destruct'))
}
}
/**
* 析构函数，用于在页面执行结束后自动关闭打开的文件。
*
*/
public function __destruct() {
if ($this->fp) {
fclose($this->fp)
}
$this->fp = 0
}
/**
* 返回读取的长整型数
*
* @access private
* @return int
*/
private function getlong() {//将读取的little-endian编码的4个字节转化为长整型数
$result = unpack('Vlong', fread($this->fp, 4))
return $result['long']
}
/**
* 返回读取的3个字节的长整型数
*
* @access private
* @return int
*/
private function getlong3() {//将读取的little-endian编码的3个字节转化为长整型数
$result = unpack('Vlong', fread($this->fp, 3).chr(0))
return $result['long']
}
/**
* 返回压缩后可进行比较的IP地址
*
* @access private
* @param string $ip
* @return string
*/
private function packip($ip) {// 将IP地址转化为长整型数，如果在PHP5中，IP地址错误，则返回False，// 这时intval将Flase转化为整数-1，之后压缩成big-endian编码的字符串
return pack('N', intval(ip2long($ip)))
}
/**
* 返回读取的字符串
*
* @access private
* @param string $data
* @return string
*/
private function getstring($data = "") {
$char = fread($this->fp, 1)
while (ord($char) >0) {// 字符串按照C格式保存，以\0结束
$data .= $char// 将读取的字符连接到给定字符串之后
$char = fread($this->fp, 1)
}
return $data
}
/**
* 返回地区信息
*
* @access private
* @return string
*/
private function getarea() {
$byte = fread($this->fp, 1)// 标志字节
switch (ord($byte)) {
case 0:// 没有区域信息
$area = ""
break
case 1:
case 2:// 标志字节为1或2，表示区域信息被重定向
fseek($this->fp, $this->getlong3())
$area = $this->getstring()
break
default:// 否则，表示区域信息没有被重定向
$area = $this->getstring($byte)
break
}
return $area
}
/**
* 根据所给 IP 地址或域名返回所在地区信息
*
* @access public
* @param string $ip
* @return array
*/
public function get($ip) {
if (!$this->fp) return null// 如果数据文件没有被正确打开，则直接返回空
$location['ip'] = gethostbyname($ip) // 将输入的域名转化为IP地址
$ip = $this->packip($location['ip']) // 将输入的IP地址转化为可比较的IP地址
// 不合法的IP地址会被转化为255.255.255.255// 对分搜索
$l = 0// 搜索的下边界
$u = $this->totalip// 搜索的上边界
$findip = $this->lastip// 如果没有找到就返回最后一条IP记录（QQWry.Dat的版本信息）
while ($l <= $u) {// 当上边界小于下边界时，查找失败
$i = floor(($l + $u) / 2)// 计算近似中间记录
fseek($this->fp, $this->firstip + $i * 7)
$beginip = strrev(fread($this->fp, 4))// 获取中间记录的开始IP地址// strrev函数在这里的作用是将little-endian的压缩IP地址转化为big-endian的格式// 以便用于比较，后面相同。
if ($ip <$beginip) {// 用户的IP小于中间记录的开始IP地址时
$u = $i - 1// 将搜索的上边界修改为中间记录减一
}else{
fseek($this->fp, $this->getlong3())
$endip = strrev(fread($this->fp, 4)) // 获取中间记录的结束IP地址
if ($ip >$endip) {// 用户的IP大于中间记录的结束IP地址时
$l = $i + 1// 将搜索的下边界修改为中间记录加一
}else{// 用户的IP在中间记录的IP范围内时
$findip = $this->firstip + $i * 7
break// 则表示找到结果，退出循环
}
}
}//获取查找到的IP地理位置信息
fseek($this->fp, $findip)
$location['beginip'] = long2ip($this->getlong()) // 用户IP所在范围的开始地址
$offset = $this->getlong3()
fseek($this->fp, $offset)
$location['endip'] = long2ip($this->getlong())// 用户IP所在范围的结束地址
$byte = fread($this->fp, 1)// 标志字节
switch (ord($byte)) {
case 1:// 标志字节为1，表示国家和区域信息都被同时重定向
$countryOffset = $this->getlong3()// 重定向地址
fseek($this->fp, $countryOffset)
$byte = fread($this->fp, 1)// 标志字节
switch (ord($byte)) {
case 2:// 标志字节为2，表示国家信息又被重定向
fseek($this->fp, $this->getlong3())
$location['country'] = $this->getstring()
fseek($this->fp, $countryOffset + 4)
$location['area'] = $this->getarea()
break
default:// 否则，表示国家信息没有被重定向
$location['country'] = $this->getstring($byte)
$location['area'] = $this->getarea()
break
}
break
case 2:// 标志字节为2，表示国家信息被重定向
fseek($this->fp, $this->getlong3())
$location['country'] = $this->getstring()
fseek($this->fp, $offset + 8)
$location['area'] = $this->getarea()
break
default:// 否则，表示国家信息没有被重定向
$location['country'] = $this->getstring($byte)
$location['area'] = $this->getarea()
break
}
if ($location['country'] == " CZ88.NET") { // CZ88.NET表示没有有效信息
$location['country'] = "未知"
}
if ($location['area'] == " CZ88.NET") {
$location['area'] = ""
}
$location['country']=iconv('gbk', 'utf-8', $location['country'])
$location['area']=iconv('gbk', 'utf-8', $location['area'])
return $location
}
}
?>
——————————————
这个类里有个引入数据库的行，需要你进行更改。
接下来，你在需要使用IP数据库的页面中，将这个类引入，并执行下列函数：
$ip = new ip_area()
这个类不用传参，自会得到ip的地理位置。
最后，如果你想得到IP值，那么可以使用以下方法：
————————
function ip(){//-------------------------------------------获得用户IP；
if(isset($_SERVER)){
if (isset($_SERVER["HTTP_X_FORWARDED_FOR"])){
$realip=$_SERVER["HTTP_X_FORWARDED_FOR"]
}elseif(isset($_SERVER["HTTP_CLIENT_IP"])){
$realip=$_SERVER["HTTP_CLIENT_IP"]
}else{
$realip=$_SERVER["REMOTE_ADDR"]
}
}else{
if(getenv("HTTP_X_FORWARDED_FOR")){
$realip=getenv("HTTP_X_FORWARDED_FOR")
}elseif(getenv("HTTP_CLIENT_IP")){
$realip=getenv("HTTP_CLIENT_IP")
}else{
$realip=getenv("REMOTE_ADDR")
}
}
return $realip
}
——————————————————————
打开IPData.txt文件格式是这样的0.0.0.0 0.255.255.255 IANA保留地址 CZ88.NET
1.0.0.0 1.0.0.255 澳大利亚 CZ88.NET
1.0.1.0 1.0.3.255 福建省 电信
1.0.4.0 1.0.7.255 澳大利亚 CZ88.NET
1.0.8.0 1.0.15.255 广东省 电信
1.0.16.0 1.0.31.255 日本 CZ88.NET
1.0.32.0 1.0.63.255 广东省 电信
1.0.64.0 1.0.127.255 日本 CZ88.NET
1.0.128.0 1.0.255.255 泰国 CZ88.NET
1.1.0.0 1.1.0.255 福建省 电信
1.1.1.0 1.1.1.255 澳大利亚 CZ88.NET
三、使用Navicat for MySQL工具
1.建立ip数据库表
CREATE TABLE `ip` (
`StartIP` varchar(20) default '',
`EndIP` varchar(20) default NULL,
`Country` varchar(30) default NULL,`Local` varchar(50) default NULL,
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）