Beyaz.Net İpucu
Birden Fazla Sürücüye Map Etme İşlemi
Merhaba,
Aşağıdaki script kullanılarak birden fazla paylaşıma açılmış olan klasörü map yapabiliriz.Örneğimizde, Server altındaki Share1, Share2 ve Share3 klasörlerini M, P ve S sürücü harflerine atadık.
Option Explicit
Dim objNetwork, strRemotePath1, strRemotePath2, strRemotePath3
Dim strDriveLetter1, strDriveLetter2, strDriveLetter3
strDriveLetter1 = “M:”
strDriveLetter2 = “P:”
strDriveLetter3 = “S:”
strRemotePath1 = “\\Server\Share1”
strRemotePath2 = “\\Server\Share2”
strRemotePath3 = “\\Server\Share3”
Set objNetwork = CreateObject(“WScript.Network”)
objNetwork.MapNetworkDrive strDriveLetter1, strRemotePath1
objNetwork.MapNetworkDrive strDriveLetter2, strRemotePath2
objNetwork.MapNetworkDrive strDriveLetter3, strRemotePath3
Hakan Söylemez
Sistem ve Network Uzmanı