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執(zhí)行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請?zhí)顚懴嗤艽a#39return false 注form1是form的名字，password1與password2分別為兩個密碼輸入框，在form標簽里添加函數(shù)觸發(fā)，例如。