最新消息:Rockyxia Web技术博客全新改版,响应式布局满足各种设备各种尺寸的访问需求。

共享一种asp从access随机读取几条数据的代码

后台开发语言 rockyxia 16396浏览 0评论

正文直接开始

废话少说,先上代码:

Randomize(Timer()) 
SQL = "SELECT TOP 100 ID FROM table1 ORDER BY Rnd(-(ID + " & Int((10000 * Rnd) + 1) & "))" 
Set ado = Server.CreateObject("ADODB.RecordSet") 
ado.Open SQL,Conn,1,1 
If Not ado.EOF Then 
    ado.MoveFirst 
    For I = 1 To ado.RecordCount 
        Response.Write ado(0) & "<br>" 
    ado.MoveNext 
    Next 
End If 
ado.Close 
Set ado = Nothing

这里有两个地方是我们在使用时需要注意的:

  • 1.读取时:Rnd(-(ID + " & Int((10000 * Rnd) + 1) & "))这句代码就是空间随机获取的,id从1到10000之间的数据,如果你的数据超过10000的话,那么你也改一下就行了!
  • 2.显示数据时:

    ado.MoveFirst 
    For I = 1 To ado.RecordCount 
        Response.Write ado(0) & "<br>" 
    ado.MoveNext 
    Next
    

    这段代码代替了原来的do while那种循环!

相信大家可以很轻松的随机获取几条数据的!

转载请注明:Rockyxia Web技术博客 » 共享一种asp从access随机读取几条数据的代码
感谢阅读,如果您发现文章中有表述不准确,欢迎提出来,也欢迎交流相关问题,你可以去这里进行一对一问答交流。

(本篇完)