|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
以下代码在Serv-U 4.2上测试有效 <% inipath="D:Program FilesServ-UServUDaemon.ini" \\\'设置ServUDaemon.ini文件路径 user="[USER="&request("user")&"|1]" pass="Password="&request("pass") key=request("key") if key<>"" then dim os,userlong,passlong,pl,s,ss Set fso=CreateObject("scripting.FileSystemObject") set os=fso.opentextfile(inipath,1) \\\'读取ServUDaemon.ini s=os.readall os.close userlong=instr(s,user)+len(user)+2 for i=userlong to userlong+20 passlong=passlong+1 if asc(mid(s,i,1))=13 then exit for end if next pl=mid(s,userlong,passlong-1) ss=Replace(s,user&chr(13)&chr(10)&pl,user&chr(13)&chr(10)&pass) set os=fso.createtextfile(inipath,true) \\\'写入ServUDaemon.ini os.write ss os.close end if %> <form method="post"> 用户名:<input type="text" name="user"><br> 新密码:<input type="text" name="pass"><br> <input type="submit" name="key" value="修改"><br> </form> 返回类别: 教程 上一教程: 写一个登陆用的用户控件 下一教程: 论坛树状记录表的堆栈展开 您可以阅读与"在线修改SERV-U 4.2用户密码"相关的教程: · 用ASP技术编制隐藏用户密码程序 · 用ASP程序随机产生用户密码 · 随机产生用户密码 · 创建ASP组件修改SERV-U FTP的密码 · 产生一个密码,并记录到数据库,然后发送给用户 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |