MSSQL:selecttop10*from[table]orderbynewid()

ACCESS:

复制代码 代码如下:

'以利用rs.move嘛

'如随机取10条

n=10

'先要判断总记录数是否少于10，若小于10，则有多少取多少ifn>10rs.recordCountthenn=rs.recordCount

dimranNum

fori=1ton

Randomize()

ranNum=int(rs.recordCount*rnd)+1'产生一个随机数

rs.MoveranNum'移动游标到随机数位置

response.writei&"-"&rs("title")&"<br/>"'输出内容

rs.Move-ranNum

next

'……

这样就可以了，当然这样有可能会取到重复的记录，那么把产生随机数那句改下就可以了，声明一个变量来存放已经产生过的随机数，在产生新的随机时先判断是否已经产生过，若产生过则重新生成就是了，这个就比较简单了，用instr等就可以搞定了~~

思路是这样，其它自己动手试试吧。不重复读取还有个办法就是只产生一个随机数，然后挨着读取这个随机数后面的N条记录。当然也要写好判断，随机数要小于总记录数-要读取记录数量。

复制代码 代码如下:

'……

dimn,ranNum

n=10

Randomize()

ranNum=rs.recordCount-n

ifranNum<1thenranNum=1

ranNum=int(ranNum*rnd)+1

rs.MoveranNum

fori=1to10

response.writei&"-"&rs("title")&"<br/>"'输出内容

rs.MoveNext'挨着向下读取

next

'……

建议自己写个简单的Function来产生和判断不重复随机数。