use isso:
este arquivo deve existir em algum canto do seu micro adovbs.inc, pegue-o e copie-o no mesmo dir. da sua aplicação.
<!--#include file="adovbs.inc"-->
<%
'»»Usando acima: arquivo de constantes para ADO.
SQL = "Select * from tabela"
Set Rs = Server.CreateObject("ADODB.RecordSet") ' é preciso declarar o recordset dessa forma qdo. usa-se Rs.Open
Rs.CursorLocation = adUseClient 'local do cursor
Rs.CursorType = adOpenForwardOnly 'tipo do cursor
Rs.LockType = adLockOptimistic 'tipo de bloqueio do cursor
Rs.Open SQL, Conexao 'abre-se o recordset desta forma qdo. precisa de usar seus vários métodos e propridades
Response.Write SQL & "<br>Registros retornados: " & Rs.RecordCount & "<p>SQLMaxCodigo: " & SQLMaxCodigo
Response.End()
%>
t+