我正在使用这个简单的查询在ms-access数据库上使用随机排序:
- SELECT pk FROM TABLE ORDER BY Rnd(pk) asc
当我使用Microsoft Access 2010进行测试时,它工作正常
这是我的代码:
- set Rs = Server.CreateObject("ADODB.Recordset")
- Rs.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/dbfolder") & "\dbname.mdb"
- Rs.Source = "SELECT pk FROM TABLE ORDER BY Rnd(pk) asc"
- Rs.CursorType = 3
- Rs.CursorLocation = 2
- Rs.LockType = 3
- Rs.Open()
- do while not Rs.eof
- 'do stuff
- Rs.Movenext
- loop