Bonjour
avec la code suivant
je copie sur un lecteur Réseau des fichiers (y)
Comment peux-tu lorsque la copie est terminée
Enlever ce lecteur
J'ai testé ceci sans succes
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
 
set fso = CreateObject("Scripting.FileSystemObject")
set shl = CreateObject("wscript.shell")
call MappageLecteur
shl.run "command /c xcopy/s E:\TEST y:\TEST\ <r-file.txt > LogTEST.txt"
call SupMappageLecteur
 
sub SupMappageLecteur
  Dim WshNetwork
    Set WshNetwork = WScript.CreateObject("WScript.Network")
    WshNetwork.RemoveNetworkDrive "Y:"
End Sub
 
Sub MappageLecteur
    Set Net = CreateObject("WScript.Network")  
    Dim WshNetwork
    Set objNetwork = CreateObject("WScript.Network") 
    objNetwork.MapNetworkDrive "Y:", "\\PCTEST\C$\TEST"
End Sub
Le mappage se fait bien
La copie s'effectue uniquement si j'enleve le call SupMappageLecteur
En revanche, si le laisse le call SupMappageLecteur
Les fichiers ne sont pas copiés et le Lecteur réseau reste connecté
Merci pour vos réponses