用php写的serv-u的web申请账号的程序

 

<script type="text/javascript">AK47[id].writeDiv();</script>

1. <?php
2. //Sign.php
3. //系统适用于win2000
4. $path="e:serv-uServUDaemon.ini";//用户文件的路径
5. $fabu="e:web";//总web路径
6. if($add)
7. {
8. $fp1=fopen($path，"r+");
9. $str=fread($fp1， filesize($path));
10. $fp=fopen($path，"a");
11. flock($fp，3);
12. $us="=".$userid;
13. $start=strpos($str，$us);
14. if($start)
15.     {
16. echo "对不起，该用户已经存在";
17.     }else{
18. $start1=strpos($str，"User1");
19. if($start1){
20. $start=$start1+6;
21. $end=strpos($str，"|"，$start);
22. $firstusername=substr($str，$start，$end-$start);
23. $start2=strpos($str，"[USER=".$firstusername."|1]");
24. $usernum=count(split("rn"，substr($str，$start1，$start2-$start1)));
25.         }else
26.         {
27. $usernum=1;
28.         }
29. $userinfo="User".$usernum."=".$userid."|1|0"."rn";
30. $userpath=$fabu.$userid;
31. @mkdir($userpath，0700);
32. $maxsize=$size*1024;
33. $userp="[USER=".$userid."|1]"."rn";
34. $userp.="Password=".$password."rn";
35. $userp.="HomeDir=".$userpath."rn";
36. $userp.="RelPaths=1"."rn";
37. $userp.="DiskQuota=1|".$maxsize."|0"."rn";
38. $userp.="MaxUsersLoginPerIP=2"."rn";
39. $userp.="TimeOut=600"."rn";
40. $userp.="Access1=".$userpath."|RWAMLCDP"."rn";
41.  
42. if($start2){
43. $content=substr($str，$start2，strlen($str)-$start2);
44. $content.=$userp;
45. $userinfo.=$content;
46.     fseek($fp1，$start2，SEEK_SET);
47.     fputs($fp1，$userinfo);
48. }else
49.         {
50. fputs($fp，$userinfo);
51. fputs($fp，$userp);
52.         }
53. //echo $firstusername;
54. //echo $start;
55. //echo "<br>";
56. //echo $end;
57.             }
58. fclose($fp);
59. fclose($fp1);
60. }
61. ?>
62. <FORM METHOD="POST" ACTION="sign.php">
63. 账号：<INPUT TYPE="text" NAME="userid" size=10 maxlength=20 ><br>密码：
64. <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="增加用户">
65. </FORM>

<script type="text/javascript">document.write('

');</script>