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

mobilopi -  
cs_Le Pivert Messages postés 8437 Statut Contributeur -
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 ?

6 réponses

  1. 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
  2. cs_Le Pivert Messages postés 8437 Statut Contributeur 730
     
    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
    1. 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
  3. cs_Le Pivert Messages postés 8437 Statut Contributeur 730
     
    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
    1. 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
  4. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  5. 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