帝国cms分类信息电话号码查询
[fwxx]归属地[/fwxx]fwxx段名<?php/**sooden2007-10-2**/header("Content-type: text/html;charset=gbk");/*构建函数*///读取电话号码文件function readfiletext ($file, $id){$myaddress='';$fp = @file("$file");……
[fwxx]归属地[/fwxx]
fwxx段名
<?php/**sooden2007-10-2**/header("Content-type: text/html;charset=gbk");/*构建函数*///读取电话号码文件function readfiletext ($file, $id){$myaddress='';$fp = @file("$file"); //循环比对for ($i=0; $i<count($fp); $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</li><li>",0); if(!$dh) { @$dh=Cut($show,'您的查询: ',' </li><li>',0); } $dh = trim(ereg_replace("rn","",$dh)); $dh =nl2br(preg_replace('/[ ]+/',' ',$dh)); $showadd=$dh; $dh=$id.'||'.$dh.'||'."rn"; writefiletext ($file,$dh); } }?>
<span><a href="#clos" onclick="ShowTel();" />X关闭</a></span> <font color=red>查询结果</font><div id=cresult><ul><?phpif ($showadd) {print_r(str_replace("查询太频繁,暂时禁用", "无", "$showadd")); //$showadd);}else {echo "<li>服务器忙,请稍后再试……"; }?></li></ul></div>
注:此方法已失效。
- 上一篇
帝国cms内容简介smalltext信息问题
如果你的字段不想回车可以设置字段不需要回车,方法如下:自动提取简介时不想自动回车,可以直接修改简介字段(系统设置-》数据表管理-》管理字段),将回车替换成换行符选项去掉即可 .如果你的内容页想要回车的话,可以在显示简
- 下一篇
帝国cms分类信息发布的内容生成图片格式
把zhaopin.php放到e/key/目录下,没有就新建个$r=$empire->fetch1("select dianhua,chuanzhen,dianziyouxiang from phome_ecms_zhaopin where id='$id'");$r=$empire->fetch1("select 你要图片化的字段名 from 你要调