ASP - Recuperar campos de la BD

Hola, una vez más yo: tengo un problema con una BD en access y la pagina ASP, kiero recuperar ciertos campos de la BD y mostrarlos en la pagina ASP: tengo este codigo y no lo hace, me pueden ayudar?

<%dim cont, conexion, consultasql, claveU, RS
claveU=Request.cookies("clave")
Set conexion=Server.CreateObject("ADODB.connection")
conexion.connectionString="DSN=proyecto"
conexion.open

consultasql="select * from alumno where clave='"+claveU+"'"
Set RS=conexion.execute(consultasql) %>
<%do while not(RS.EOF)%>
<%=RS("Nombre")%>
<%=RS("Apellido_pat")%>
<%=RS("Apellido_mat")%>
<%=RS("Carrera")%>
<%RS.movenext
loop%>
<%RS.close
conexion.close%>

GRACIAS.

Prueba con esto Claudia, esto si funciona y esta comprobado.
druz

dim cont, conexion, consultasql, claveU, RS
claveU=Request.cookies("clave")
Set conexion=Server.CreateObject("ADODB.connection")
conexion.connectionString="DSN=previweb;UID=sa;PWD="
conexion.open

consultasql="select * from grupofamiliar"
Set RS=conexion.execute(consultasql)
do while not(RS.EOF)
response.write RS("PKEY")
response.write RS("CAUS_ID")
response.write RS("TIPO")
response.write RS("TIENEBENEF")
RS.movenext
loop
RS.close
conexion.close
%>