SetConsole("SHOW")

SELECT
CASE @LDOMAIN="TURENNETEAM"
	goto TURENNETEAM
CASE @LDOMAIN="MCGUFFEYTEAM"
	goto MCGUFFEYTEAM
CASE @LDOMAIN="CAPITOLHILLTEAM"
	goto CAPITOLHILLTEAM
CASE @LDOMAIN="WESTSIDETEAM"
	goto WESTSIDETEAM
CASE @LDOMAIN="PMCOTEAM"
	goto PMCOTEAM
CASE 1
	"You are not a part of a domain"
ENDSELECT

goto END



:TURENNETEAM
;*****map network drives******************************************
	USE "*" /DELETE
	USE P:	"\\TURENNE-NAS1\HO\NETDRIVE"
;*****delete all printers to clear out old printer mappings*******
	deltree("HKEY_CURRENT_USER\Printers\Connections")
;*****add these current printers back*****************************
	addprinterconnection ("\\TURENNEMSTR\HO - Savin2535")
	addprinterconnection ("\\TURENNEMSTR\HO - LJ2200")
	addprinterconnection ("\\TURENNEBKUP\CHC - BO - LJ1200")
	addprinterconnection ("\\TURENNEBKUP\CHC - Payroll - LJ2200")
	addprinterconnection ("\\TURENNEBKUP\MHC - Office - Savin9922")
	addprinterconnection ("\\TURENNEBKUP\MHC - BO - LJ4050")
	addprinterconnection ("\\TURENNEBKUP\WST - BO - LJ4200")
	addprinterconnection ("\\TURENNEBKUP\WST - DON - LJ2200")
;*****end TURENNETEAM section and stop script*********************
	goto END



:MCGUFFEYTEAM
;*****map network drives******************************************
	If InGroup ("MCGUFFEYTEAM\Domain Users")
		USE "*" /DELETE
		USE P:	"\\MHC2K02\NETDRIVE"
	EndIf
;*****delete all printers to clear out old printer mappings*******
	deltree("HKEY_CURRENT_USER\Printers\Connections")
;*****add these current printers back*****************************
;	SELECT
;	CASE InGroup ("1st Hall")
;	CASE InGroup ("2nd Hall")
;	CASE InGroup ("3rd Hall")
;	CASE InGroup ("4th Hall")
;	CASE InGroup ("5th Hall")
;	CASE InGroup ("Business Office")
;	CASE InGroup ("Etc...Etc...Etc")
;	ENDSELECT
	addprinterconnection ("\\TURENNEBKUP\MHC - Office - Savin9922")
	addprinterconnection ("\\TURENNEBKUP\MHC - BO - LJ4050")
	addprinterconnection ("\\TURENNEBKUP\MHC - 2ndHall - LJ4Plus")
	addprinterconnection ("\\TURENNEBKUP\MHC - Dietary - LJ2300")
	addprinterconnection ("\\TURENNEBKUP\MHC - Payroll - LJ2200")
	addprinterconnection ("\\TURENNEBKUP\MHC - 4thHall - LJ1300N")
;*****end MCGUFFEYTEAM section and stop script*********************

	goto END



:CAPITOLHILLTEAM
;*****map network drives******************************************
	If InGroup ("CAPITOLHILLTEAM\Domain Users")
		USE "*" /DELETE
		USE P:	"\\CHC2K01\NETDRIVE"
	EndIf
;*****delete all printers to clear out old printer mappings*******
	deltree("HKEY_CURRENT_USER\Printers\Connections")
