关于数据修改的问题
大家好,俺遇到了如下问题,请帮忙看看.谢谢
-----------------------------------------------------------------
有一个数据表,里面有如下字段:id,name,password,quanx.
用ASP写了用户浏览页面index.asp,可以浏览所有用户的名字,密码和权限
当点击用户的名字时,就可以连接到修改用户的资料的页面.
<%
Dim edit_id,edit_sql
edit_id= Request.QueryString("id")
Set edit_sql=conn.execute("Select * From yongh Where ID = " & edit_id)
%>
<form name="form1" method="post" action="admin_editd.asp">
<table width="253" border="1" cellpadding="0" cellspacing="0">
<tr>
<th width="69" scope="col"><div align="center">用户名</div></th>
<th width="178" scope="col">
<div align="left">
<input name="name" type=text value="<%=Trim(edit_sql("name"))%>" maxlength="10">
</div></th>
<td><div align="center">密码 </div></td>
<input name="password" type="text" value="<%=Trim(edit_sql("password"))%>" maxlength="10">
<td><div align="center">权限</div></td>
<div align="left">
<select name="quanx">
<%Select Case edit_sql("quanx")
Case 0
Response.write("<option value=0>管理员</option>")
Case 1
Response.write("<option value=0>总办</option>")
Case 2
Response.write("<option value=0>工艺部</option>")
Case 3
Response.write("<option value=0>设计部</option>")
End Select%>
<option value=0>管理员</option>
<option value=1>总办</option>
<option value=2>工艺部</option>
<option value=3>设计部</option>
</select>
<%
conn.close
set conn=nothing
%>
-------修改资料填写完后,开始到更新用户资料页面.遇到了资料无法更新的问题-------
<body>
<%
Dim editd_rs,editd_sql
dim editd_id
editd_id= Request.form("id")
editd_sql= "Select * From yongh Where ID="&editd_id
Set editd_rs=Server.CreateObject("ADODB.Recordset")
editd_rs.open editd_sql,conn,2,3
%>
<%
If Request("name")="" Or Request("Password")="" then
%>
<script language="javascript">
alert("用户名或密码栏必须填写")
history.go(-1)
</script>
<% else
editd_rs("name")=request("name")
editd_rs("password")=request("password")
editd_rs("quanx")=request("quanx")
editd_rs.Update
%>
<script language="javascript">
alert("修改完成")
location.href="admin_del.asp"
</script>
<%
End If
conn.close
editd_rs.close
set conn=nothing
set editd_rs=nothing
%>
</body>
</html>
问题点数：30、回复次数：7Top
1 楼hbhbhbhbhb1021（天外水火(我要多努力)）回复于 2005-04-03 10:19:37 得分 0
提示什么错误Top
2 楼CXL_2005（想飞的笨笨）回复于 2005-04-03 10:29:34 得分 10
在你拿到用户的ID，打开用户的资料后
<%
conn.close
set conn=nothing
%>
这句是不是不应该放在这里啊，你可以关闭记录集就行了，不用关闭连接吧。
<%
edit_sql.close
set edit_sql=nothing
%>
然后在后边修改的时候在打开另一个记录集，完后在保存，整个界面关闭一次连接就可以了
<%
conn.close
set conn=nothing
%>
具体报什么错误，不知道是不是这个原因，但是我觉得该这样写的
Top
3 楼joshua2005（程序员菜鸟）回复于 2005-04-03 10:33:40 得分 0
没有任何报错信息.
修改完数据后,也提示修改成功.
但是浏览数据的时,数据并没有任何的修改.Top
4 楼gmlwl（笨笨猫）回复于 2005-04-03 11:01:16 得分 20
editd_id= Request.form("id")
更新的时候,这个ID值没有传递.Top
5 楼joshua2005（程序员菜鸟）回复于 2005-04-03 11:12:12 得分 0
在更新的时候,我添加了如下代码,但是数据还是没有更新到
editd_rs("id")=editd_id
但又提示更新成功.不知道到底是什么原因.救我啊.兄弟们!!!
Top
6 楼joshua2005（程序员菜鸟）回复于 2005-04-03 14:10:34 得分 0
请救救俺吧,俺咋想也想不明白,为什么数据就修改不了呢?Top
7 楼joshua2005（程序员菜鸟）回复于 2005-04-03 15:17:15 得分 0
各位同学,救救俺吧.非常紧急啊,怎么也想不明白啊?
为什么数据就不能修改呢?错在哪里丫Top
