Forum
Merhaba ,
Set objNetwork = CreateObject("WScript.Network")
objNetwork.MapNetworkDrive "T:" , "\\10.1.0.125\ofis" böyle bir vbs hazırladım. Yanlız 2. bir map daha eklemem gerekiyor. örn. \\10.1.0.125\users\finans gibi.. Bunu nasıl eklersem çalışır?
Tşk.
Merhaba;
objNetwork.MapNetworkDrive "T:" , \\10.1.0.125\ofis
objNetwork.MapNetworkDrive "X:" , \\10.1.0.125\finans Finans klasörünü paylasına actıgın için users yazmana gerek yok.
hazırladıgın scriptin sonun eklersen T nin hemen altına 2 dosyayıda mapler.
Örnek; Log on için.
On Error Resume Next
Set objNetwork=CreateObject("WScript.Network")
objNetwork.MapNetworkDrive "x:" , "\\192.168.1.10\data"
objNetwork.MapNetworkDrive "p:" , \\192.168.1.5\abc
Log off için;
On Error Resume Next
Set objNetwork=CreateObject("WScript.Network")
objNetwork.RemoveNetworkDrive "x:"
objNetwork.RemoveNetworkDrive "p:"
objNetwork.MapNetworkDrive "X:" , "\\10.1.0.125\Users\Muhasebe\ilhan"
Bu dizinde map etmiyor.
objNetwork.MapNetworkDrive "X:" , "\\10.1.0.125\Users" bu dizinde ediyor. Neden acaba?
\\10.1.0.125\Users\Muhasebe\ilhan bu dizin paylaşıma açık mı? Açık değilse açmanız gerekir.
\\10.1.0.125\Users\Muhasebe\ilhan bu dizin paylaşıma açık mı? Açık değilse açmanız gerekir.
Açık paylaşıma \\fileserver\users\Muhasebe\İlhan yaptığımda erişebiliyorum.
çalıştı hocam. bir değişiklik yapmadım. Teşekkürler.
On Error Resume Next
Set objNetwork=CreateObject("WScript.Network")
objNetwork.MapNetworkDrive "x:" , "\\10.1.0.125\Users"
objNetwork.MapNetworkDrive "p:" , "\\10.1.0.125\Users\Muhasebe\ilhan"
Ben yukarıdaki kodu kendime göre düzenlediğimde erişiyorum. Kodunu bir kontrol eder misin?
Geri dönüş için teşekkürler...