<html>
<head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title>修改密码</title> </head>
<body> <% yonghu=request("yonghuname") yuanmima=request("oldpassword") xinmima=request("newpassword") confirmpassword=request("confirm") if yonghu="" then msgbox "请输入用户名" response.redirect "modifipassword.asp" end if if yuanmima="" then msgbox "请输入原密码" response.redirect "modifipassword.asp" end if if xinmima="" then msgbox "请输入新的密码" response.redirect "modifipassword.asp" end if if confirmpassword="" then msgbox "请输入新的密码" response.redirect "modifipassword.asp" end if if xinmima<>confirmpassword="" then msgbox "前后两次输入的密码不一致，请检查" response.redirect "modifipassword.asp" end if set objcon=server.createobject("adodb.connection") objcon.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("login.mdb") set rs=server.createobject("adodb.recordset") sql1="select yonghu,yuanmima from usertable where password='"&yuanmima&"' and userid='"&yonghu&"'" rs.open sql1,objcon,1,2 %> <% if rs.eof then response.write "用户名或原密码错误，请返回修改" rs.close set rs=nothing objconn.close set objcon=nothing %> <%response.redirect "modifipassword.asp"%> <%else%> <% sql2="update usertable set password='xinmima' where password='yuanmima' and userid='yonghu'" rs.open sql2,objcon,1,2 rs.close set rs=nothing objconn.close set objcon=nothing response.write "密码修改成功!" response.redirect "main.asp" %> <%end if%>
</body>
</html> 提示是错误类型： Microsoft OLE DB Provider for ODBC Drivers (0x80040E21) ODBC 驱动程序不支持所需的属性。 /新物资管理系统/gaimima.asp, 第 18 行
无语
