Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

Codigo Fecha Hoy

Estas en el tema de Codigo Fecha Hoy en el foro de Visual Basic clásico en Foros del Web. 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 ...
  #1 (permalink)  
Antiguo 21/01/2009, 15:45
 
Fecha de Ingreso: julio-2007
Mensajes: 1
Antigüedad: 16 años, 9 meses
Puntos: 0
Codigo Fecha Hoy

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.
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 03:15.