WEB开发网
开发学院WEB开发ASP ACC数据库ASP随机读取N条数据 阅读

ACC数据库ASP随机读取N条数据

 2009-04-22 10:38:15 来源:WEB开发网   
核心提示:以下的代码仅仅是例子,大家如果有需要的话就根据这个例子进行修改使用!一般来说,ACC数据库ASP随机读取N条数据,ACC是足够应付站点的,除非是你非常大型

以下的代码仅仅是例子,大家如果有需要的话就根据这个例子进行修改使用!
一般来说,ACC是足够应付站点的,除非是你非常大型,不然ACC还是非常不错的!

 程序代码
<%
dim sjtop,Aa,le
'准备读取多少记录
le=5
Set sjtop = Server.CreateObject("ADODB.Recordset")
sjtop.open "select * from 库名",conn,1,3
Aa = sjtop.recordcount-le
sjtop.move(randsub(Aa))
if sjtop.eof then
%>
不存在数据
<%end if%>
<%
for i = 1 to le %>
内容
<%
sjtop.movenext
next 
sjtop.close
'取随机数
Function Randsub(total)
Randomize
Randsub = int((total-1+1)*rnd+1)
end Function
%>

Tags:ACC 数据库 ASP

编辑录入:爽爽 [复制链接] [打 印]
赞助商链接