IP地址定位函数

对IpLocation类进行了封装，方便调用。默认使用的是gbk纯真IP地址库文件QQWry。

function IP($ip='',$charset='gbk',$file='QQWry.dat') {
    static $_ip    =    array();
    if(isset($_ip[$ip])) {
        return $_ip[$ip];
    }else{
        import("ORG.Net.IpLocation");
        $iplocation =   new IpLocation($file);
        $location   =   $iplocation->getlocation($ip);
        $_ip[$ip]    =    $location['country'].$location['area'];
    }
    if('utf-8' != $charset) {
        $_ip[$ip] = iconv($charset,'utf-8',$_ip[$ip]);
    }
    return $_ip[$ip];
}