Script création lecteur réseau
Par ALJD le jeudi, juillet 10 2014, 15:50 - Programmation - Lien permanent
En tant qu'Administrateur Réseau, je programme beaucoup de Script vbs ou batch, dans mon billet, je vais expliquer un script très simple pour créer un lecteur réseau par script. Dans mon entreprise, je le positionne au démarrage de la session utilisateur comme cela, chaque utilisateur peut avoir plusieurs lecteurs connectés.
J'ai trouvé deux solutions pour créer un script pouvant connecter un lecteur réseau au démarrage d'un ordinateur.
- La commande Net USE
C'est la plus simple, il y a juste une ligne de code pour mapper un lecteur Réseau. NET USE
[nom_périphérique | *] [\\nom_ordinateur\nom_partage[\volume] [mot_passe | *]] [/USER:[nom_domaine\]nom_utilisateur] [/USER:[nom_domaine_avec_point\]nom_utilisateur] [/USER:[nom_utilisateur@nom_domaine_avec_point] [/SMARTCARD] [/SAVECRED] [[/DELETE] | [/PERSISTENT:{YES | NO}]] NET USE {nom_périphérique | *} [mot_passe | *] /HOME NET USE [/PERSISTENT:{YES | NO}]
Exemple de mon utilisation (Pour l'utiliser vous devez copier les lignes dans un fichier texte, et modifier l'extension en .bat)
REM On supprime s'il y a déjà un mappage avec la lettre choisie NET USE U: /d REM on sélectionne la lettre du Mappage u, puis le chemin réseau, NET USE U: \\SERVEUR\PARTAGE /PERSISTENT :NO
L'option persistent permet la déconnexion automatique du lecteur réseau quand on se déconnecte. Il faudra remplacer « SERVEUR », par le nom de votre serveur, et « PARTAGE », par le nom de votre partage. Information : Le script doit être placé dans le répertoire \\SERVEUR\NETLOGON. Il faut avoir les droits Administrateurs pour modifier le contenu de ce répertoire.
- La commande MapNetworkDrive
La deuxième commande est de la programmation en vbs
Extrait de mon script VBS qui permet de mapper un lecteur P
' ---------------------------------------------------------- ' Connexion Réseau(x) en ligne de Commande ' ---------------------------------------------------------- Dim WshNetwork, oDrives ' Création de l'objet network Set WshNetwork = WScript.CreateObject("WScript.Network") 'Enumération des mappage existant Set oDrives = WshNetwork.EnumNetworkDrives WScript.Echo "Network drive mappings:" 'Boucle pour déconnecter le lecteur avec la lettre choisie, ici le P For i = 0 to oDrives.Count - 1 Step 2 WScript.Echo "Drive " & oDrives.Item(i) & " = " & oDrives.Item(i+1) if oDrives.Item(i) = "P:" then ' DéConnection Lecteur Réseau WshNetwork.RemoveNetworkDrive "P:", "true" end if Next ' Connection du Lecteur Réseau WshNetwork.MapNetworkDrive "P:", "\\SERVEUR\PARTAGE" Set oDrives = WshNetwork.EnumNetworkDrives ' Affichage des lecteurs Mappés For i = 0 to oDrives.Count - 1 Step 2 WScript.Echo "Drive " & oDrives.Item(i) & " = " & oDrives.Item(i+1) Next
Exemple de mon utilisation (Pour l'utiliser vous devez copier les lignes dans un fichier texte, et modifier l'extension en .vbs)