Interrogazione casuale

Grazie a questo script è possibile preparare la stringa di interrogare del nostro database in modo causale.

<%

randomize()

dim table(4) 'Contiene i nomi delle tabelle del database.

table(0) = "annunci"

table(1) = "foto"

table(2) = "animali"

table(3) = "script"

table(4) = "giochi"

dim strSql

strSql="SELECT * FROM "& table(cint(ubound(table)*rnd()))

response.write strSql

%>