insert into ...select 在for循环

[mfkjcl]

<%
subject=split(trim(request("subject")),",")
singecount=split(request("singlecount"),",")
multicount=split(request("multicount"),",")
judgecount=split(request("judgecount"),",")
a=ubound(subject)
for b=0 to a
subjectid=subject(b)
singecountid=singecount(b)
randomize
sqlsinge="insert into exam_databasebak SELECT TOP "
sqlsinge=sqlsinge+singecountid
sqlsinge=sqlsinge+" * FROM exam_database WHERE subject='"
sqlsinge=sqlsinge+subjectid
sqlsinge=sqlsinge+"' and type='单选题' ORDER BY Rnd(id)"
set rs1=conn.execute(sqlsinge)
set rs1=nothing
Session("subjectid")= subjectid

Next
%>
在这个循环中RS1只执行了一次，为什么？请大侠帮帮

[mfkjcl]

在表exam_databasebak中只看到第一次的数据

[newskyline]

程序错误中止还是执行完毕中止？
因为你给的数据有限，无法判断你组合的SQL语句是否有效，或者主键字段指定的值是否冲突。

━━━━━━━━━━━━━━━━━━━━━━━━━━
我的CSDN原则:无帖我回，有帖我优，优帖我避，强帖我顶!
━━━━━━━━━━━━━━━━━━━━━━━━━━
欢迎访问小天的维动世界 www.justrun.net

[mfkjcl]

程序是执行完毕，表中没有设与 不设主键是一样的

[newskyline]

我觉得你的程序是错误的，你是不是在开始写了On Error Resume Next，然后没有进行错误处理。如果是，你把那行注释掉，肯定会出问题。
你把SQL语句打印出来看一下，然后复制到数据库视图里执行SQL语句试下就知道了，我感觉肯定错。

━━━━━━━━━━━━━━━━━━━━━━━━━━
我的CSDN原则:无帖我回，有帖我优，优帖我避，强帖我顶!
━━━━━━━━━━━━━━━━━━━━━━━━━━
欢迎访问小天的维动世界 www.justrun.net

[mfkjcl]

程序中没有On Error Resume Next，这个

[newskyline]

再For循环里的最后一行加一句：
Response.Write( sqlsinge & "<br/>" )

━━━━━━━━━━━━━━━━━━━━━━━━━━
我的CSDN原则:无帖我回，有帖我优，优帖我避，强帖我顶!
━━━━━━━━━━━━━━━━━━━━━━━━━━
欢迎访问小天的维动世界 www.justrun.net

[mfkjcl]

谢谢了

[newskyline]

打印a的值看一下是否大于0，如果为0，你得检查一下你的Request是否有效了。
另外，INSERT INTO语句的执行不需要返回对象，直接conn.Execute就可以了。

━━━━━━━━━━━━━━━━━━━━━━━━━━
我的CSDN原则:无帖我回，有帖我优，优帖我避，强帖我顶!
━━━━━━━━━━━━━━━━━━━━━━━━━━
欢迎访问小天的维动世界 www.justrun.net

[mfkjcl]

a是大于0的