帝国cms分类信息电话号码查询

　　[fwxx]归属地[/fwxx]

　　fwxx段名

　　

　　/**

　　sooden

　　2007-10-2

　　**/

　　header("Content-type: text/html;charset=gbk");

　　/*

　　构建函数

　　*/

　　//读取电话号码文件

　　function readfiletext ($file, $id)

　　{

　　$myaddress='';

　　$fp = @file("$file");

　　//循环比对

　　for ($i=0; $i

　　{

　　$readfile=explode('||',$fp[$i]);

　　$file1=$readfile['0'];

　　$file2=$readfile['1'];

　　$id==$file1?$myaddress=$file2:'';

　　}

　　return $myaddress;

　　}

　　//写文件

　　function writefiletext ($file, $string)

　　{

　　$string = stripslashes ($string);

　　$fp = @fopen ($file, 'a+');

　　@fwrite ($fp, $string);

　　@fclose ($fp);

　　}

　　//匹配函数

　　function Cut($FileStr,$StartStr,$EndStr,$Type)

　　{

　　if(ereg($StartStr,$FileStr)&&ereg($EndStr,$FileStr))

　　{

　　if($Type==0){

　　$GetContent = substr($FileStr,0-(strlen($FileStr)-(strpos($FileStr,$StartStr)+strlen($StartStr))));

　　$GetContent = substr($GetContent,0,strpos($GetContent,$EndStr));

　　return $GetContent;

　　}else{

　　$GetContent = substr($FileStr,0-(strlen($FileStr)-(strpos($FileStr,$StartStr))));

　　$GetContent = substr($GetContent,0,strpos($GetContent,$EndStr)+strlen($EndStr));

　　return $GetContent;

　　}

　　}else{

　　return "";

　　}

　　}

　　/*

　　函数构建结束

　　*/

　　$id=$_GET['id']; //ID

　　$file = 'phone.txt'; //设定电话文件地址

　　//如果ID为空退出

　　if(empty($id))

　　{

　　exit();

　　}

　　else

　　{

　　//查询文件内是否有地址

　　$myaddress=readfiletext($file,$id);

　　if ($myaddress) { $showadd=$myaddress; }

　　else {

　　//获得号码地址页面

　　$show=file_get_contents("http://www.123cha.com/ip/?q=$id"); //手机号码段

　　//写入文件

　　@$dh=Cut($show,'您的查询: ',"n

",0);

　　if(!$dh) {

　　@$dh=Cut($show,'您的查询: ',' 

',0); }

　　$dh = trim(ereg_replace("rn","",$dh));

　　$dh =nl2br(preg_replace('/[ ]+/',' ',$dh));

　　$showadd=$dh;

　　$dh=$id.'||'.$dh.'||'."rn";

　　writefiletext ($file,$dh); }

　　}

　　?>

　　X关闭  查询结果

　　

　　

　　

　　if ($showadd) {

　　print_r(str_replace("查询太频繁,暂时禁用", "无", "$showadd")); //$showadd);

　　}

　　else {

　　echo "

• 服务器忙，请稍后再试……"; }

  　　?>

  　　

　　

　　

本站资源均来自互联网或会员发布，如果不小心侵犯了您的权益请与我们联系。我们将立即删除！谢谢！