asp中ACCESS数据库抽取随机记录

程序代码 程序代码
Randomize()
intRandomNumber = Int(1000 * Rnd) + 1
orDER BY Rnd("& (-1 * intRandomNumber) &"* id)


使用示例:
程序代码 程序代码
Dim RsP1, SQLP1, intRandomNumber
Randomize()
intRandomNumber = Int(1000 * Rnd) + 1
SQLP1="select top 4 * from Lonely_Article where ChannelID=1 and ClassID="&rs("ClassID")&" and  ArticleID <> "&ArticleID&" orDER BY Rnd("& (-1 * intRandomNumber) &"* ArticleID)"



[本日志由 winxml 于 2009-09-29 10:55 PM 编辑]
文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags:
相关日志:
评论: 0 | 引用: 0 | 查看次数: -
发表评论
昵 称:
密 码: 游客发言不需要密码.
内 容:
验证码: 验证码
选 项:
虽然发表评论不用注册,但是为了保护您的发言权,建议您注册帐号.