Hola amigos.
 
Tengo una pequeña duda y ojala me puedan ayudar.
 
Tengo una base de datos en access la cual en un formulario tengo un campo llamado fecha y varios mas....en dicho formulario hice un boton que me ayuda a buscar folios el punto es que necesito crear un codigo dentro del boton para que en el campo fecha me anote la fecha hoy.
 
ya use la propiedades del campo en la pestaña datos del valor predeterminado utilizando el date() y sigue sin aparecerme la fecha hoy.
 
envio el codigo para que me digan en donde hay que hacer la correcion.
 
 
Private Sub Texto95_Exit(Cancel As Integer)
 
Dim fechadehoy As Date
 
fechadehoy = Format(Now, "dd-mmm-yy")
 
If Nz(Me.Texto95, "") = "" Then
    MsgBox "Anote el Numero de Folio"
    fechadehoy = Me.RECEPCION_MESA
Else
    If DCount("*", "03Control_Instrucciones", "[folio] =" & Me.Texto95) = 0 Then
        MsgBox "Lo siento, pero no hay folio"
    Else
        Me.Filter = "[folio] =" & Me.Texto95
        Me.FilterOn = True
        Me.RECEPCION_MESA.SetFocus
 
 End If
 
End If
 
End Sub
 
 
agradezco su ayuda. 
   
 

