[R] Supprimer tous les fichiers de la meme date

[Eldes]

Bonjour.

Je suis un nouvel utilisateur d'autoit (3 semaines environ) et je voie tous le potentiel qu'offre ce logiciel.
De plus avec l'aide que vous proposé sur ce forum cela permet d'envisager encore plus d'application, pour cela je vous remerci vous les membres actif.

Voici donc mon probleme:

Dans un dossier sur un nass, je dois effacer des dossiers de la meme dates mais qui on une heure diférentes.

AUjourd'hui j'y arrive sans la variable qui est l'heure, voir le code que join:

Code : Tout sélectionner

$temp = @MDAY -7 & " " & @MON & " " & @YEAR

$t1 = FileGetTime("\\Chemin_du_fichier\Back Up du " & $temp ,1)

while $t1 = FileGetTime("\\Chemin_du_fichier\Back Up du " & $temp ,1)
    DirRemove("\\Chemin_du_fichier\Back Up du " & $temp &,1)
wend
 

Je n'arrive pas a le faire lorsque la variable de l'heure est ajouter au nom du fichier, dans ce cas la le nom du dossier ressemble a Back Up du " & $temp & "heure".

Pourriez vous m'aider s il vous plait?

Cordialement.

[sylvanie]

Bonsoir,
si je vous suis bien vous voulez supprimer des répertoires dont la date est communesq sauf l'heure.
Si c'est le cas inspirez vous de ceci :

Code : Tout sélectionner

$dir_to_scan=@ScriptDir
$dirpatern="\toremove*"
$hnd=FileFindFirstFile($dir_to_scan&$dirpatern)
While 1
    $dir = FileFindNextFile($hnd)
    If @error Then ExitLoop
    DirRemove($dir,1)
WEnd
FileClose($hnd)
 

là je supprime tous les répertoire de mon répertoire courrant ayant pour nom "toremove*".
Dans votre cas la pattern sera donc la date sans l'heure, et l'étoile dans la recherche fera le reste

[Eldes]

Bonjour.

J'ai essayé d'utiliser votre programme mais sa fonctionne pas.
J'ai donc tenté de le faire sans boucle voir le code ci-dessous.

Code : Tout sélectionner

$temp = @MDAY -7 & " " & @MON & " " & @YEAR
$chemin = "\\Chemin_du_fichier\Bach up du " & $temp & " a*"
$t1 = FileFinfFirstFile($Chemin)
Dirremove($t1,1)

 

"*" a mon avis ne fonctionne pas pour le "quelque la suite de mon chemin"

Merci de votre aide.

Cordialement.

[sylvanie]

L'étoile est bien un joker.
Par contre essayer un remove sur un FileFindFirstFile ... gardez à l'esprit que ça renvoie un handle et non un dossier/fichier.

Par contre il est possible qu'il manque le répertoire absolu dans votre cas, car dans mon exemple le workingdir correspond à l'endroit où se trouvait les répertoires, donc ça fausse ...

éssayez don en incluant le chemin complet dans le dirremove:

Code : Tout sélectionner

$dir_to_scan=@ScriptDir&"\tosearch"
$dirpatern="\rep*"
$hnd=FileFindFirstFile($dir_to_scan&$dirpatern)
While 1
    $dir = FileFindNextFile($hnd)
    If @error Then ExitLoop
    DirRemove([color=#FF0000]$dir_to_scan[/color]&"\"&$dir,1)
WEnd
FileClose($hnd)
 

[Eldes]

Merci beaucoup Sylvanie, mon petit programme fonctionne, merci de temps que tu as pris pour m'aider.

Cordialement

[Jerome]

Coucou,

N'oubliez pas la balise [R] dans le titre de votre premier message si votre sujet est résolu.





Jérôme