formatering af dato

Lav en lille funktion:

Function AccessDate(dato)
  AccessDate = Year(dato) & \" \" & Month(dato) & \" \" & Day(dato)
END FUNCTION

Hej twg!
Når jeg indsætter dato i db, vælger først inde i
Access db-en under design.  Datofelt.
Når Access så ved, at i det felt kommer en dato,
bruger du så bare :
Dim strDato
strDato = now
så indsætter du bare strDato.
Hvis du ikke gider at have \"tiden\" med så :
strDato = date

Når du bruger Date, skal DB-feltet være et tal.