Just simple erros i keep getting. (line 23, car 3..)
I've gone over this and over it and I cant find the problem. So i figured turn to the smart people on EE.
Please help me find whats wrong with this sript. Its just a very simple map drives for users on a domain. Login script.
Thanks in advance
Option Explicit
Dim objNetwork, strRemotePath1, strRemotePath2, strRemotePath3, strRemotePath4, strRemotePath5, strRemotePath6, strRemotePath7, strRemotePath8, strRemotePath9, strRemotePath10, strRemotePath11, strRemotePath12, strRemotePath13
Dim strDriveLetter1, strDriveLetter2, strDriveLetter3, strDriveLetter4, strDriveLetter5, strDriveLetter6, strDriveLetter7, strDriveLetter8, strDriveLetter9, strDriveLetter10, strDriveLetter11, strDriveLetter12, strDriveLetter13
strDriveLetter1 = "z:"
strDriveLetter2 = "Y:"
strDriveLetter3 = "X:"
strDriveLetter4 = "W:"
strDriveLetter5 = "V:"
strDriveLetter6 = "U:"
strDriveLetter7 = "T:"
strDriveLetter8 = "S:"
strDriveLetter9 = "R:"
strDriveLetter10 = "Q:"
strDriveLetter11 = "P:"
strDriveLetter12 = "o:"
strDriveLetter13 = "N:"
strRemotePath1 = "\\file-sr\Danny"
strRemotePath2 = "\\file-srv\Danny scans"
strRemotepath3 = "\\file-srv\Judy"
strRemotepath4 = "\\file-srv\Kelly"
strRemotepath5 = "\\Timber-server\TSGOLD"
strRemotepath6 = "\\timber-server\bestserv"
strRemotepath7 = "\\timber-srv\software"
strRemotepath8 = "\\Timber-server\Scans"
strRemotepath9 = "\\File-srv\Network"
strRemotepath10 = "\\File-srv\Hurricane Ivan"
strRemotepath11 = "\\file-srv\susan"
strRemotepath12 = "\\file-srv\craig"
strRemotepath13 = "\\file-srv\public share"
Set objNetwork = CreateObject("WScript.Netw
ork")
' Section which maps two drives,
objNetwork.MapNetworkDrive
strDriveLetter1, strRemotePath1
objNetwork.MapNetworkDrive
strDriveLetter2, strRemotePath2
objNetwork.MapNetworkDrive
strDriveLetter3, strRemotePath3
objNetwork.MapNetworkDrive
strDriveLetter4, strRemotePath4
objNetwork.MapNetworkDrive
strDriveLetter5, strRemotePath5
objNetwork.MapNetworkDrive
strDriveLetter6, strRemotePath6
objNetwork.MapNetworkDrive
strDriveLetter7, strRemotePath7
objNetwork.MapNetworkDrive
strDriveLetter8, strRemotePath8
objNetwork.MapNetworkDrive
strDriveLetter9, strRemotePath9
objNetwork.MapNetworkDrive
strDriveLetter10, strRemotePath10
objNetwork.MapNetworkDrive
strDriveLetter11, strRemotePath11
objNetwork.MapNetworkDrive
strDriveLetter12, strRemotePath12
objNetwork.MapNetworkDrive
strDriveLetter13, strRemotePath13
Wscript.Quit
' End of Windows Logon Script Example
Start Free Trial