Soy novato

Sergio
22 de Diciembre del 2003
Buenas.Estoy aprendiendo a programar en ASP y me gustaria saber porque me da
el siguiente error:
Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A01B6)
El objeto no acepta esta propiedad o método: 'MoveFirst'
/conexion/TMPkbukjq9e8t.asp, línea 29

Estaba probando y de un libro copie un ejemplo que trabajaba con ODBC y yo
lo he modificado para que trabaje con Universal Data Link y no se si tendrá
algo que ver aunque pienso que no.

Os dejo mi codigo haber si me decís porque me casca.

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<% option explicit %>
<!-- #INCLUDE File="ADOVBS.inc" -->
<html>
<head>
<title>Pruebas</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<% const dbCon="FILE NAME=G:Inetpubwwwrootconexionpruebas.udl"
dim Conex
dim obCmd
dim sql
dim obRec
set Conex=Server.CreateObject("ADODB.Connection")
set obCmd=Server.CreateObject("ADODB.Command")
Conex.open dbCon
obCmd.ActiveConnection=Conex
obCmd.CommandType=adCmdText
sql="SELECT DISTINCT oficio, apellido FROM emple GROUP BY oficio,apellido"
obCmd.CommandText=sql
obRec=obCmd.Execute()%>
<center>
<table border="1">
<tr>
<th>Oficio</th>
<th>Apellido</th>
</tr>
<% obRec.MoveFirst
while not obRec.Eof %>
<tr>
<td><%=obRec(0) %></td>
<td><%=obRec(1) %></td>
</tr>
<%obRec.MoveNext()
wend
obRec.Close()
Conex.Close()%>
</table>
</center>

</body>
</html>


Gracias por vuestra ayuda!!Salu2.