Visual Basic - Ayuda como DataEnvironment

Hola, he creado un DataEnvironment con una coneccion ODBC a un AS/400 y tengo mis comandos SQL hasta alli todo esta OK, lo que quisiera saber es como crear un recordset para usar los movefirst, etc...

??
Dim Data as DataEnvironment
Dim rs as ????
???
Ni idea....????

........ gracias de antemano!

No 1.
agregar la referencia a tu proyecto de Ms Remote Data Object 2
No 2.

en tu modulo declarar
Public Cn As rdoConnection
Public En As rdoEnvironment
Public Sql As String
Public Rs, RsA As rdoResultset

No. 3
abrir la db asi:

Set En = rdoEnvironments(0)
Set Cn = En.OpenConnection("", rdodrivernoprompt, True, Connect:="uid=;pwd=;dsn=TUODBC;")
Cn.QueryTimeout = 180

listo ya estas pegado a la db
ahora tus Sqls...

saludos..