
17/04/2006, 21:24
|
 | | | Fecha de Ingreso: diciembre-2003 Ubicación: Frente al Monitor
Mensajes: 252
Antigüedad: 21 años, 5 meses Puntos: 0 | |
Como repetir registros? Que tal saludos a todos los foreros.
Pues bueno tengo la siguiente duda, tengo una consulta a mi base de datos SQL la cual me arroja "N" numero de registros, ahora como puedo hacer para repetir esos "N" números de registro en base a un numero aleatorio, por ejemplo un 3.
El problema que tengo es que estoy manejando el siguiente código para poder paginar los registros que tengo de 100 en 100:
lstrQuery = "SELECT * FROM TABLA Repetir"
'paginador
intTamPagina=100
'Leemos qué página mostrar. La primera vez será la inicial
If Request.Querystring("pagina") = "" Then
intPaginaActual=1
Else
intPaginaActual=CInt(Request.Querystring("pagina") )
End If
'Defino el tamaño de las páginas
lobjRst.PageSize=intTamPagina
lobjRst.CacheSize=intTamPagina
'Abro el recordset
lobjRst.Open lstrQuery, lobjConnection
If Not lobjRst.BOF AND Not lobjRst.EOF Then
'Cuento las páginas
intPaginasTotales=lobjRst.PageCount
'Compruebo que la pagina actual está en el rango
If intPaginaActual < 1 Then
intPaginaActual = 1
End If
If intPaginaActual > intPaginasTotales Then
intPaginaActual = intPaginasTotales
End If
Else
Response.Write("No existen datos en la BD.")
End If
Espero haberme dado a entender lo suficiente. Y pues gracias por su ayuda para encontrar alguna solución a este problemilla.
Saludos.
__________________ Hasta la victoria Siempre. |