29/03/2009, 06:15
|
| | 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. |