Bonjour à tous,

Voici mon problème : j'ai actuellement un script de démarrage sur les PC que je déploie avec Active Directory. (Script WSH)

Le script permet de connecter des lecteurs réseaux sur les PCs en fonction des services de chaque personne.

Voici la source :

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
21
22
23
24
25
26
 
 
Const INFORMATIQUE = "cn=lecteur service informatique"
 
Set wshNetwork = CreateObject("WScript.Network")
Set fso = CreateObject("Scripting.FileSystemObject")
 
 
'Connection des repertoires communs
 
wshNetwork.MapNetworkDrive "p:","\\serveur\" & wshNetwork.UserName
wshNetwork.MapNetworkDrive "q:","\\serveur\echange"
 
Set ADSysInfo = CreateObject("ADSystemInfo")
Set CurrentUser = GetObject("LDAP://" &ADSysInfo.UserName)
strGroups = LCase(Join(CurrentUser.MemberOf))
 
 
'#############################################################
'#########       LECTEUR INFORMATIQUE            #############
'#############################################################
If InStr(strGroups, INFORMATIQUE) Then  
 
    wshNetwork.MapNetworkDrive "r:","\\serveur\info"
 
End If
Ce script fonctionne très bien la première fois , mais par contre, il me sort que le répertoire est déjà utilisé la deuxième fois...

Avez vous une solution ?

Merci