Sign in to follow this  
Followers 0
Daedlus

How To: Create and Rename Network Drives

1 post in this topic

If you want to automatically add and rename a network drive do the following:

Open Up notepad, then copy and paste the following:

Set objFSO = CreateObject("Scripting.FileSystemObject")
If objFSO.DriveExists("T:\") Then
set renameShell = createObject("shell.application")
mappedDrive = "T:\"
renameShell.nameSpace(mappedDrive).self.name = "DriveName"
End If

Make chages to reflect your drive letter and drive name

Save it as Rename.vbs

What this script does is checks to see if the T drive exists. If it does it renames it to DriveName. If it doesn't exist then it does nothing.

Open Up notepad again, then copy and paste the following:

net use T: \\Tango\D /user:USERNAME PASSWORD
C:\(Path)\Rename.vbs

Again make changes to Drive letter, Computer name, computer share, username and password, and path to where you placed Rename.vbs

Save it as Network.cmd

This will Create a T drive from computer Tango sharing a drive (or folder) called D. Username and password are for users that have access to that share. Then it runs the vbs script that we created above to rename the Drive.

0

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0

  • Recently Browsing   0 members

    No registered users viewing this page.