AutoIt Français

jguinch a écrit : ↑lun. 19 juin 2017 16:45 Quand tu exécutes une fonction, il faut utiliser les parenthèses :

Code: [Tout sélectionner] [Déplier/Replier]

MsgBox($MB_SYSTEMMODAL, "", "la date du jour est " & _NowDate() )

GeSHi © Extension Codebox Plus

Pour ce dont tu as besoin, tu peux aussi faire comme ça :

Code: [Tout sélectionner] [Déplier/Replier]

If $sDate = @YEAR & @MON & @MDAY Then
   ; FileCopy(.....)
Else
   ; ....s
EndIf

GeSHi © Extension Codebox Plus

#include <MsgBoxConstants.au3>
#include <FileConstants.au3>
#include <Date.au3>

Example()

Func Example()
    ; Crée une constante locale du chemin du fichier qui sera lu.
        Local Const $sFilePath = "C:\File*.txt"
        Local Const $newFilePath = "C:\Test"

        MsgBox($MB_SYSTEMMODAL, "", "test " & $sFilePath)

        Local $DateFic = FileGetTime ($sFilePath,1,1)
        Local $sDate = StringTrimRight($DateFic, 6)
        MsgBox($MB_SYSTEMMODAL, "", "Le(s) fichier(s) " & $sFilePath & " à la date " & $sDate)
        MsgBox($MB_SYSTEMMODAL, "", "la date du jour est " & _NowDate() )


    Local $iFileExists = FileExists($sFilePath)

    ; Affiche si le fichier existe ou pas.
    If $iFileExists Then
                if ($sDate == @YEAR & @MON & @MDAY) Then
                        MsgBox($MB_SYSTEMMODAL, "", "Le fichier existe." & @CRLF & "FileExist a retourné: " & $iFileExists)
                        Local $newFileExists = FileCopy ($sFilePath,$newFilePath,$FC_OVERWRITE )
                        MsgBox($MB_SYSTEMMODAL, "", "Copie du fichier " & $newFileExists)
                Else
                        MsgBox($MB_SYSTEMMODAL, "", "Fichier(s) trop ancien(s)")
                EndIf
    Else
        MsgBox($MB_SYSTEMMODAL, "", "Le fichier n'existe pas." & @CRLF & "FileExist a retourné: " & $iFileExists)
    EndIf

EndFunc

walkson a écrit : ↑mer. 21 juin 2017 11:31 Bonjour,
Vous ne pouvez pas écrire Local Const $sFilePath = "C:\File*.txt" car ce fichier n'existe pas.
Regardez https://www.autoitscript.fr/forum/viewt ... =3&t=14573 ou encore https://www.autoitscript.fr/forum/viewt ... =3&t=14544 dont les posts sont proches de votre problème

Mel14141 a écrit : ↑lun. 26 juin 2017 15:24 Merci pour ta réponse cependant cela fonctionne bien.

mikell a écrit : ↑lun. 26 juin 2017 22:12 Pour ce genre de recherche/tri simple, ça peut se faire "à l'ancienne"
Note que dans ce cas, la wildcard est acceptée dans FileFindFirstFile("C:\File*.txt")

Code: [Tout sélectionner] [Déplier/Replier]

$path = @desktopdir& "\"
$newpath = @desktopdir & "\test\"

$hSearch = FileFindFirstFile($path & "File*.txt")
If $hSearch = -1 Then MsgBox(0, "", "rien trouvé")

Local $FileName = "", $n = 0
While 1
    $FileName = FileFindNextFile($hSearch)
    If @error Then ExitLoop
    $sFilePath = $path & $FileName
    $DateFic = StringTrimRight(FileGetTime($sFilePath, 1, 1), 6)
    If $DateFic = @YEAR & @MON & @MDAY Then
        FileCopy($sFilePath, $newpath, 9)
        $n += 1
    EndIf
WEnd
FileClose($hSearch)

MsgBox(0, "", $n & " nouveaux fichiers copiés")
 

GeSHi © Extension Codebox Plus

Salut Mikell,

J'ai testé ton code, il ne trouve jamais de fichier même si je les crée à la main pour être sur qu'il en existe bien un.
As-tu une idée ?

Merci pour ta participation en tout cas.

mikell a écrit : ↑mer. 28 juin 2017 21:26 Vérifie les chemins, il faut adapter le code avec tes données à toi. Par exemple en mettant les chemins de ton code du post #5 ça donne :

Code: [Tout sélectionner] [Déplier/Replier]

$path = "C:\"
$newpath = "C:\test\"

GeSHi © Extension Codebox Plus

et FileFindFirstFile($path & "File*.txt") détecte les fichiers du genre "C:\File123.txt", "C:\FileABC.txt", etc