gpt4 book ai didi

asp下sql和access数据库随机取10条记录的代码newid()

转载 作者:qq735679552 更新时间:2022-09-29 22:32:09 25 4
gpt4 key购买 nike

CFSDN坚持开源创造价值,我们致力于搭建一个资源共享平台,让每一个IT人在这里找到属于你的精彩世界.

这篇CFSDN的博客文章asp下sql和access数据库随机取10条记录的代码newid()由作者收集整理,如果你对这篇文章有兴趣,记得点赞哟.

MSSQL:select top 10 * from [table] order by newid()  ACCESS:  。

复制代码代码如下

'以利用rs.move嘛    '如随机取10条    n = 10    '先要判断总记录数是否少于10,若小于10,则有多少取多少 if n>10 rs.recordCount then n=rs.recordCount    dim ranNum    for i = 1 to n    Randomize()    ranNum = int(rs.recordCount*rnd)+1 '产生一个随机数    rs.Move ranNum '移动游标到随机数位置    response.write i & "-" & rs("title") & "<br />" '输出内容    rs.Move -ranNum    next    '……   。

        。

  。

这样就可以了,当然这样有可能会取到重复的记录,那么把产生随机数那句改下就可以了,声明一个变量来存放已经产生过的随机数,在产生新的随机时先判断是否已经产生过,若产生过则重新生成就是了,这个就比较简单了,用instr等就可以搞定了~~          思路是这样,其它自己动手试试吧。 不重复读取还有个办法就是只产生一个随机数,然后挨着读取这个随机数后面的N条记录。当然也要写好判断,随机数要小于总记录数-要读取记录数量。   。

复制代码代码如下

'……    dim n,ranNum    n = 10    Randomize()    ranNum = rs.recordCount-n    if ranNum<1 then ranNum=1    ranNum = int(ranNum*rnd)+1    rs.Move ranNum    for i=1 to 10    response.write i & "-" & rs("title") & "<br />" '输出内容    rs.MoveNext '挨着向下读取    next    '……   。

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

最后此篇关于asp下sql和access数据库随机取10条记录的代码newid()的文章就讲到这里了,如果你想了解更多关于asp下sql和access数据库随机取10条记录的代码newid()的内容请搜索CFSDN的文章或继续浏览相关文章,希望大家以后支持我的博客! 。

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com