UC知道ASP★★★★★完善一小段代码★★50分★★有注释
来源：百度知道 编辑：UC知道 时间：2024/05/16 01:19:41
表单名为：form1
提交表单中有两选项
1.单选按钮:
名:ss
值0和1
注：0为按序抽题，1为随即抽题
2.在顺序抽题栏目有一文本框
名为：ti
抽题页代码如下：
本页注释：
bianhao为ACCESS数据库中的自动编号；
tmk为存放题目的表
dim rstimu
set rstimu=server.CreateObject("adodb.recordset")
if request.form1("ss")=0 then
rstimu.open "select * from tmk where bianhao>'"&int(request.form1("ti"))&"' order by bianhao",conn,1,1
else
rstimu.open "select * from tmk orDER BY Rnd(bianhao)",conn,1,1
end if
该代码之下为试题的表格，< % rstimu("这里略了")% >
当前问题
1.不要if ....then end 这段
只使用：rstimu.open "select * from tmk order by bianhao",conn,1,1
可以抽取到第一个题目，
并且整个“试题的ASP位置”正常显示
2.加入bianhao>'"&int(request.form1("ti"))&"'，这一段，
“试题的ASP位置”
功能只有两个
在提交页：
1.用户可选择：随机抽题，和按序
提交表单中有两选项
1.单选按钮:
名:ss
值0和1
注：0为按序抽题，1为随即抽题
2.在顺序抽题栏目有一文本框
名为：ti
抽题页代码如下：
本页注释：
bianhao为ACCESS数据库中的自动编号；
tmk为存放题目的表
dim rstimu
set rstimu=server.CreateObject("adodb.recordset")
if request.form1("ss")=0 then
rstimu.open "select * from tmk where bianhao>'"&int(request.form1("ti"))&"' order by bianhao",conn,1,1
else
rstimu.open "select * from tmk orDER BY Rnd(bianhao)",conn,1,1
end if
该代码之下为试题的表格，< % rstimu("这里略了")% >
当前问题
1.不要if ....then end 这段
只使用：rstimu.open "select * from tmk order by bianhao",conn,1,1
可以抽取到第一个题目，
并且整个“试题的ASP位置”正常显示
2.加入bianhao>'"&int(request.form1("ti"))&"'，这一段，
“试题的ASP位置”
功能只有两个
在提交页：
1.用户可选择：随机抽题，和按序
只使用：rstimu.open "select * from tmk order by bianhao",conn,1,1
可以抽取到第一个题目，
并且整个“试题的ASP位置”正常显示
--------------------------------------
这样只能抽取到第一个？
那么你的数据库里只有一道题？
简单的说楼主的方法行不通，因为rstimu.open "select * from tmk where bianhao>'"&int(request.form1("ti"))&"' order by bianhao",conn,1,1这句里，如果int(request.form1("ti"))的值是最后一个bianhao的值，那你只能取一个，同理，你随机的，也是如此。其次，一个select语句只能先取一个记录，因为指针只能指向一个记录，你应该用循环的方法来显示出来就可以了。