;*****add these current printers back*****************************
;	SELECT
;	CASE InGroup ("One North")
;	CASE InGroup ("Two North")
;	CASE InGroup ("Three North")
;	CASE InGroup ("Two South")
;	CASE InGroup ("Three South")
;	CASE InGroup ("Business Office")
;	CASE InGroup ("Etc...Etc...Etc")
;	ENDSELECT
	addprinterconnection ("\\TURENNEBKUP\CHC - 1West - LJ1300N")
	addprinterconnection ("\\TURENNEBKUP\CHC - 2North - LJ1300N")
	addprinterconnection ("\\TURENNEBKUP\CHC - 2South - LJ1300N")
	addprinterconnection ("\\TURENNEBKUP\CHC - 3North - LJ1300N")
	addprinterconnection ("\\TURENNEBKUP\CHC - 3South - LJ1300N")
	addprinterconnection ("\\TURENNEBKUP\CHC - BO - LJ1200")
	addprinterconnection ("\\TURENNEBKUP\CHC - HR - LJ1300N")
	addprinterconnection ("\\TURENNEBKUP\CHC - OneWest - LJ4050")
	addprinterconnection ("\\TURENNEBKUP\CHC - Payroll - LJ2200")
	addprinterconnection ("\\TURENNEBKUP\CHC - Rehab1 - LJ1300N")
	addprinterconnection ("\\TURENNEBKUP\CHC - RehabDirector - DJ845c")
	addprinterconnection ("\\TURENNEBKUP\CHC - 1West - LJ1300N")
	addprinterconnection ("\\TURENNEBKUP\CHC - Reception - Phaser850N")
;*****end CAPITOLHILLTEAM section and stop script*********************	

	goto END



:WESTSIDETEAM
;*****map network drives******************************************
	If InGroup ("WESTSIDETEAM\Domain Users")
		USE "*" /DELETE
		USE F:	"\\wst2k03\file-server-data"
		USE G:	"\\wst2k03\NetApps"
		USE H:	"\\wst2k03\Users\@userid"
		USe S:	"\\wst2k03\Depts"
	EndIf
;*****delete all printers to clear out old printer mappings*******
	deltree("HKEY_CURRENT_USER\Printers\Connections")
;*****add these current printers back*****************************
	SELECT
	CASE InGroup ("WESTSIDETEAM\Business Office")
		addprinterconnection("\\wst2k03\WST - Phaser - 8400")
	CASE InGroup ("WESTSIDETEAM\Admissions")
		addprinterconnection("\\wst2k03\WST - Phaser - 8400")
	CASE InGroup ("WESTSIDETEAM\Admin")
		addprinterconnection("\\wst2k03\WST - Phaser - 8400")
	CASE InGroup ("WESTSIDETEAM\Activities")
		addprinterconnection("\\wst2k03\WST - Phaser - 8400")

;	CASE InGroup ("North")
;	CASE InGroup ("Rehab")
;	CASE InGroup ("Business Office")
;	CASE InGroup ("Etc...Etc...Etc")

	ENDSELECT
	addprinterconnection("\\wst2k03\WST - BO - LJ4200")
	addprinterconnection("\\wst2k03\WST - DON - LJ2100")
	addprinterconnection("\\wst2k03\WST - Care - LJ4200")
	addprinterconnection("\\turennebkup\WST - WEST - LJ1300n")
	addprinterconnection("\\turennebkup\WST - NORTH - LJ1300n")
	addprinterconnection("\\turennebkup\WST - MED - LJ1300n")
	addprinterconnection("\\turennebkup\WST - SOUTH - LJ1300n")
;*****end WESTSIDETEAM section and stop script*********************	

	goto END



:PMCOTEAM
;*****map network drives******************************************
	If InGroup ("Domain Users")
		USE "*" /DELETE
	EndIf
;*****delete all printers to clear out old printer mappings*******
	deltree("HKEY_CURRENT_USER\Printers\Connections")
;*****add these current printers back*****************************
;	SELECT
;	CASE InGroup ("1st Hall")
;	CASE InGroup ("2nd Hall")
;	CASE InGroup ("3rd Hall")
;	CASE InGroup ("4th Hall")
;	CASE InGroup ("5th Hall")
;	CASE InGroup ("Business Office")
;	CASE InGroup ("Etc...Etc...Etc")
;	ENDSELECT
	addprinterconnection ("\\TURENNEBKUP\MHC - Office - Savin9922")
	addprinterconnection ("\\TURENNEBKUP\CHC - BO - LJ1200")
	addprinterconnection ("\\TURENNEBKUP\WST - BO - LJ4200")
	addprinterconnection ("\\TURENNEBKUP\PMCO - Reception - Savin2535")
;*****end PMCOTEAM section and stop script*********************	

	goto END
:END

MESSAGEBOX("Your printers and drives have been mapped", "Networking Status", 64)