杭州交通信息网沈阳铁路局招标网:asp 循环添加新记录的问题
来源：百度文库 编辑：杭州交通信息网 时间：2024/04/29 07:00:06
n=request.form("num")
Set Rs=Server.CreateObject("Adodb.RecordSet")
Rs.Open "Select * From abc"conn,1,3
for i=1 to int(n)
rs.AddNew
rs("a")=1
rs("b")=2
rs("c")=3
rs.update
next
如果 n=1就可以，但如果n>1那
结果是产生了一个死循环，插入了好多好多记录！
而且连 CPU 都占了 100%，我都快晕死了，谁能告诉我要改哪吗？
补充一下，用SQL insert into 命令我也会用，因为个人需要（具体什么需要这里不讨论），我现在不能用那个命令。
对了，上面 rs.open "select * from abc "conn,1,3
应为：rs.open "select * from abc ",conn,1,3
少了一个 "，"这里不讨论
还有，这个不关密码的问题。。。
更重要的，n=request.form("n")并没问题
我试过改为for i=1 to 3
一样会有无穷记录产生。。。
Set Rs=Server.CreateObject("Adodb.RecordSet")
Rs.Open "Select * From abc"conn,1,3
for i=1 to int(n)
rs.AddNew
rs("a")=1
rs("b")=2
rs("c")=3
rs.update
next
如果 n=1就可以，但如果n>1那
结果是产生了一个死循环，插入了好多好多记录！
而且连 CPU 都占了 100%，我都快晕死了，谁能告诉我要改哪吗？
补充一下，用SQL insert into 命令我也会用，因为个人需要（具体什么需要这里不讨论），我现在不能用那个命令。
对了，上面 rs.open "select * from abc "conn,1,3
应为：rs.open "select * from abc ",conn,1,3
少了一个 "，"这里不讨论
还有，这个不关密码的问题。。。
更重要的，n=request.form("n")并没问题
我试过改为for i=1 to 3
一样会有无穷记录产生。。。
一楼，这个好像不关密码的事吧？如果和密码有关，告诉我如何？
二楼，我试过这样也不行呀，你在你机子上调试过没有？如果调过没有问题，那就是我的机器问题了。。。
没错，我就是楼主，因为百度不给楼主对每个问题进行回答，真郁闷，功能不够啊，BAIDU！！
你这程序也没有什么问题阿，你试试这样写：
Dim rs
Dim i
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open "Select * From abc",conn,1,3
For i=1 To 3
rs.AddNew
rs("a")="123"
rs("b")="456"
rs.update
Next
rs.Close
Set rs = nothing
这个在我机器可以运行，插入3次。如果你机器这样可以，说明你的这个n=request.form("num")参数值有问题，Response.Write 一下这个n，看看是多少。
n=request.form("num")
Set Rs=Server.CreateObject("Adodb.RecordSet")
for i=1 to int(n)
Rs.Open "Select * From abc"conn,1,3
rs.AddNew
rs("a")=1
rs("b")=2
rs("c")=3
rs.update
rs.close
next
试试？
你的数据库有没有密码，有密码的话说明1下，写上去
你的这个n=request.form("num")参数值有问题