Como trabajar con funciones aleatorias sobre consultas
Primero gracias por interesarse en leer.
Mi dudad es sobre como trabajar con funciones aleatorias sobre consultas.
Necesito desarrollar una pagina que me muestre aleatoriamente los resultados de una consulta sql, pero no se como hacerlo, o como implementar las funciones random o randomize o algo por el estilo.
Por favor si puede colaborarme en esto se lo agradezco.
Mi dudad es sobre como trabajar con funciones aleatorias sobre consultas.
Necesito desarrollar una pagina que me muestre aleatoriamente los resultados de una consulta sql, pero no se como hacerlo, o como implementar las funciones random o randomize o algo por el estilo.
Por favor si puede colaborarme en esto se lo agradezco.
Supongo que te refieres a, teniendo una select hecha, recuperar un resultado de esta select al azar; puedes probar lo siguiente
1)Aquí la select rc1.Open "SELECT talcual", cn1
2)Recuperar el número de elementos de la select (hay una propiedad llamada RecordCount para contar los elementos, pero por más q he probado en asp no me funciona; con visual basic, al hacer
"SELECT taltal", cn1, adOpenKeySet
con el adOpenKeySet ya me funciona el recordcount, pero en asp no lo consigo :( así q lo hago a manubrio)
3) recuperar un elemento al azar
osea, más o menos, algo así
rc1.Open "SELECT talcual", cn1, adOpenKeyset
'contar entradas
Entradas = rc1.RecordCount
''''''''''
(o, en su defecto)
' contar entradas
Entradas = 0
while not rc1.EOF
Entradas = Entradas + 1
rc1.MoveNext
wend
'''''''''''
rc1.MoveFirst
if not rc1.EOF
Randomize
Resultado = CInt(rnd * Entradas)
rc1.Move Resultado
end if
(o algo así, espero más o menos haber dado la idea adecuada :_)
1)Aquí la select rc1.Open "SELECT talcual", cn1
2)Recuperar el número de elementos de la select (hay una propiedad llamada RecordCount para contar los elementos, pero por más q he probado en asp no me funciona; con visual basic, al hacer
"SELECT taltal", cn1, adOpenKeySet
con el adOpenKeySet ya me funciona el recordcount, pero en asp no lo consigo :( así q lo hago a manubrio)
3) recuperar un elemento al azar
osea, más o menos, algo así
rc1.Open "SELECT talcual", cn1, adOpenKeyset
'contar entradas
Entradas = rc1.RecordCount
''''''''''
(o, en su defecto)
' contar entradas
Entradas = 0
while not rc1.EOF
Entradas = Entradas + 1
rc1.MoveNext
wend
'''''''''''
rc1.MoveFirst
if not rc1.EOF
Randomize
Resultado = CInt(rnd * Entradas)
rc1.Move Resultado
end if
(o algo así, espero más o menos haber dado la idea adecuada :_)