Consolidated Login Script
Novell Cool Solutions: Tip
By Jason Riebe
Digg This -
Slashdot This
Posted: 21 Dec 2006 |
Problem:
We had a requirement to map drives to both NetWare Servers and MS Servers rather than manage multiple login scripts or having dos boxes pop up while executing the net use mappings.
Solution:
We wrote a simple VB script that does the mapping quickly and quietly. The benefit is that we now have a consolidated login script that is easy to read and maintain via edir group memberships. The line in the login script to execute this VBS is:
@wscript.exe r:\networkapps\scripts\mapdrive.vbs "P" "\\servername\sharename$"
Example:
'* Script : MapDrive.vbs '* Purpose: This example Maps a K drive to a Windows share called "data" '* Usage : Runs from network shortcut or login script ' : Syntax: MAPDRIVE.VBS "<driveletterwithoutcolon>" "<\\servername\sharename>" ' : eg. MAPDRIVE.VBS "K" "\\server\data" '* '* Turn off error trapping On Error Resume Next '* Declare the necessary variables Dim Wsh, Net, Arg Set Wsh = Wscript.CreateObject("Wscript.Shell") Set Net = Wscript.CreateObject("Wscript.Network") Set Arg = Wscript.Arguments '* If the incorrect number of arguments were supplied, quit immediately without reporting an error If Arg.Count <> 2 Then Wscript.Quit '* (Re)Map the drive if it doesn't already point to the correct location If UCase(Wsh.RegRead("HKCU\Network\" & Arg.Unnamed(0) & "\RemotePath")) <> UCase(Arg.Unnamed(1)) Then Net.RemoveNetworkDrive Arg.Unnamed(0) & ":", True, True Net.MapNetworkDrive Arg.Unnamed(0) & ":", Arg.Unnamed(1), True End If '* End of script WScript.Quit
Environment:
We are runing XP SP2 with Client 4.91 SP2 and NetWare 6.5 SP5.

Novell Cool Solutions (corporate web communities) are produced by WebWise Solutions. www.webwiseone.com