Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés.
Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Iniciar sesión Cerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta

Visual Basic ADO - error 424 Se requiere un objeto

  Imprimir  
Vista:

error 424 Se requiere un objeto

Publicado por aldo (37 intervenciones) el 19/11/2007 19:11:19
Hola,

cuando pongo estas lineas...

If Ado.Recordset!fecegre Is Null Then
txtDias.Text = Ado.Recordset!now - Ado.Recordset!fecing
End If

me sale el siguiente error...

"Error: 424 . Se requiere un objeto"

como puedo solucionarlo?

Gracias
Aldo
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:error 424 Se requiere un objeto

Publicado por Unomásnomás (30 intervenciones) el 19/11/2007 22:48:42
Pues el error es claro. En que línea exactamente se queda. Normalmente es en ese control el que no se encuentra pegado en el form o tu variable objeto tampoco existe..
Revisalo bien.. una formase saberlo es tmb escribiendo el nombre del objeto le agregar el (.) punto y te aparece el listado de propiedades y eventos, si este no aparece es xq ese objeto no esta pegado o no está declarado
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:error 424 Se requiere un objeto

Publicado por Llaverin (34 intervenciones) el 20/11/2007 09:03:16
Hola de nuevo:
Entiendo que estas preguntando por si ese campo es nulo, yo lo hago de la siguiente manera:
If IsNull(Ado.Recordset!fecegre) Then
txtDias.Text = Ado.Recordset!now - Ado.Recordset!fecing
End If

No se si te valdrá.

Saludos
Ana
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:error 424 Se requiere un objeto

Publicado por ¯¯¯¯¯ (1 intervención) el 17/03/2010 02:52:03
Private Sub Timer1_Timer()
Static a As Integer
a = a + 1
If a = 5 Then
Image1.Picture = LoadPicture("C:\Documents and Settings\  \Mis documentos\Mis imágenes\slipknot\untitled.bmp")
End If
If a = 25 Then
Image1.Picture = LoadPicture("C:\Documents and Settings\  \Mis documentos\Mis imágenes\slipknot\untitled5.bmp")
End If
If a = 35 Then
Image1.Picture = LoadPicture("C:\Documents and Settings\  \Mis documentos\Mis imágenes\slipknot\slipknot-.bmp")
End If
If a = 45 Then
Image1.Picture = LoadPicture("C:\Documents and Settings\  \Mis documentos\Mis imágenes\slipknot\slipknot.bmp")
End If
If a = 55 Then
a = 0
End If
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar