DateLastAccessed pour fichier en VB6

Bonjour,

Je suis en VB6.
Ci-dessous mon code qui me permet de trouver la date et l'heure du dernier accés à un fichier.
Le problème c'est qu'il ne me donne que la date, pas l'heure.
J'obtiens : 03/12/2008 00:00:00 et j'ai vérifié, mon dernier accés n'était pas à minuit pile !

J'ai l'impression, que la commande DateLastAccessed renvoit la date mais pas l'heure. Est-ce vrai ?
Sinon, pourquoi je n'ai pas l'heure ?

Salut

DD05

Private Sub Form_Load()
 Dim f As File
 Set fso = CreateObject("Scripting.FileSystemObject")
 Nom_fichier = "C:\TOTO.TXT"
 If (FichierExiste(Nom_fichier) = True) Then
  Set f = fso.GetFile(Nom_fichier)
  s = Format(f.DateLastAccessed, "dd/mm/yyyy hh:mm:ss")
  Form1.Text1 = s
 End If
End Sub

Salut,

Merci pour ta réponse.

Mais rien à faire, en mettant la ligne de code suivante dans le même contexte, je n'ai que la date qui s'affiche.
Je ne sais plus quoi faire. D'où cela peut venir ?

DD05

Form1.Text1.Text = f.DateLastAccessed