TUTOS.EU

Monter un lecteur réseau en VbScript

Monter un lecteur réseau sous Windows avec un script vbs

Option Explicit

Dim WSHNetwork, varUser, varPassword

varUser = "monlogin"
varPassword = "MonPassword"

Set WSHNetwork = CreateObject("WScript.Network")
	
Err.Clear
On Error Resume Next
WSHNetwork.RemoveNetworkDrive "Y:"

Err.Clear
WSHNetwork.MapNetworkDrive "Y:" , "\\192.168.1.12\MonPartage", False, varUser, varPassword
Lien vers le fichier : cliquez ici

Maintenant que vous être authentifié sur le partage à atteindre,
si vous voulez lancer un explorer directement sur la partage à atteindre, vous pouvez ajouter ceci :

Option Explicit

Dim WSHShell, Commande

Set WSHShell = CreateObject("WScript.Shell")

Commande = "\\192.168.1.12\MonPartage"

WSHShell.Run Commande
Set WSHShell = Nothing
Lien vers le fichier : cliquez ici

Pages Web

Site WebDescription
ss64.comComment monter un lecteur réseau en vbs