Listar Randomicamente...

[DeStiLaDo]

Dae gente!

Seguinte:

para listar o top 5 de certa tabela por determinado critério eu uso isso:

listar = "SELECT TOP 5 * FROM tabela WHERE username='FULANO' ORDER BY data DESC"

Até aqui beleza... ele lista da tabela "tabela" ordenando por data descendente, os ULTIMOS 5 REGISTROS, (ok, ou me confundi???)

Digamos que minha tabela tenha 100 registros, segundo a instru~ção acima, ele listaria os registros 96,97,98,99 e 100... a pergunta é:

COMO FAÇO PARA ELE LISTAR 5 REGISTROS RANDOMICAMENTE???

alguém poderia me ajudar?

[mkboy]

Esse randon eu consegui fazer funcionar ontem, faz tempo que tava tentando fazer um, vou compartilha-lo prontinho com vc:

 <%
ComandoSQL = "SELECT COUNT(campo) AS total FROM tabela"
Set bd = Conexao.Execute(ComandoSQL)
randomize() 
peso = Int(bd("total") *Rnd) + 1
ComandoSQL = "SELECT TOP " & peso & " * FROM tabela"
Set bd = Conexao.Execute(ComandoSQL)
bd.Move peso - 1
%>

[DeStiLaDo]

VALEU PARCEIRO!!!

Vou testá-lo!!!

[DeStiLaDo]

mkboy

Ele lista sempre o último registro... eu fiz a seguinte modificação:

Teu Script

<%

ComandoSQL = "SELECT COUNT(campo) AS total FROM tabela"

Set bd = Conexao.Execute(ComandoSQL)

randomize()

peso = Int(bd("total") *Rnd) + 1

ComandoSQL = "SELECT TOP " & peso & " * FROM tabela"

Set bd = Conexao.Execute(ComandoSQL)

bd.Move peso - 1

%>

com minha modificação:

<%

ComandoSQL = "SELECT COUNT(id) AS total FROM parceiros"

Set bd = Conexao.Execute(ComandoSQL)

randomize()

peso = Int(bd("total") *Rnd) + 1

ComandoSQL = "SELECT TOP " & peso & " * FROM parceiros"

Set bd = Conexao.Execute(ComandoSQL)

bd.Move peso - 1

%>

O que é o total que eu marquei em azul no cod acima?

[DeStiLaDo]

Opps... me precipitei um pouco!!!

O script tah beleza, funciona direitinho, só que ele LISTA apenas 1 registro aleatoriamente, queria que ele listasse digamos 5...

Dá pra adaptá-lo???

To tentando mas não to conseguindo...