在线考试出题问题

[chqclx707]

在线考试系统中随机抽取题目应该怎么实现,我原本的系统没有这具功能,应该怎么加上去

[mrshelly]

编号 题型 Q A 可供A相似特征


从里面 ORDER BY RND 就行了

[chqclx707]

楼上的能说得详细点吗,如果可以的话是否可以给出个程序,我是菜鸟,刚学这个不久,不是很懂

[chqclx707]

我的数据库中有20道试题,不过可以再加,我想每次进去考试从数据库中随机抽取几道就行了.行的话发我邮箱[e-mail]

[cqq]

就是随机取记录阿

access 的话

select top 1 * from tiku where 条件 order by rnd

sql server

order by newid()

[chqclx707]

rnd 是一个随机函数吧,到底是怎么样的?

[chqclx707]

如果随机取出五道的话,RND应该怎么写

[chqclx707]

其实这问题应该不难,只不过我不知道而已,高手来帮帮忙吧,毕业设计急需解决,谢谢

[samjuly]

这题目我以前做过
sql数据库用order by newid(),msaccess数据库用order by rnd(id)
不过得到的结果并不随即，也就是每次刷新网页得到的都是同一组数据
后来用数组的办法得到了不重复的随即数

[chqclx707]

嗯,我就是用order by rnd(id)这种方法做的,跟你的一样,刷新后也是同一组数据,那数组怎么解决?

[samjuly]

我用的方法是
<%function rndstr(istart,iend,isum)
dim i,j,vntarray()
redim vntarray(iend-istart)
j=istart
for i=0 to iend-istart
vntarray(i)=j
j=j+1
next
dim vntarray2(),temp,x,y
redim vntarray2(isum-1)
y=iend-istart+1
x=0
temp=vntarray
do while x<isum
dim a
randomize
vntarray2(x)=temp(int(rnd*y))
a=" "&vntarray2(x)&" "
temp=split(trim(replace(chr(32)&join(temp)&chr(32),a," ")))
x=x+1
y=y-1
loop
rndstr=join(vntarray2)
end function
%〉

调用函数rndstr,istart表示起始数字，iend表示结束数字，isum表示数字的个数，结果是一个字符串，用splite得到数组

[chqclx707]

哦,谢谢,我去试试