点击“张三”或“修改”------进入修改信息界面，
xaaa.asp为信息的浏览界面，显示全部信息：关键代码为：
  <%
     Action= request.QueryString("Action")  //获取动作名称
     DeleId= request.QueryString("id")  //获得要删除或修改的记录ID号        
       Case "Save_Score"  //保存修改的记录      
         set rs2=server.CreateObject("adodb.recordset")
     rs2.open "select xingming,xingbie,sfz,bm,keshi,gwmc,byxx,zhye,zhilei  from shop_admin where SId="&DeleId,conn,1,3
          rs2("xingming") = request("xm")
          rs2("xingbie") = request("xb")
          rs2("sfz")   = request("shefz")
     rs2("bm")   = request("bmm")
          rs2("keshi") = request("kes")
          rs2("gwmc") = request("gw")
     rs2("byxx") = request("byxxx")
     rs2("zhye") = request("zye")
     rs2("zhilei") = request("zhl")
          rs2.update
          rs2.close
          set rs2=nothing
          response.Redirect "xaaa.asp"
          Case ""  //浏览全部记录
  %>
“修改”的连接代码为 ：<a href="Edit_Score.asp?id=<%=rs("SId")%>" ><font color="#FF0000">修改</a>
Edit_Score.asp是修改界面：但点击“修改”连接后就提示错误，根本没法进入到Edit_Score.asp修改界面

 <%
       SId = request.QueryString("id")  //获取提交来的记录ID号
        set rs=server.CreateObject("adodb.recordset")  //根据ID号打开数据库中的表
       rs.open "select xingming,xingbie,sfz,bm,keshi,gwmc,byxx,zhye,zhilei  from shop_admin where SId="&SId,conn,1,1
 %>      
<table width="98%" border="1"  align=center cellspacing="0" cellpadding="3" bordercolordark="#FFFFFF" bordercolorlight="#666666">
  <!--DWLayoutTable-->
  <form name="form1" method="post" action="xaaa.asp?action=Save_Score&id=<%=rs("SId")%>">  <%//提供修改后，保存记录的表单链接%>
总是提示这个错误。

[[it] 本帖最后由 pp821008 于 2009-7-31 23:59 编辑 [/it]]

——————————————————————————————
admin=request.Form("xingming")
……
mysql="update adminn set admin='"&admin&"',password='"&password&"' where  admin='"&request("xingming")&"'"
——————————————————————————————
试问：如果xingming是改变了的，那么where如何找到之前的？？？找不到记录，当然更新就失败了。

xingming就是改变的，每个人用自己的登录名和密码登陆后，点击名字进入更改密码的界面，及图2.直接在二界面修改密码并提交就实现修改的目的。关键是“提交”点击后没反应。Update提示错误，没法把修改的新数据填进数据表中。汗...............
各路大侠HELP，楼主出手帮帮啊。谢谢了。

rs.open后面的默认参数，是不是不允许update？ 不知道。试试加个参数如1,3或2,3什么的看看再说。（吾只学了三个月，加上最近放假了近一个月没摸asp了……呵呵，不好意思）

mysql="update adminn set admin='"&admin&"',password='"&password&"' where  admin="&xingming
用户用应该没有重复的吧？你把这admin="&xingming换成ID作判断！

用户名没有重复的，就是实现不同人登录后可以随意更改自己的个人密码。我想用用户名做基础连接打开再修改其个人密码，实现数据库中相应表的记录也修改了。下次登录就用自己重新设定的密码了。
用用户名做判断不可以实现啊！？
谢谢大家了！

各路大侠，版主HELP

用id 点击用户名 传递id值 根据id值修改用户密码
<a href="Admin_User.asp?ID=<%=Rs("ID")%>&Action=EditPass"><%=Rs("Admin")%></a>
Sql = "Update adminn Set admin='"&admin&"',password='"&password&"' Where ID="&Request("ID")

admin字段是字符型的，不是数值型，你的写法不对
mysql="update adminn set admin='"&admin&"',password='"&password&"' where  admin='"&xingming&"'"

mysql="update adminn set admin='"&admin&"',password='"&password&"' where  admin="&xingming
rs.Open mysql,cn
这个写法本身就错误要么你这样更新
mysql="select * from adminn where  admin='"&xingming&"'"
rs.Open mysql,cn,1,3
rs("admin")=admin
rs("password")=password
rs.update
或者直接这样写
mysql="update [adminn] set [admin]='"&admin&"',[password]='"&password&"' where  admin='"&xingming&"'"
cn.execute(mysql)