オンラインでパスワードを変更するにはどうすればいいですか?


<%id=Request(「id」)newpassword=Request(「password」)newpassword=Request(「password」) If newpassword<>newpassword temp The nResponse.Write"<センター>すみません、新しいパスワードは新しいパスワードと違います。やり直してください。センター>「Resonse.EndEnd IfSet conn=Server.reate Object("ADODB.C onnect")DBPath=Server.MapPath("userinfo.mdb")conn.Open"driver=Microsoft Access Driver(*.db);dbq=「&DB PathSet rs=Server.reate Object("ADODB.Recordset")sql="udate userinfo setパスワード="&newpassword&"where id="&ids.Open sql,conn,adOpenynamic."