Como repetir registros?

[Cuezaltzin]

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.

[u_goldman]

Hola, podrías explicar un poco mejor?
La verdad no entendí...quieres que te seleccione N registros de manera aleatoria, o quieres que te seleccione todos los registros ordenados aleatoriamente, o cómo?

Saludos

[Cuezaltzin]

Que tal U_goldman.

Pues tratare de explicarme mejor. Tengo un Query:

Select * From Tabla Where etc

El cual me regresa 20 registros, ahora por medio de un valor(ej.2), lo que tengo que hacer es repetir esos 20 registros dos veces y así imprimir 40 registros.

Espero ahora si haberme explicado correctamente.

Saludos.

[bonocl]

Hola...
lo puedes hacer con for/next

pones las líneas que te devuelven a pantalla el resultado del recordset entre un for y un next de la siguiente forma:

for i = 1 to x

código de resultdaos

next

donde x es la variable con la cantidad de veces que se repetirá. Se entiende? defines x de la forma que tu quieras...

[u_goldman]

Asi es, hay muchas formas de pelar al gato...quizás quieras hacerlo desde tu motor de base de datos, si es así, a lo mejor puedes hacer algo como esto:

Código:

repetir = 5

strSQL = ""
strSubQuery = "SELECT * FROM tabla"

for i = 1 to repetir
  strSQL = strSQL & strSubQuery
  if i < repetir then
    strSQL = strSQL &  " UNION ALL "
  end if
next

response.Write(strSQL)

Despues ya nada mas abres tu recordset y lo iteras.

Saludos

[Cuezaltzin]

Eso es todo Sr. U_Goldman, eso era justo lo que necesitaba, ya lo habia intentado como lo menciona bonocl, pero tenia problemas para mostrar las paginas correctas.

Gracias por la ayuda.

Saludos