Besoin d'aide pour dater l'éxecution d'un script

mobilopi -  
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Je suis entrain de créer un petit programme de sauvegarde qui lance un script robocopy quand l'utilisateur clique sur le bouton "Sauvegarder Maintenant".
J'aimerais pouvoir afficher la date de la dernière sauvegarde effectuée.

Comment dois-je m'y prendre ?



A voir également:

6 réponses

mobilopi
 
Voila ce que j'ai en tête:
J'aimerais pouvoir récupérer la date de pression sur le bouton "sauvegarder maintenant" dans mon fichier .ini

pour ensuite pouvoir la lire à chaque exécution du programme.
Comment faire ?
0
mobilopi
 
up
0
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Bonjour,

a adapter:

 With ActiveWorkbook
 MsgBox "auteur: " & .BuiltinDocumentProperties("Author") & vbLf & _
                "le: " & .BuiltinDocumentProperties("creation date") & vbLf & _
                "dernier enregistrement le " & .BuiltinDocumentProperties("last save time") & vbLf & _
                " par: " & .BuiltinDocumentProperties("last author")
 End With

0
mobipoli
 
Merci de votre réponse.

J'avais plutôt en tête un code qui
-récupère la date du clique
-L'enregistre dans mon fichier .ini
Dans: [Date]
ManualSave=19/06/2016

Ayant déjà codé autour du fichier ini en question.

Comment puis-je faire ?
0
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
Comme ceci:

Dim chemin As String
  Close
  chemin = ThisWorkbook.Path & "\"
  Open chemin & "Fichier.txt" For Output As #1
  Print #1, ActiveWorkbook.BuiltinDocumentProperties("last save time")
  Close

0
mobilopi
 
J'aurai du le préciser plus tôt mais je ne suis pas sous excel, donc je ne peux pas utiliser la fonction workbook, je suis sous Microsoft Visual Basic 2010 Express
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
mobilopi
 
J'aurai du le préciser plus tôt mais je ne suis pas sous excel, donc je ne peux pas utiliser la fonction workbook, je suis sous Microsoft Visual Basic 2010 Express
0
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   729
 
0