Programación General > Visual Basic 6.0 e inferiores

 Error 91

(1/2) > >>

estefy_ce:
Hola a todos! Estoy trabajando con un proyecto pero al ejecutarlo me aparece el error 91 que indica que una variable de objeto no se definio. Lo extraño es que defini a todos mis variables de la misma forma pero sigue el erro.
El código donde salta el error es el siguiente:

While Titulares.Recordset.EOF = False
   
        CuentaA = Titulares.Recordset!NroCuenta
       
        ' Verifico si ya se genero la adhesion en otro mes
       
        var = "SELECT DebitosAdhesiones.*" _
        & "From DebitosAdhesiones " _
        & "WHERE (((DebitosAdhesiones.NroCuenta)='" & CuentaA & "'))"
       
        BancoMAdhesiones.RecordSource = var
        BancoMAdhesiones.Refresh
       
        Set Rs = BancoMAdhesiones.Recordset
               
        If BancoMAdhesiones.Recordset.RecordCount = 0 Then 'AQUI ME MARCA EL ERROR  :argh:
            msgbox entre
                       
         End If

Desde ya muchas gracias!!!
Saludos.

Estefy

posman:
Y BancoMAdhesiones.Recordset si esta definido?

Si ejecutas msgbox BancoMAdhesiones.Recordset que te aparece?

Toph:
a lo mejor te sirve este link que encontre CLIC AQUI

estefy_ce:

--- Cita de: "posman" ---Y BancoMAdhesiones.Recordset si esta definido?

Si ejecutas msgbox BancoMAdhesiones.Recordset que te aparece?
--- Fin de la cita ---

El msgbox no me muestra nada porque se detiene antes de entrar al if ya que le da el error.
Probe definirla de la siguiente forma:
Dim BancoMAdhesiones As ADODB.Recordset
pero me sale el error "No se ha definido el tipo definido por el usuario".

RadicalEd:
Si tienes el Option Explicit activado quitalo y vuelve a probar.

Navegación

[0] Índice de Mensajes

[#] Página Siguiente