Funziona date() restituisce sempre 30-12-1899

di
Anonimizzato11182
il
2 risposte
/
Anonimizzato11182
Utente anonimizzato

Funziona date() restituisce sempre 30-12-1899

Ciao a tutti,
ho un problema, all'apertura della mia maschera vorrei compilare un campo in automatico con la data, successivamente questo campo verrà salvato su una tabella per tenere traccia della data.
il campo sulla tabella è di tipo data nel formato cifre.
io all'interno dell'evento open della maschera metto questo codice:

"Me.DataBolla.DefaultValue = Date"

il mio risultato però è sempre la stessa data (30-12-1899)
dove sbaglio?

2 Risposte

  • @Alex
    @Alex
    Super Famoso
    Iscritto da
    feb, 2012
    Messaggi:
    8814

    Re: Funziona date() restituisce sempre 30-12-1899

    Commetti 3 errori a mio avviso:
    1) L'evento OPEN è PREMATURO per queste cose... usa LOAD.
    2) Devi usare 2 Eventi(LOAD e CURRENT) in quanto a parte la 1° Apertura, quando e se fai un NEWRECORD che succede...?
    3) La sintassi per assegnare un DefaultValue ad un campo di tipo Data è diversa...

    Riassumendo io farei così
    
Private Sub Form_Load()
  Me!MioControllo.DefaultValue = Str(CDbl(Date()))
End Sub

Private Sub Form_Current()
    If Me.NewRecotd Then Me!MioControllo.DefaultValue = Str(CDbl(Date()))
End Sub
    Ciao
  • /
    Anonimizzato11182
    Utente anonimizzato

    Re: Funziona date() restituisce sempre 30-12-1899

    Grazie mille alex ora funziona da dio.

    grazie ancora
Devi accedere o registrarti per scrivere nel forum
2 risposte