COPIE FICHIERS

[DAVID]

BONSOIR LES PROS,

Un petit exemple vaut mieux qu'un long discours pour une copie de fichiers.
Je compte sur votre professionalisme pour aider ce modeste que je suis pour ce problème.
Merci

 

[Zon]

Salut,

3 petites erreurs:

For i = 1 To .founfiles.Count 'il manque un D à founfiles
fso.copyfile.FoundFiles (i), "C:\mes documents\titi"'il manque un espace entre copy file et .foundfiles ,comme sous DOS il manque un slash
Next i

Cela devient donc:

For i = 1 To .FoundFiles.Count
fso.copyfile .FoundFiles(i), "C:\mesdocuments\titi\"
Next i

A+++

 

[DAVID]

Je te remercie,
Je vais tester cela immédiatement,
A +++