J'ai trouvé deux solutions pour créer un script pouvant connecter un lecteur réseau au démarrage d'un ordinateur.

  1. 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.

  1. 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)