Publicité
+ Répondre à la discussion
Affichage des résultats 1 à 4 sur 4
  1. #1
    Futur Membre du Club
    Inscrit en
    mai 2009
    Messages
    54
    Détails du profil
    Informations forums :
    Inscription : mai 2009
    Messages : 54
    Points : 19
    Points
    19

    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 émérite
    Homme Profil pro Taoufiq Ben
    Développeur Web
    Inscrit en
    mai 2009
    Messages
    697
    Détails du profil
    Informations personnelles :
    Nom : Homme Taoufiq Ben
    Âge : 27
    Localisation : Maroc

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

    Informations forums :
    Inscription : mai 2009
    Messages : 697
    Points : 901
    Points
    901

    Par défaut

    tu pourra récupérer la date de modification d'un fichier par
    Code :
    $filelastmodified = filemtime("chemin de ton fichier");
    et avec
    Code :
    (time()-$filelastmodified)
    tu aura la petite valeur est la plus récente

  3. #3
    Futur Membre du Club
    Inscrit en
    mai 2009
    Messages
    54
    Détails du profil
    Informations forums :
    Inscription : mai 2009
    Messages : 54
    Points : 19
    Points
    19

    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 :
    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
    Futur Membre du Club
    Inscrit en
    mai 2009
    Messages
    54
    Détails du profil
    Informations forums :
    Inscription : mai 2009
    Messages : 54
    Points : 19
    Points
    19

    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 :
    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

Liens sociaux

Règles de messages

  • Vous ne pouvez pas créer de nouvelles discussions
  • Vous ne pouvez pas envoyer des réponses
  • Vous ne pouvez pas envoyer des pièces jointes
  • Vous ne pouvez pas modifier vos messages
  •