求助，关于随机调用题库的问题

[小末三]

大家帮我看看下面一段随机调用题库的程序，当我运行时，得到的题目有一些是重复的，谁能帮我改一下，让他调用的题目没有重复的，谢谢

randomize
sid=int((maxtype1+1)*rnd+1)
set rst=conn.execute("select * from type1 where id="&sid)

while rst.eof
randomize

sid=int((maxtype1+1)*rnd+1)
set rst=conn.execute("select * from type1 where id="&sid)
wend

[skyboy0720]

select top 1 * from type1 order by newid()

[postfix2]

Select top 1 * from 表 order by newid()

[小末三]

到地要怎么改呢

我还是不懂

可以详细一点吗

我很菜的

[postfix2]

"select * from type1 where id="&sid

随机的产生

Select top 1 * from 表 order by newid()

[zhouxinjie]

set rst=conn.execute("select top 10 from type1 order by newid()")
'----------也就是在type1表中随机挑选出10条记录。

只要这一句就可以拉，这样是不可能有重复的，不过还有一点要注意的是，其中newid()只能在sql server 2000中才支持的。好像应该是一个随机函数吧。

[小末三]

我的数据库是Access的 那要怎么办呢