zoukankan      html  css  js  c++  java
  • asp+access获取不重复的随机记录

    最近项目需要实现一个随机读取不重复的记录功能,用的是access数据库,一般有两种思路,一种是读取全部记录,存入数组,然后产生随机数组索 引,其实没必要那么麻烦,直接在SQL语句里操作就可以。

    实例代码:

    '-----------示例来源: http://www.bhcode.net------------
    '-----------在线 提问: http://club.bhcode.net-----------
    '-----------技术讨论 群:54135045-----------------------

    dim conn,rs,sql

    set conn = Server.CreateObject("adodb.connection")
     conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("test.mdb")

    set rs = Server.CreateObject("adodb.recordset")
        sql = "select * from a order by rnd(time()-id)"
     rs.open sql,conn,1,1
     if not rs.eof then
       do until rs.eof
         response.Write(rs("id")&"<br>")
       rs.movenext
       loop
     end if
     rs.close
     set rs = nothing

    conn.close
    set conn = nothing

    完整实例代码下载地址:http://www.bhcode.net/code/6794.html

  • 相关阅读:
    算术运算
    数据分析
    科学计算
    面向对象
    文件操作-py
    pillow图像处理
    模块
    固定翼飞行过程产生的阻力
    修改行间距等基本操作
    文件操作
  • 原文地址:https://www.cnblogs.com/zxjyuan/p/2047142.html
Copyright © 2011-2022 走看看