|
用php写的serv-u的web申请账号的程序 <? //Sign.php //系统适用于win2000 $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("rn",substr($str,$start1,$start2-$start1))); }else { $usernum=1; } $userinfo="User".$usernum."=".$userid."|1|0"."rn"; $userpath=$fabu.$userid; @mkdir($userpath,0700); $maxsize=$size*1024; $userp="[USER=".$userid."|1]"."rn"; $userp.="Password=".$password."rn"; $userp.="HomeDir=".$userpath."rn"; $userp.="RelPaths=1"."rn"; $userp.="DiskQuota=1|".$maxsize."|0"."rn"; $userp.="MaxUsersLoginPerIP=2"."rn"; $userp.="TimeOut=600"."rn"; $userp.="Access1=".$userpath."|RWAMLCDP"."rn";
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 "<br>"; //echo $end;
} fclose($fp); fclose($fp1); } ?>
<FORM METHOD=POST ACTION="sign.php"> 账号:<INPUT TYPE="text" NAME="userid" size=10 maxlength=20 ><br>密码: <INPUT TYPE="password" name="password" size=10 maxlength=20 ><br>空间大小:<INPUT TYPE="text" NAME="size" size=4 maxlength=4> M<br><INPUT TYPE="submit" name="add" value="增加用户"> </FORM>
返回类别: 教程 上一教程: BBS(php & mysql)完整版(四) 下一教程: 通过ODBC连接的SQL SERVER实例
您可以阅读与"用php写的serv-u的web申请账号的程序"相关的教程: · php写的发送附件的程序(一) · PHP系统流量分析的程序 · 用定制的PHP应用程序来获取Web服务器的状态信息 · 简朴的用PHP编写的导航条程序 · 用PHP写的身份证验证程序
|