Ho provato un po' degli script che ho trovato nel forum, ma proprio non riesco a farlo funzionare. Mi serve estrarre 3 record casuali dalla tabella "domande". Tutti quelli che ho provato mi danno errore (la maggior parte su "count")

Qualcuno mi sa aiutare?
Grazie
Alessandro

codice:
<form name=modulo method=post action=ris.asp>
<%
'verifica dell'username e passsword
sql0="select * from [users] where username='"&session("user")&"' and password='"&session("pass")&"' and tipologia=1"
set rs0=con.execute(sql0)
	if rs0.eof then
	response.write("Username o password errati")
	else
response.write("Benvenuto " &session("user")& "
")



sql1="SELECT domanda from [domande]"
set rs1=con.execute(sql1)
X=1
do while not rs1.eof
vdom=rs1("domanda")
response.write ("
<input type=hidden name=vd" &x& " value=""" &vdom& """></input>" &vdom& "
")

sql2="SELECT * from [domande] where [domanda]='"&vdom&"'"
set rs2=con.execute(sql2)
vris1=rs2("risposta 1")
vris2=rs2("risposta 2")
vris3=rs2("risposta 3")


response.write("<input type=radio name=r" &x& " value=""" &vris1& """>" &vris1& "
")
response.write("<input type=radio name=r" &x& " value=""" &vris2& """>" &vris2& "
")
response.write("<input type=radio name=r" &x& " value=""" &vris3& """>" &vris3& "
")
x=X+1
rs1.movenext
loop
response.write("<input type=submit class=testo2 value=Invia>")
end if
%>