Access - vambio numeración al cambiar fecha

   
Vista:

vambio numeración al cambiar fecha

Publicado por paquillo (8 intervenciones) el 13/12/2008 10:18:37
Tengo un campo numérico incremental para el que utilizo lo siguiente:

Private Sub Form_BeforeInsert(Cancel As Integer)
If Me.NewRecord Then
Me.Partida = Nz(DMax("Partida", "Partidas")) + 1
End If
End Sub

Lo que quisiera obtener es que la numeración correlativa que genera, se reinicie cuando cambio la fecha; es decir, que cada día inicie la numeración desde el 1. He leido lo del cambio de numeración al cambiar el año y...... me pierdo por burro.
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:vambio numeración al cambiar fecha

Publicado por Victoria (1530 intervenciones) el 14/12/2008 09:50:28
Hola:
Es fácil
Antes de incrementar tienes que comprobar la fecha, si la útima fecha de la tabla es INFERIOR al día actual, entonces Me.Partida=1 ELSE Me.partida=.... (tu condición)

Algo así:

If Me.NewRecord Then
If fecha (ultimo registro)<Date() then
Me.partida=1
ELSE
Me.Partida = Nz(DMax("Partida", "Partidas")) + 1
End if
End If

Un saludo
Victoria
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:cambio numeración al cambiar fecha

Publicado por paquillo (8 intervenciones) el 15/12/2008 11:36:06
Me funciona !!! Victoria¡¡¡ gracias.
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