PHP爱好者来看:几个有用的函数

文件读取函式

   //文件读取函式
   function PHP_Read($file_name) {
   $fd=fopen($file_name,r);
   while($bufline=fgets($fd, 4096)){
   $buf.=$bufline;
    }
   fclose($fd);
   return $buf;
    }
   ?>

文件写入函式

    //文件写入函式
   function PHP_Write($file_name,$data,$method="w") {
   $filenum=@fopen($file_name,$method);
   flock($filenum,LOCK_EX);
   $file_data=fwrite($filenum,$data);
   fclose($filenum);
   return $file_data;
    }
   ?>

静态页面生成函式

   //静态页面生成函式
   function phptohtm($filefrom,$fileto,$u2u=1){
   if($u2u==1){
   $data=PHP_Read($filefrom);
    }else{
   $data=$filefrom;
    }
   PHP_Write($fileto,$data);
   return true;
    }
   ?>

指定条件信息数量检索函式

    //指定条件信息数量检索函式
   function rec_exist($table,$where){
   $query="select count(*) as num from $table ".$where;
   $result=mysql_query($query) or die(nerror(1));
   $rowcount=mysql_fetch_array($result);
   $num=$rowcount["num"];
   if ($num==0){
   return false;
    }
   return $num;
    }
   ?>

目录删除函式

   //目录删除函式
   function del_DIR($directory){
   $mydir=dir($directory);
   while($file=$mydir->read()){
   if((is_dir("$directory/$file")) AND ($file!=".") AND ($file!="..")){
   del_DIR("$directory/$file");
    }else{
   if(($file!=".") AND ($file!="..")){
   unlink("$directory/$file");
   //echo "unlink $directory/$file ok ";
    }
    }
    }
   $mydir->close();
   rmdir($directory);
   //echo "rmdir $directory ok ";
    }
   ?>

目录名称合法性检测函式

   //目录名称合法性检测
   function isen($str){
   $ret="";
   for($i=0;$i   $p=ord(substr($str,$i,1));
   if(($p<48 & $p!=45 & $p!=46) || ($p>57 & $p<65) || ($p>90 & $p<97 & $p!=95) || $p>122){
   nerror("不符合规范!");
    }
   $ret.=chr($p);
    }
   return $ret;
    }
   ?>

分页函式

   //分页函式
   function splitlist($HALT,$LRLIST,$ECHOCNT,$paper,$table,$where,$page_id,$userid){
   global $splitstr,$sumcnt;
   if($paper=="" || $sumcnt==""){
   $query = "select count(*) as num from $table $where";
   $result = mysql_query($query);
   $row = mysql_fetch_array($result);
   $sumcnt=$row["num"];
   if($sumcnt==0){
   nerror("该版内还没有选择发布新闻 !");
    }
   $paper=1;
    }
   $sumpaper=($sumcnt-$sumcnt%$ECHOCNT)/$ECHOCNT;
   if(($sumcnt%$ECHOCNT)!=0) $sumpaper+=1;
   if($sumpaper==1 && $HALT==0) return($where);
   $enwhere=base64_encode(base64_encode($where));
   if(($LRLIST*2+1) < $sumpaper){
   if(($paper-$LRLIST) < 2){
   $tract=1;
   $sub=$LRLIST*2+1;
    }else if(($paper+$LRLIST) >= $sumpaper){
   $tract=$sumpaper-($LRLIST*2);
   $sub=$sumpaper;
    }else{
   $tract=$paper-$LRLIST;
   $sub=$paper+$LRLIST;
    }
    }else{
   $tract=1;
   $sub=$sumpaper;
    }
   $uppaper=$paper-1;
   $downpaper=$paper+1;
   $startcnt=($paper-1)*$ECHOCNT;
   $where.=" limit ${ startcnt },${ ECHOCNT }";
   if($tract > 1) { $splitstr="【 << "; }
   else $splitstr="【 << ";
   for($i=$tract;$i<=$sub;$i++){
   if ($i!=$paper) $splitstr.="".$i." ";
   else $splitstr.="".$i." ";
    }
   if ($sub!=$sumpaper) $splitstr.=">> 】";
   else $splitstr.=">> 】";
   return($where);
    }
   ?>

关于分页函式的使用说明 

/*#### 检索分页函式 ####
   Int $HALT - 检索结果仅分1页时是否(1/0)显示页码条
   Int $LRLIST - (页码条显示页码数-1)/2
   Int $ECHOCNT - 检索时每页显示记录的数量
   Int $paper - 页数,预提取:$paper=$HTTP_GET_VARS[paper];
   Varchar $table - 数据表名,预附值:$table="db.table";
   Varchar $where - 检索条件,预附值:$where="where field=@#value@#";
   Varchar $enwhere - 将原$where进行两次base64_encode()编码后以GET的方式提交
   Varchar $splitstr - 页码条输出字串,执行函式后在相应的位置执行 echo $splitstr;
   函式调用前需获取变量 -
   $paper=$HTTP_GET_VARS[paper];
   $sumcnt=$HTTP_GET_VARS[sumcnt];
   $enwhere=$HTTP_GET_VARS[enwhere];
   Return (Varchar $where) - 分页后检索语句的检索条件
   注意:本函式需调用出错处理函式 nerror($error);
   */
   ?>

