IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

EDI, CMS, Outils, Scripts et API PHP Discussion :

Copie de fichier par rapport à la date de modification


Sujet :

EDI, CMS, Outils, Scripts et API PHP

  1. #1
    Membre du Club
    Profil pro
    Inscrit en
    Mai 2009
    Messages
    54
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2009
    Messages : 54
    Points : 48
    Points
    48
    Par défaut Copie de fichier par rapport à la date de modification
    Bonjour,

    j'aimerais obtenir de l'aide quant à la mise en place d'un script qui me ferait la copie de fichier par rapport à sa date de modification. En effet, le script doit copier les fichier ayant une extension .bak d'un répertoire vers un autre mais ne prenant que les fichiers ayant la date de modification la plus récente.

    j'ai essayé avec xcopy mais n'est pas trouvé les commandes pour la date de modification la plus récente.

    merci d'avance pour votre aide

  2. #2
    Membre éprouvé
    Homme Profil pro
    Développeur Web
    Inscrit en
    Mai 2009
    Messages
    736
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 37
    Localisation : Maroc

    Informations professionnelles :
    Activité : Développeur Web
    Secteur : High Tech - Multimédia et Internet

    Informations forums :
    Inscription : Mai 2009
    Messages : 736
    Points : 1 101
    Points
    1 101
    Par défaut
    tu pourra récupérer la date de modification d'un fichier par
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    $filelastmodified = filemtime("chemin de ton fichier");
    et avec
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    (time()-$filelastmodified)
    tu aura la petite valeur est la plus récente
    A la recherche d'un film : http://chercher-un-film.com

  3. #3
    Membre du Club
    Profil pro
    Inscrit en
    Mai 2009
    Messages
    54
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2009
    Messages : 54
    Points : 48
    Points
    48
    Par défaut
    Merci pour ces indications mais je ne sais pas trop comment ajouter cela à mon script.

    voici comment j'avais commencé mon script mais cela ne semble pas fonctionner comme espéré:


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    On Error Resume Next
     
    MyDate = DateAdd("d", 1, date)
    source = "RepertoireSource\*.txt"
    destination = "RepertoireDestination\ /D:"
     
    StrCommand = "xcopy " & source & destination & MyDate
     
     
    Set objShell = CreateObject("WScript.Shell")
     
     
    ' wscript.echo StrCommand
     
    objWshShell.Run strCommand, 1, True
    Pourrais tu m'aider à implémenter la variable "Filelastmodified" dans mon script

  4. #4
    Membre du Club
    Profil pro
    Inscrit en
    Mai 2009
    Messages
    54
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2009
    Messages : 54
    Points : 48
    Points
    48
    Par défaut
    je viens de trouver une autre solution qui semble fonctionner, mon seul pb ici est de ne prendre que les fichier ayant une extension .txt


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    Dim sourcePath,targetPath,objFile,totalFiles,fso
    Set fso = CreateObject("Scripting.FileSystemObject")
    sourcePath = "Source"
    If fso.GetFolder(sourcePath).Files.Count <= 1 Then
    Wscript.Quit
    End If
    Set sourceFolder = fso.GetFolder(sourcePath)
    targetPath = "Destination"
    Dim oldestFile, oldestDate
    For Each objFile In sourceFolder.Files
    If oldestFile = "" Then
    Set oldestFile = objFile
    Else
    If objFile.DateLastModified > oldestFile.DateLastModified Then
    Set oldestFile = objFile
    End If
    End If
    Next
    oldestFile.Copy targetPath & "\" & oldestFile.Name
    Wscript.Quit

Discussions similaires

  1. Réponses: 2
    Dernier message: 03/02/2014, 15h19
  2. Déplacer un fichier par rapport à la date
    Par hihara dans le forum VBScript
    Réponses: 1
    Dernier message: 28/05/2012, 19h47
  3. [Batch] Supprimer un fichier par rapport à la date
    Par batchi dans le forum Scripts/Batch
    Réponses: 2
    Dernier message: 28/04/2010, 16h15
  4. Réponses: 6
    Dernier message: 14/05/2007, 00h14
  5. Supprimer un fichier par rapport a une date
    Par NewB dans le forum Linux
    Réponses: 2
    Dernier message: 25/06/2003, 14h44

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo