繁体中文
设为首页
加入收藏
当前位置:PHP技术首页 >> PHP基础 >> 用php写的serv-u的web申请账号的程序,很烂,供参考,修改和删除请自己做了!这是个初

用php写的serv-u的web申请账号的程序,很烂,供参考,修改和删除请自己做了!这是个初

2004-12-15 08:00:00  作者:  来源:互联网  浏览次数:0  文字大小:【】【】【

//Sign.php

//系统适用于win2000

//power by devchina.com,http://www.2oa.net

$path="e:\\serv-u\\ServUDaemon.ini";//用户文件的路径

$fabu="e:\\web\\";//总web路径

if($add)

{

$fp1=fopen($path,"r+");

$str=fread($fp1, filesize($path));

$fp=fopen($path,"a");

flock($fp,3);

$us="=".$userid;

$start=strpos($str,$us);

if($start)

{

echo "对不起,该用户已经存在";

}else{

$start1=strpos($str,"User1");

if($start1){

$start=$start1+6;

$end=strpos($str,"|",$start);

$firstusername=substr($str,$start,$end-$start);

$start2=strpos($str,"[USER=".$firstusername."|1]");

$usernum=count(split("\r\n",substr($str,$start1,$start2-$start1)));

}else

{

$usernum=1;

}

$userinfo="User".$usernum."=".$userid."|1|0"."\r\n";

$userpath=$fabu.$userid;

@mkdir($userpath,0700);

$maxsize=$size*1024;

$userp="[USER=".$userid."|1]"."\r\n";

$userp.="Password=".$password."\r\n";

$userp.="HomeDir=".$userpath."\r\n";

$userp.="RelPaths=1"."\r\n";

$userp.="DiskQuota=1|".$maxsize."|0"."\r\n";

$userp.="MaxUsersLoginPerIP=2"."\r\n";

$userp.="TimeOut=600"."\r\n";

$userp.="Access1=".$userpath."|RWAMLCDP"."\r\n";

if($start2){

$content=substr($str,$start2,strlen($str)-$start2);

$content.=$userp;

$userinfo.=$content;

fseek($fp1,$start2,SEEK_SET);

fputs($fp1,$userinfo);

}else

{

fputs($fp,$userinfo);

fputs($fp,$userp);

}

//echo $firstusername;

//echo $start;

//echo "
";

//echo $end;

}

fclose($fp);

fclose($fp1);

}

?>

账号:
密码:


空间大小: M

责任编辑:admin
相关文章