Hola tengo el siguiente problema con este codigo que saque de la msdn, me da un error 91:la variable de tipo object o with no esta establecida
------------------------------------------------------------------------
Dim rdc As RDS.DataControl
Private Sub Command1_Click()
Set rdc = New RDS.DataControl
Set rec = New ADOR.Recordset
rdc.sql = "select * from datos"
rdc.executeoptions = adcexecasync
rdc.Connect = "dsn=Pruebas"
rdc.server = "http://sebastian/"
rdc.Refresh
While rdc.readystate = adcreadystateloaded
DoEvents
Wend
List1.AddItem rdc.Recordset.fields("nombre")
Set rdc = Nothing
Screen.MousePointer = vbNormal
End Sub
-------------------------------------------------------------------------
Quiero saber porque da error, no lo entiendo, gracias.
