come faccio a fare questo:

seleziono dal database tutti i valori dal campo "val" maggiori di 1000
e ne scelgo uno random tra questi e riporto il valore del campo "sito"?

sql = "select * from tabella where val > 1000"

rs.open SQL, cn, 3,3

randomize()
dim valorernd, valoresito
valorernd = int(rs("val")*rnd())
rs.close
cn.close
sql = "select sito from tabella where val >" &valorernd

rs.open SQL, cn, 3,3

valoresito = rs("sito")
response.write valoresito

mmmm mi sa che ce qualcosa che non va... non riesco a sistemarlo