DD05
Messages postés53Date d'inscriptionmercredi 11 août 2004StatutMembreDernière intervention11 juin 2010
-
4 déc. 2008 à 13:22
DD05
Messages postés53Date d'inscriptionmercredi 11 août 2004StatutMembreDernière intervention11 juin 2010
-
4 déc. 2008 à 19:52
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
pile_poil
Messages postés682Date d'inscriptionvendredi 6 avril 2007StatutMembreDernière intervention 4 août 20126 4 déc. 2008 à 14:46
bonjour
dans le meme contexte j'ai bien la date et l'heure
seule différence c'est que je ne reformate pas la date
j'ai:
s = f.DateLastAccessed
au lieu de
s = Format(f.DateLastAccessed, "dd/mm/yyyy hh:mm:ss")
de plus le résultat est directement au format dd/mm/yyyy hh:mm:ss
de plus ta variable "s" n'est pas déclarée et qui plus est inutile
Text1.text = Format(f.DateLastAccessed, "dd/mm/yyyy hh:mm:ss")
revient exactement au meme
[reglement.aspx ]si c'est la solution, penser : REPONSE ACCEPTEE
DD05
Messages postés53Date d'inscriptionmercredi 11 août 2004StatutMembreDernière intervention11 juin 20101 4 déc. 2008 à 19:52
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 ?