como muestro registros aleatoriamente???

[zangano]

Pues si, ese me sirve, gracias¡¡¡, pero soy medio wey y no puedo, que falla¡¡¡¡..el codigo que ya puse es así...

<%
set oConn=Server.CreateObject("ADODB.Connection&q uot;)
set rs=Server.CreateObject("ADODB.Recordset" )

' Conexión por OLEDB
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Server.MapPath("db/enlaces/cdm.mdb")&";"
SQL="SELECT * FROM Links WHERE LinkID IS NULL"
rs.open SQL, oConn, adOpenStatic, adLockReadOnly

Dim rndMax
rndMax = CInt(rs.RecordCount)
línea 12>>>rs.MoveFirst


Do While Not rs.EOF
%>
<a href="db/enlaces/redirect.asp?linkid=<% = rs("LinkID") %>" class="liga"><font class=letras>  <% = rs("LinkName") %> </a> |</font>
<%rs.MoveNext
Loop%>



<%
rs.MoveFirst

Dim rndNumber
Randomize Timer
rndNumber = Int(RND * rndMax)

rs.Move rndNumber
%>
<a href="db/enlaces/redirect.asp?linkid=<% = rs("LinkID") %>" class="liga"><font class=letras>  <% = rs("LinkName") %> </a> |</font>


<%
rs.Close
oConn.Close
Set rs = Nothing
Set oConn = Nothing
%>
<a href="db/enlaces/ligas.asp" title="todas las ligas incluidas"><font color=black class=mini>:: + </font></a></td>


y me da el sig. error...

ADODB.Recordset error '800a0bcd'

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

/inmundo/h_sitios.inc, line 12



weno, voy a seguir intentando, haber que pex con esto, pero la ayuda se agradece xDDD


saludos