If you are working on a file-server, you will need a better way to share folders: that is Network drives. In our design office, We are using a shared folder on our file server. That folder is added to our PCs as a network drive using the vbscript below:
Option Explicit On Error Resume Next Dim objNetwork Set objNetwork = WScript.CreateObject("WScript.Network") Dim strDomain, strUser, strPass Dim mapDriveLetter, mapServerPath ' Setup User Connection Variables strDomain = "NETWORKDOMAIN_OR_SERVER_HOSTNAME" ' objNetwork.UserDomain strUser = "your_user_name_or_server_admin_account" ' objNetwork.UserName strPass = "your_password_or_server_admin_password" ' Remove Previously Mapped Drives objNetwork.RemoveNetworkDrive "M:", True, True objNetwork.RemoveNetworkDrive "N:", True, True objNetwork.RemoveNetworkDrive "R:", True, True ' Map New Network Drives mapDriveLetter = "M:" ' Change drive letter as you wish mapServerPath = "FILESERVERSharedFolderName" ' This is server we are connecting to objNetwork.MapNetworkDrive mapDriveLetter, mapServerPath, True, strDomain & "" & strUser, strPass ' Setting custom username & password for other mapped drives (Remove if not needed) strDomain = "SERVER2_HOSTNAME" strUser = "Administrator" strPass = "AdminPassword" mapDriveLetter = "N:" mapServerPath = "SERVER2_HOSTNAMESharedFolderOnServer2" objNetwork.MapNetworkDrive mapDriveLetter, mapServerPath, True, strDomain & "" & strUser, strPass
After you save this file as connect.vbs, you can run it by double clicking.
It may take a few seconds to connect to server, if it doesn’t please double check username and passwords.