ASP中循环添加数据的问题!~

来源:百度知道 编辑:UC知道 时间:2024/05/18 05:11:34
case "add"
if trim(request("p_name"))<>"" and trim(request("p_bianhao"))<>"" then
set rs=server.CreateObject("adodb.recordset")
addx=int(request("p_bianhao"))

i=1
DO WHILE i<=addx
rs.Open "INSERT into 管道信息(wellnum,welltxt)VALUES("+trim(request("p_name"))+",'Y')", conn, 1, 3
i=i+1
LOOP

end if
rs.Close
set rs=nothing
response.Redirect "admin_product.asp"
response.end
end select
用while循环向数据库中添加记录,运行后数据库中到是有了新的记录,证明循环已经运行完了,可是还是弹出

错误类型:
ADODB.Recordset (0x800A0E78)
对象关闭时,不允许操作。

的错误提示!这是为什么啊!rs.close都写在end if后面了啊??
怎么还报错呢??请高手指点啊!在线等回复!谢谢了!
++++++++++++++++++++++++++++++++++++++++++++++++++
一楼的不行啊!还是提示我对象关闭时,不允许操作
------------------------------------------------------------------
是不是要在什么地方加个rs.movenext啊?
还是必须用两个记

哦 是你提醒我了insert 语句不需要循环实现
只能
rs.Open "INSERT into 管道信息(wellnum,welltxt)VALUES("+trim(request("p_name"))+",'Y')", conn, 1, 3

如果你循环的话那插入多条一样的记录那有什么意义呢??
参数13,12都可以,好象没有超过3的参数

你设计一个最简单的页面 比如文件中就是下面这些代码
<!--#include file="conn_xp/xp.asp"-->
<%
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from tg ",conn,1,3
rs.addnew
rs("rad")=trim(request("rad"))
rs("shuliang")=trim(request("shuliang"))
rs("danwei")=trim(request("danwei"))
rs.Update
rs.Close
set rs=nothing
%>
报错也可能是别的地方的原因,
没听过循环添加相同记录这回子事~!

偶错了,上是正解
看看这个
http://hi.baidu.com/cnasp/blog/item/7d93f6d3c67c6cdfa9ec9aff.html