• 欢迎@方程式 @小云 加入我们
  • Register

ASP+Access随机读取数据库记录的方法

两种方法,都利用了随机数!

方法一: 

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

<!--#include file="qiconn.asp"-->

<%

Randomize(timer())

bgsql = "select top 5 fuid,id,lcolor,name from lei order by rnd(-(id + " & Int((10000 * Rnd) + 1) & "))"

set bgrs=server.CreateObject("adodb.recordset")

bgrs.open bgsql,conn,1,1

 if bgrs.eof and bgrs.eof then

  response.write ""

 else

  do until bgrs.eof

  

   response.write bgrs("name") & "<br>"

  bgrs.movenext

  loop

 end if

bgrs.closd

set bgrs=nothing

%>

</body>

</html>

方法二、 

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

<!--#include file="qiconn.asp"-->

<%

dim rndnum

 Randomize  

 Do While Len(rndnum)<2

 num1=CStr(Chr((57-48)*rnd+48))

 rndnum=rndnum&num1

 loop

 Randomize 

bgsql = "select * from lei where id>"& rndnum &" order by rnd(id) desc"

set bgrs=server.CreateObject("adodb.recordset")

bgrs.open bgsql,conn,1,1

 if bgrs.eof and bgrs.eof then

  response.write ""

 else

  do until bgrs.eof

  

   response.write bgrs("name") & "<br>"

  bgrs.movenext

  loop

 end if

bgrs.closd

set bgrs=nothing

%>

</body>

</html>

版权声明:转载请注明来自杨俊伟博客,本文地址:http://yangjunwei.com/a/366.html
除非注明,杨俊伟博客文章均为原创,转载请注明出处和链接!
 

10 条评论 »

  • 刘易俊
    2010/01/01 at 23:31:04

    看好诺豆!支持你!

  • 刘易俊
    2010/01/01 at 07:47:19

    技术是寂寞的!
    新年好啊!

    nuodou 于 2010-1-1 23:19:21 回复

    诺豆回归,再寂寞也会走下去

  • 最好
    2009/12/31 at 17:29:27

    很有用啊~~学习了!欢迎回访哈!

    nuodou 于 2010-1-1 23:21:02 回复

    这可是纯顶啊呵呵

  • 老七
    2009/12/31 at 13:56:43

    第一次来。。呵呵 欢迎回访。。

    nuodou 于 2010-1-1 23:21:24 回复

    也是第一次回复你呵呵

  • 土狼妹妹
    2009/12/22 at 04:08:44

    数字一看就头大,不过必须学的

    nuodou 于 2009-12-23 11:52:01 回复

    知道一点好办事

  • 园子
    2009/12/18 at 14:45:21

    专业的文章
    学习学习。

  • 张楠
    2009/12/17 at 13:27:25

    呵呵,ASP+AC最主要是简单

  • 疾风
    2009/12/17 at 01:05:49

    代码如诗啊 呵呵~·

    nuodou 于 2009-12-17 12:11:06 回复

    诗意!!

  • daniel
    2009/12/16 at 21:46:57

    小型数据库对一般的小网站来说,还是很经济实惠的。

    nuodou 于 2009-12-16 21:48:53 回复

    特别是一般的企业网站

  • 风云春秋博客
    2009/12/16 at 12:47:29

    ASP+Access只适合小网站和企业网站 到了论坛就要换数据库喽

    nuodou 于 2009-12-16 12:51:10 回复

    是啊,我深有体会呵呵!但ASP+Acc还是很有市场的

发表评论 

我还是想用邮箱注册

登录

忘记密码 ?

用第三方帐号快捷登录

已有账户?前往登录吧~

注册