金鱼尾巴断了:ASP中我的数据为什么不能修改

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/19 07:42:53
下面是我的源代码,我的同一个数据库中有三张表,有一张表是添加,另外二张是修改,可是第17行的修改不起作用,添加的数据和另外一张表的修改是正常的,运行时也不出错呢?
我是初学者,请多多指教!!
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("db1.mdb")
exec="select * from user"
set rs1=server.createobject("adodb.recordset")
rs1.open exec,conn,1,3
exec="select * from"+request.form("cla1")
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,3
%>
<%i=0
s=request.form("text")
text=split(s,",")
%>
<%
ban="c007u"
rs1("list")=ban%>
<%do while not rs.eof %>
<% t=text(i)+0
rs("qfz")=rs("qfz")+t
i=i+1
if not t=0 then
xh=rs("id")
name=rs("name")
qf=rs("qfz")
dd=text(i-1)
exec="insert into "+request.form("cla2")+"(id,name,defeng,zongfeng)values('"+xh+"','"+name+"',"+dd+","+qf+")"
conn.execute exec

end if
%>
<%
rs.movenext
loop
%>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
response.write "记录添加成功!2秒钟后窗口自动关闭"
%>

<script language="JavaScript">
<!--
setTimeout('window.close();',2000);
-->
</script>

你修改的字段后,需要在后面加上 rs1.update 和 rs.update 来更新数据。