Tem esse codigo q eu acabei de fazer....Se não conseguir colocar mais numeros, você posta qui denovo!!! <%
randomize
dim numeros(3)
numeros(0) = "1"
numeros(1) = "2"
numeros(2) = "3"
numeros(3) = "4"
nr = cint(4*rnd)
%>
<font size=2 face=arial color=#000000><%=numeros(nr)%></font>
Cara, Você está instanciando um objeto não fazendo uma conecção e também esekeceu do server. coloque isso: Set Conexao= server.CreateObject ("ADODB.RecordSet") Qualquer dúvida ai é só postar!!!