Access - ¿Que hago mal en este código?

   
Vista:

¿Que hago mal en este código?

Publicado por javier (11 intervenciones) el 10/03/2008 11:42:28
Tengo un problema con un boton de comando que he puesto en un formulario. Tengo 2 tablas una Tabla1 y la otra TAlbaranes con una relacion una a varios. Dentro de la TAlbaranes hay un campo llamado ContadorAlbaranes que mediante código va a buscar el último registro del campo ContadorAlbaranes y le va a sumar 1, pero esta suma quiero que la haga mediante un boton de comando (CerrarAlbaran) que al hacer click ejecute el código pero no me va, ¿dónde fallo? Os pongo el código para ver si alguien me puede ayudar ya que estoy atascado

Private Sub CerrarAlbaran_Click()
Dim NumReg
NumReg = DMax("ContadorAlbaranes", "TAlbaranes")
If IsNull(NumReg) Then
NumReg = 1
Else
NumReg = NumReg + 1
End If
Contador = NumReg

End
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
Imágen de perfil de Enrique Ramírez

RE:¿Que hago mal en este código?

Publicado por Enrique Ramírez (617 intervenciones) el 10/03/2008 16:22:11
Hice tu ejercicio con una tabla mía y si funciona bien tu codigo, si mi tabla no tiene ningun registro el resultado es 1 y le meti dos registros y el resultado es 3, solo se me ocurre que tu campo ContadorAlbaranes no sea numerico, checalo.
este el codigo qie yo use, solo cambie la segunda linea.

Dim NumReg
NumReg = DMax("No_Conse", "Universo")
If IsNull(NumReg) Then
NumReg = 1
Else
NumReg = NumReg + 1
End If
Debug.Print NumReg
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