1应该是userid sql=quotupdate user set password=#39quot newpassword quot#39 where ID=quot userid 2不能这样用execute Dim db，connstr Set db=serverCreateObjectquotADODBconnectionquotstr=quotprovider=。

daUpdateCommand = UpdateCom执行UpdateCommand ConnCloseResponseWritequotalert#39密码修改成功，请单击“返回”回到登录面#39quot。

ResponseWritequotalert#39密码修改成功！#39quotelse responseWritequotalert#39密码不相同#39quotend if else ResponseWritequotalert#39密码框不能为空！#39quotend if end if。

Password=“”#39默认修改密码为 end if rsclose set rs=nothing connclose set conn=nothing 注意，这个文件最后是通过登录账号后点击链接到这个文件更改，当然如果你知道 UserName 的话，那就不需要了。

sql=quotselect * from users where username=quotrequestquotusernamequotquot and password=quotrequestquotpasswordquotrsopen sql，conn，1，3 if not rseof then rsquotpasswordquot=requestquotnew_passwordquot#39如果有密码加密方式。

alert#39请填写相同密码#39return false 注form1是form的名字，password1与password2分别为两个密码输入框，在form标签里添加函数触发，例如。