bonjour à tous
J' utilise la fonction Xcopy pour copier un dossier sur un autre endroit
Quelle est la fonction qui permet de lister les fichiers copiés
de me dire tel et tel fichier sont bien copier

voici mon code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Dim oShell : Set oShell = CreateObject("WScript.Shell")
 Set objFSO = CreateObject("Wscript.Shell")
oShell.Run "Dim oShell : Set oShell = CreateObject("WScript.Shell")
 Set objFSO = CreateObject("Wscript.Shell")
oShell.Run "%comspec% /c xcopy c:\TEST\  i:/e /k /p /i " "
le dossier est bien copié sur i:
j"ai tente la solution suivante:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
Dim oShell : Set oShell = CreateObject("WScript.Shell")
 Set objFSO = CreateObject("Wscript.Shell")
oShell.Run "%comspec% c xcopy c:\TEST\ > i:/e /k /p /i \liste.txt"
mais j'ai le message suivante : accés refusé
merci pour vos réponses