[..] Formule pour d'écrire un fichier avec un nombre

[Mikaas]

Bonjour

me revoila avec un probleme peu etre simple pour certain mais ne sachant pas le therme exacte j'ai un peu de mal a trouver un solution.

Je vous explique :

j'ai un dossier ( C:\Program files\Dossier ) avec des documents aillant tous la meme racine mais pas le meme nombre ( Documents001, Documents002 ... Documents999 )

je souhaiterai savoir comment faire pour faire connaitre a mon script le nombre apres cette racine " Documents "

► Afficher le texte

Code : Tout sélectionner

$C1 = "C:\Direction"
$C2 = "C:\Program files\Dossier"
[b]$SCREEN = " Documents001 " ou 002 etc...[/b]

Func MANUEL1()
    If FileExists($C1 & "\" & "DOC1.jpg") Then
        MANUEL2()
    Else
        FileMove($C2 & "\" & $SCREEN, $C1 & "\" & "DOC1.jpg")
    EndIf
EndFunc   ;==>MANUEL1

dans mon script il fait donc :

Cherche si DOC1.jpg existe à C:\Direction
Si il existe il regarde DOC2 ect... ( je nai pas mis la suite car cela est total repetition )
Si il n'existe pas il prend Documents001 de C:\Program files\Dossier puis le move à C:\Direction renomé par DOC1.jpg si il n'existe pas sinon DOC2 etc...
Si le Documents001 n'est pas présent il prend le suivant 002, 003, 004 ect...

merci d'avance

Ps : un exemple détaillé est toujour le bien venu

[Tlem]

L'utilisation de _FileListToArray('C:\Program files\Dossier', 'Documents*', 1) vous permettra de récupérer la liste de tous les fichiers du dossier.

Ensuite vous pourriez utiliser ceci pour déplacer vos fichiers dans le dossier de destination.
L'exemple détaillé est dans l'archive.

[Mikaas]

Alors voila j'ai télécharger l'udf ( 4 fichiers ) puis mis dans mon dossier avec le script.
Sur le script j'ai modifié :

Dim $Src = "C:\program files\Dossier"
Dim $File = "Documents"
Dim $Dst = "C:\Direction"
Dim $szDrive, $szDir, $szFName, $szExt

et il ma copier les derniers .dat qui sont apparu dans le dossier "C:\program files\Dossier"

alors que je cherche a envoyer les documentsxxx.jpg