serv-u|web|程序//Sign.php//系统适用于win2000/2003/xp$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("",substr($str,$start1,$start2-$start1)));}else{$usernum=1;}$userinfo="User".$usernum."=".$userid."|1|0"."";$userpath=$fabu.$userid;@mkdir($userpath,0700);$maxsize=$size*1024;$userp="[USER=".$userid."|1]"."";$userp.="Password=".$password."";$userp.="HomeDir=".$userpath."";$userp.="RelPaths=1"."";$userp.="DiskQuota=1|".$maxsize."|0"."";$userp.="MaxUsersLoginPerIP=2"."";$userp.="TimeOut=600"."";$userp.="Access1=".$userpath."|RWAMLCDP"."";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
用php写的serv-u的web申请账号的程序
•
👁 0人浏览过