修改密码总报错

[antelope0606]

我用如下密码实现用户修改个人密码
set user=GetObject("LDAP://haihui-ly/cn=dingyc,OU=mailuser,DC=wen,DC=gov,DC=cn")

user.PasswordRequired = True
user.ChangePassword oldpass,newpass
总报错说"Permission denied"
如何解决？请大家帮忙

[storm97]

因为ASP运行期间的默认用户的权限不足引起的。
建议你把这个功能封装到一个dll文件里面，然后再调用，就不会有什么问题了！

[storm97]

试一下一下的ASP代码：
Public Function BAuthenticateUser

BAuthenticateUser = False

bstrAT = Request.ServerVariables("AUTH_TYPE")

If InStr(1, "_BasicNTLM", bstrAT, vbTextCompare) < 2 Then
Response.Buffer = TRUE
Response.Status = ("401 Unauthorized")
Response.End
Else
BAuthenticateUser = True
End If
End Function
BAuthenticateUser
Set usr = GetObject("LDAP://haihui-ly/cn=dingyc,OU=mailuser,DC=wen,DC=gov,DC=cn") user.PasswordRequired = True
user.ChangePassword oldpass,newpass