随机读取若干条记录

access语法：
SELECT TOP n * From 表名 ORDER BY Rnd(主键ID)

sql server语法：
SELECT TOP n * From 表名 ORDER BY NEWID()

mysql语法：
SELECT * From 表名 Order By RAND() Limit n
 

 

sql server的随机函数NEWID()和RAND()

SELECT * FROM Table_Name ORDER BY NEWID()
--随机排序

SELECT TOP 10 * FROM Table_Name ORDER BY NEWID()
--从Orders表中随机取出10条记录

 

Dim MyValue

Randomize ' 对随机数生成器做初始化的动作。

MyValue = Int((6 * Rnd) + 1) ' 生成 1 到 6 之间的随机数值。

rs.absoluteposition=MyValue ' 指针定位到MyValue

最后rs输出随机记录

 

Dim ranNum

Randomize

ranNum=Int(900*Rnd)+100 ' 随机输出三位数

ranNum=Int(9000*Rnd)+1000 ' 随机输出四位数

……