主题:  这里有没有高手啊,我发贴子从来没人回?没劲!

yzhongyan

职务:普通成员
等级:1
金币:0.0
发贴:49
#12003/8/23 17:26:24
假设Access数据库文件为link.mdb,并已经有超过20个的连接信息,其中自助连接信息放在表selflink中,包含字段:
ID,网站名称,地址,简要说明,加入时间

我想反取尾三个的去掉,直接在数据库里面取10条显示出来并排序如何改啊!

<%
set con=server.CreateObject("adodb.connection")
con.open "Driver={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("link.mdb")
set rst=server.createobject("adodb.Recordset")
rst.open "select * from selflink order by 加入时间desc",con,3,1,1
rst.movefirst
for i=1 to 3
response.write ""&rst("网站名称")&"
"
rst.movenext
next
randomize
for i=1 to 7
rndtemp=rst.recordcount-1
curorrnd=Int((rndtemp-3+1)*Rnd()+3))
rst.move curorrnd,1
response.write ""&rst("网站名称")&"
"
next
rst.close
con.close
set rst=nothing
set con=nothing
rst.movefirst
rst.move curorrnd
%>