asp程序分析

来源:百度知道 编辑:UC知道 时间:2024/05/17 23:05:50
dxtl=0
mxtl=0
pdtl=0
sql="select * from shujubiao"
dbcmd.commandtext=sql
dbcmd.commandtype=1
set dbrs=dbcmd.execute
temp=dbrs("leixing")
dbrs.movefirst
do while not dbrs.eof

select case temp
case "单选"

dxtl=dxtl+1
case "多选"

mxtl=mxtl+1
case "判断"
pdtl=pdtl+1
end select

dbrs.movenext
loop
response.write(dxtl & mxtl & pdtl)

大家看下程序有什么毛病啊,判断出来的数据都不对,如果shujubiao里第一个是单选题,那么dxtl会等于试题总量,其他两个变量为0,如果第一个是多选,则mxtl等于试题总量,其他两个为0,麻烦各位看下,谢谢

这个语句:
temp=dbrs("leixing")
应该下移动三行,放在下面这行之前:
select case temp

修改后为:
dxtl=0
mxtl=0
pdtl=0
sql="select * from shujubiao"
dbcmd.commandtext=sql
dbcmd.commandtype=1
set dbrs=dbcmd.execute
dbrs.movefirst
do while not dbrs.eof
temp=dbrs("leixing")
select case temp
case "单选"

dxtl=dxtl+1
case "多选"

mxtl=mxtl+1
case "判断"
pdtl=pdtl+1
end select

dbrs.movenext
loop
response.write(dxtl & mxtl & pdtl)