• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 6626
  • Last Modified:

VBScript to Map network drive

Hi all,

Can someone help me with a VBScript to map a network drive based on Domain account ,on machine ,on group of DL .
thanks a lot in advance.
0
Jyotikadian
Asked:
Jyotikadian
  • 5
  • 2
  • 2
  • +1
1 Solution
 
CSecurityCommented:
Set WshShell = WScript.CreateObject("WScript.Shell")
Set WshNetwork = WScript.CreateObject("WScript.Network")
Set AllDrives = WshNetwork.EnumNetworkDrives()

DriveLetter = "N:" 'must be capitalized
RemotePath = "\\dave\c"

AlreadyConnected = False
For i = 0 To AllDrives.Count - 1 Step 2
If AllDrives.Item(i) = DriveLetter Then AlreadyConnected = True
Next

If AlreadyConnected = False then
WShNetwork.MapNetworkDrive DriveLetter, RemotePath
WshShell.PopUp "Drive " & DriveLetter & " connected successfully."

Else
WShNetwork.RemoveNetworkDrive DriveLetter
WshShell.PopUp "Drive " & DriveLetter & " disconnected."
End if
0
 
CSecurityCommented:
This code adds a network drive to address of RemotePath. If the address already exists, removes that... ;)
0
 
Shiju SasidharanCommented:
or you can use WNetAddConnection API function

http://vb-helper.com/howto_map_network_drive.html
0
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
CSecurityCommented:
shijusn, they are both for VB6... Jyotikadian asks for VBscript code.
0
 
JyotikadianAuthor Commented:
Hi CSecurity,

Though your script works but it does not specify the Domain account or Domain Distribution list. Can you please help me a bit more?
0
 
CSecurityCommented:
What you want to do with domain account? You just going to map a network drive and network drive have a path.

You can specify the path in my code and then map it.
0
 
EDDYKTCommented:
may be not domain administrator has capable to see the drive

8->
0
 
EDDYKTCommented:
may be just shell with net use?
0
 
CSecurityCommented:
You can use net use command like:

net use w: \\monolith\pc_dist boviks_password /user:SCS\bovik
0

Featured Post

VIDEO: THE CONCERTO CLOUD FOR HEALTHCARE

Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.

  • 5
  • 2
  • 2
  • +1
Tackle projects and never again get stuck behind a technical roadblock.
Join Now