利用网页修改域登录密码

[ 2004/09/17 11:32 | by gOxiA ]
| |

你可以写一个ASP脚本来创建一个修改密码的网页。ASP可以让你完全访问活动目录接口(ADSI),这样你就可以用ASP完成一系列的功能,向修改用户密码或者创建用户帐号。当你写这样一个脚本的时候,你必须考虑这样一个问题---哪些用户可以运行脚本,当脚本运行是你应该使用哪些权限。用来修改用户密码的基本的ADSI命令是:

set usr = GetObject("LDAP://CN=John Savill,CN=Users,DC=savilltech,DC=com") usr.put "userPassword", NewPassword
第一行分配了一个句炳给savilltech.com里面的用户john savill。第二行则把新密码放到用户的密码属性里面. 我写了一个比较短的asp脚本changepass.asp用来提示用户键入一个用户名和密码(记住你要把域名savilltech.com改成你自己的域名),下面是文件的代码:
]<%
strUserCN = request.form("cn")
strNewPassword = request.form("newpass")
strPassVerify = request.form("passverify")

if strUserCN="" then
    response.write "<html><head><title>Change Password</title></head><body>"
    response.write "<center><h1>Web Password Reset</h1></center>"
    response.write "<hr>

<form method=post action=changepass.asp><table>"
    response.write "<tr><td>CN: </td><td><input type=text name=cn></td><tr>"
    response.write "<tr><td>New Password: </td><td><input type=password name=newpass></td></tr>"
    response.write "<tr><td>Verify Password: </td><td><input type=password name=passverify></td></tr>"
    response.write "<tr><td colspan=2 align=center><input type=submit value='Reset Password'></td></tr>"
    response.write "</table></body></html>"
    response.end
else

if strNewPassword = strPassVerify then

set usr = GetObject("LDAP://CN=" & strUserCN & ",CN=Users,DC=savilltech,DC=com")

usr.put "userPassword", strNewPassword

response.write "<html><head><title>Results</title></head><center><h1>Update Results</h1></center><hr>

"
response.write strUserCN & ": password was successfully updated"
response.end

else

    response.write "<html><head><title>Error!</title></head><body>"
    response.write "<center><h1>An Error Has Occurred!</h1></center>"
    response.write "<hr>

"
    response.write "The password and confirmation do not match. Please go back and try again."
    response.end

end if
end if
%>

在WINDOWS SERVER 2003里面就提供了一个修改用户密码的网页英文原稿作者为John Savil

网络编程 | 评论(0) | 引用(2) | 阅读(5198)
发表评论
昵称 [注册]
密码 游客无需密码
网址
电邮
打开HTML 打开UBB 打开表情 隐藏 记住我