图片文件上传函式

   //图片文件上传函式
   function upload_img($UploadFile,$UploadFile_name,$UploadFile_size,$UploadPath,$max_size=64){
   //$TimeLimit=60; //设置超时限制时间 缺省时间为 30秒 设置为0时为不限时
   //set_time_limit($TimeLimit);
   if(($UploadFile!= "none" )&&($UploadFile != "" )){
   $FileName=$UploadPath.$UploadFile_name;
   if($UploadFile_size <1024){
   $FileSize="(string)$UploadFile_size" . "字节";
    }elseif($UploadFile_size <(1024 * $max_size)){
   $FileSize=number_format((double)($UploadFile_size / 1024), 1) . " KB";
    }else{
   nerror("文件超过限制大小!");
    }
   //{
   //$FileSize="number_format((double)($UploadFile_size" / (1024 * 1024)), 1) . " MB";
   // }
   if(!file_exists($FileName)){
   if(copy($UploadFile,$FileName)){
   return "$UploadFile_name ($FileSize)";
    }else{
   nerror("文件 $UploadFile_name 上载失败!");
    }
   unlink($UploadFile);
    }else{
   nerror("文件 $UploadFile_name 已经存在!");
    }
   //set_time_limit(30); //恢复缺省超时设置
    }
    }
   ?>

时间: 2024-12-31 02:41:50

PHP爱好者来看:几个有用的函数的相关文章

一个非常有用的函数——COALESCE

原文:一个非常有用的函数--COALESCE 很多人知道ISNULL函数,但是很少人知道Coalesce函数,人们会无意中使用到Coalesce函数,并且发现它比ISNULL更加强大,其实到目前为止,这个函数的确非常有用,本文主要讲解其中的一些基本使用:    首先看看联机丛书的简要定义:   返回其参数中第一个非空表达式   语法:   COALESCE ( expression [ ,...n ] )     如果所有参数均为 NULL,则 COALESCE 返回 NULL.至少应有一个 N

PHP里10个鲜为人知但却非常有用的函数

 PHP里有非常丰富的内置函数,很多我们都用过,但仍有很多的函数我们大部分人都不熟悉,可它们却十分的有用.这篇文章里,我列举了一些鲜为人知但会让你眼睛一亮的PHP函数. levenshtein() 你有没有经历过需要知道两个单词有多大的不同的时候,这个函数就是来帮你解决这个问题的.它能比较出两个字符串的不同程度. 用法: $str1 = "carrot"; $str2 = "carrrott"; echo levenshtein($str1, $str2); //O

微软未公开存储过程及有用的函数

原文:微软未公开存储过程及有用的函数 从网上收集,有些已经在2008不支持或者后续版本不支持,所以需要慎用. XP_FileExist: 用法:EXEC xp_fileexist <filename> [, <file_exists INT> OUTPUT] 例子:exec master.dbo.xp_fileexist 'C:\temp' SP_MSForEachDb: 例子1:exec dbo.sp_MSforeachdb 'select ''?'', * from [?].I

动态网页爱好者来看:Asp过滤HTML的函数

爱好者|动态|函数|网页 Asp过滤Html代码 Function RemoveHTML(strHTML) Dim objRegExp, Match, Matches Set objRegExp = New Regexp objRegExp.IgnoreCase = True objRegExp.Global = True '取闭合的<> objRegExp.Pattern = "<.+?>" '进行匹配 Set Matches = objRegExp.Exec

VBScript:Join 函数一个不太常用,却很有用的函数_vbs

以前没有注意到这个函数,直到今天用起来才觉得这个函数很有用,确实不错 ,先记一下用法看看. Join 函数 返回一个字符串,此字符串由包含在数组中的许多子字符串联接创建. Join(list[,delimiter]) 参数 list 必选项.包含要联接的子字符串一维数组. Delimiter 可选项.在返回字符串中用于分隔子字符串的字符.如果省略,将使用空字符 ("").如果 delimiter 是零长度字符串,则在同一列表中列出全部项,没有分界符. 说明 下面的示例利用 Join 函

ASP中几个有用的函数

function DeleteFile(Filename) '删除文件 if Filename<>"" then  Set fso = server.CreateObject("Scripting.FileSystemObject")  if fso.FileExists(Filename) then   fso.DeleteFile Filename  end if  set fso = nothing end ifend function funct

PHP爱好者来看:常用PHP代码

这是一些使用频率比较高的函数...... 1.产生随机字符串函数 function random($length) { $hash = @#@#; $chars = @#ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789abcdefghijklmnopqrstuvwxyz@#; $max = strlen($chars) - 1; mt_srand((double)microtime() * 1000000); for($i = 0; $i < $length; $i++)

VB几个有用的函数

函数 注释:--------(1)------------注释:获得指定ini文件中某个节下面的所有键值 TrueZq,,需要下面的API声明注释:Private Declare Function GetPrivateProfileSection Lib "kernel32" Alias "GetPrivateProfileSectionA" (ByVal lpAppName As String, ByVal lpReturnedString As String,

ASP关于编码的几个有用的函数小结(utf8)_应用技巧

1.'UTF转GB---将UTF8编码文字转换为GB编码文字 复制代码 代码如下: function UTF2GB(UTFStr) for Dig=1 to len(UTFStr) '如果UTF8编码文字以%开头则进行转换 if mid(UTFStr,Dig,1)="%" then 'UTF8编码文字大于8则转换为汉字 if len(UTFStr) >= Dig+8 then GBStr=GBStr & ConvChinese(mid(UTFStr,Dig,9)) Dig