Récupération date d'un fichier !Résolu

Question

Bonjour à toutes et à tous.

J'aimerais savoir si il est possible de récupérer la date du fichier .exe de l'application en cours ?

Pour être plus clair : je compile le prog Date.exe dans lequel j'affiche automatiquement la date de l'application dans le Form1.caption.

Par avance merci !

Olivier

PCPT · Accepted Answer

salut Private Sub Form_Load() Dim sPath As String sPath = App.Path If RightB$(sPath, 2) <> "" Then sPath = sPath & "" If CBool(App.LogMode) Then MsgBox FileDateTime(sPath & App.EXEName & ".exe") Else MsgBox "visible uniquement en compilé...." End If Unload Me End Sub Coloration syntaxique automatique [AFCK] ++ PCPT [AFCK]

Prenez un instant pour répondre à ce sondage svp

mortalino · Answer

Si j'ai bien compris tu veux mettre la date courante dans le caption la Form de ton exe ! Coloration syntaxique automatique Private Sub Form_Load() Me.Caption = "Nous sommes le " & _ CStr (Format(Date, "DDDD DD MMMM YYYY")) End Sub Coloration syntaxique automatique @++ Mortalino Le mystérieux chevalier, "Provençal, le Gaulois" Merci de prendre le temps de répondre à ce sondage Merci de prendre le temps de lire le Règlement CS =ZSzeb008_ZNxdm414YYFR

guilleto · Answer

ERRATUM,

Je ne veux pas mettre la date actuelle mais la date du fichier .exe !

Explication : mon programme est compilé le 24 juin 2006 et aujourd'hui on est le 19 juillet 2006 et bien sur mon contrôle il y aura la date du 24 juin 2006 !

Voilà !

Merci d'avance

Olivier

mortalino · Answer

Ahhhhrg ! 

Salut PCPT, t'es trop rapide pour moi...

Je me console en me disant que j'allais fournir une réponse avec FileDateTime aussi

@++ 

  Mortalino 
Le mystérieux chevalier, "Provençal, le Gaulois"

Merci de prendre le temps de répondre à ce 
sondage


Merci de prendre le temps de lire 
le Règlement CS


    http://www.smileycentral.com/?partner=ZSzeb008_ZNxdm414YYFR

Récupération date d'un fichier !

4 réponses

Votre réponse

Discussions similaires