<%
id = request("id")
newpassword = request("password")
newpasswordtemp = request("passwordtemp")
if newpassword <> newpasswordtemp then
response.write "
response.end
end if
set conn = server.createobject("adodb.connection")
dbpath = server.mappath("userinfo.mdb")
conn.open "driver={microsoft access driver (*.mdb)};dbq=" & dbpath
set rs = server.createobject("adodb.recordset")
sql="update userinfo set 密码='" & newpassword & "' where id="&id
rs.open sql, conn, adopendynamic, adlockpessimistic
%>
[1]