Question

DW编写的ASP读取ACCESS数据库如何随机读一条记录啊

代码如下:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include virtual="/Connections/conn.asp" -->
<%

Dim rs
Dim rs_numRows

Set rs = Server.CreateObject("ADODB.Recordset")
rs.ActiveConnection = MM_conn_STRING
rs.Source = "SELECT * FROM main ORDER BY ID DESC"
rs.CursorType = 0
rs.CursorLocation = 2
rs.LockType = 1
rs.Open()

rs_numRows = 0
%>

说明:DW编写的,现在是从最后一条开始读.我想能否随机读取一条,然后我再加让它顺序从那条往下读取.(我是菜鸟)

Answer 1

Randomize
rs.Source = "SELECT * FROM main ORDER BY Rnd(-(ID + " & Int((10000 * Rnd) + 1) & "))"