Ver Mensaje Individual
  #1 (permalink)  
Antiguo 29/03/2009, 06:15
RauMarSo
 
Fecha de Ingreso: octubre-2008
Ubicación: Alicante
Mensajes: 24
Antigüedad: 16 años
Puntos: 0
Sacar registros aleatorios de BD?

Hola chicos/as tengo la intención de sacar unos registros aleatorios de una base de datos pero solo consigo sacar uno con Randomize y estoy un poco espeso me podríais ayudar, por favor.

<%
AbreBaseDatos("Datos")
SQL = "SELECT * FROM ARTICULOS"
AbreRecordSet rs,SQL,ConDatos

intTotalRecords = rs.RecordCount
Randomize()
intRandomNumber = Int((intTotalRecords * Rnd))
rs.Move intRandomNumber
%>

<a href="/articulo.asp?op=Ver_Articulo&RefPro=<%=rs.fields(" RefProducto")%>&RefArt=<%=rs.fields("RefArticulo") %>&cat=<%=rs.fields("categoria")%>"><img src="/imagen.asp?path=<%=Server.MapPath("/Images/Productos/")& "/" & rs.fields("RefArticulo")%>_1.jpg&height=75" height="75" border="0" align="left"></a>
<br><br>
<a href="/articulo.asp?op=Ver_Articulo&RefPro=<%=rs.fields(" RefProducto")%>&RefArt=<%=rs.fields("RefArticulo") %>&cat=<%=rs.fields("categoria")%>"><%=rs("Nombre" )&" "&rs("color")%></a><br><br><br><font size="1"><blockquote><%=(left(rs("Descripcion"),25 0)) %> ...</blockquote></font>

Un saludo y muchas gracias.