Registro randômico em ASP

Meu primeiro post vai ser de algo que custei bastante para conseguir.

Sempre precisei de um código para selecionar um número “x” de registros do banco de dados para após listar de forma aleatória no site. Tipo assim: selecionar 20 produtos, para cada vez que entrarem no site, mostrar produtos diferentes.

Segue o código:

<%
Randomize()
intRandomNumber = Int(1000*Rmd)+1
%>

<%
SQL = “SELECT TOP 8 codigo,produto,cor,valor,foto2 FROM produtos where destaque = ‘Sim’ order by Rnd(Int(Now()*[codigo])-Now()*[codigo]);”
Set RS = adoCon.Execute(SQL)
%>