Sacar registros aleatorios de BD?

[u_goldman]

Código asp:

function getRandomNumber()
    Randomize()
    getRandomNumber = int (1000*Rnd)+1
 end function
 
'Numero de registros que devolveremos del recordset
recNo = 3
 
strSQL = "SELECT TOP " & recNo & " id, campo1, Rnd(" & -1 * (getRandomNumber()) & "*id) FROM tbl1 ORDER BY 3"
 

La magia sucede cuando obtienes un numero aleatorio y lo vuelves a aleatorizar haciendo un calculo en access que en este caso consiste en obtener un numero aleatorio multiplicado por el id, despues se ordena con un numero N, en este caso el mismo valor usado para devolver los primeros registros y listo