"color w+/m                                               ;change background color to yellow
cls                                                     ;Clears the screen

?"Here is some information about your session:"
?
?"Current Computer Name:        @wksta."
?"The Server you logged into:   @lserver."
?"Your IP Address is:           @ipaddress0."
?
?"Please wait while your login script connects all network resources..."

IF @inwin=2
  ?"Synchronizing your clock"
  settime "*"
  IF @error=0
    ?"Your clock has been synchronized"
  ELSE
    ?
    color n/r
    "Your clock has NOT been synchronized"
    ?"You either do not have rights to change the time or"
    ?"A Time Server was unable to be located."
    color n/g
  ENDIF
ENDIF

;Changes backround logon color to black.
writevalue("hkey_users\.default\control panel\colors","background","0 0 0","REG_SZ")

?
?"Disconnecting all network drives..."
use f: /del
use g: /del
use h: /del
use i: /del
use j: /del
use k: /del
use l: /del
use m: /del
use n: /del
use o: /del
use p: /del
use q: /del
use r: /del
use s: /del
use t: /del
use v: /del
use w: /del
use x: /del
use z: /del

;*******************************************************************
;Drive Mappings
;Server Name Variables

  $fileserver = "amb"
  $techserver = "amb2"
  $newtechsrv = "amb3"
  
?
?"Connecting all network drives..."

use k: "\\$fileserver\Pub"
use l: "\\$fileserver\Sup"

;*******************************************************************

IF INGROUP("fso_Office")
  use j: "\\$fileserver\OfficeSvc"
ENDIF

IF INGROUP("fso_member_i")
  use i: "\\$fileserver\i"
ENDIF

IF INGROUP("fso_fin")
  use s: "\\AMTA\S"
  use f: "\\$fileserver\Fin"
ENDIF

IF INGROUP("fso_h")
  use x: "\\$fileserver\H"
ENDIF

IF INGROUP("fso_mark")
  use p: "\\$fileserver\Comm"
ENDIF

IF INGROUP("fso_mem")
  use p: "\\$fileserver\Mem"
ENDIF

IF INGROUP("fso_c")
  use p: "\\$fileserver\C"
ENDIF

IF INGROUP("fso_p")
  use h: "\\$fileserver\P"
ENDIF

IF INGROUP("fso_ma_space")
  use o: "\\$fileserver\Sp"
ENDIF

IF INGROUP("fso_KT")
  use t: "\\$fileserver\Kn"
ENDIF

IF INGROUP("fso_cha")
  use m: "\\$fileserver\Cha"
ENDIF

IF INGROUP("fso_ex")
  use g: "\\$fileserver\Ex"
ENDIF

IF INGROUP("fso_re")
  use r: "\\$fileserver\Re"
ENDIF

IF INGROUP("fso_t")
  use z: "\\$newtechsrv\T"
ENDIF

IF INGROUP("fso_dw")
  use w: "\\$fileserver\Da"
ENDIF

;IF INGROUP("fso_Re")
;  use x: "\\$techserver\R"
;ENDIF

;IF INGROUP("fso_Rec")
;  use x: "\\$techserver\Recordings\%USERNAME%"
;ENDIF

IF INGROUP("fso_qa")
  use q: "\\$fileserver\QA"
ENDIF

;IF INGROUP("fso_marke")
;  use q: "\\$fileserver\Creative"
;ENDIF

;IF INGROUP("fso_med")
;  use p: "\\$fileserver\MED"
;ENDIF

IF INGROUP("Non-Exempt Employees")
  copy "\\AMTADC01\NETLOGON\PunchINPunchOUT.url" "%USERPROFILE%\Start Menu\Programs\Startup\PunchINPunchOUT.url"
ENDIF

IF INGROUP("Domain Users")
  del "%USERPROFILE%\desktop\DatabaseCalender.lnk"
ENDIF

IF @wksta = "AMTAS" or @wksta = "AMTAM"
GoTo Skip
ENDIF
IF @wksta = "AM" or @wksta = "AMT"
  IF @userid = "Administrator"
    writevalue("HKEY_Current_user\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced","StartMenuAdminTools","NO","REG_SZ")
  ENDIF

  ;Installs Printers for Terminal Server Users.
  ;?"Removing Old Printers..."
  ;SHELL "CMD.EXE /C rundll32 printui.dll,PrintUIEntry /dn /n\\amt02\X7665FIN /q"
  ;SHELL "CMD.EXE /C rundll32 printui.dll,PrintUIEntry /dn /n\\amt02\X7665MEM /q"
ENDIF

;Installs printers for everybody.
IF @wksta <> AMT01

  ?
  ?"Installing Printers..."
  
  [b]SHELL "CMD.EXE /C rundll32 printui.dll,PrintUIEntry /in /n\\AMT01\X7665FIN /q"[/b]
  SHELL "CMD.EXE /C rundll32 printui.dll,PrintUIEntry /in /n\\AMT01\X7665MEM /q"
  SHELL "CMD.EXE /C rundll32 printui.dll,PrintUIEntry /in /n\\AMT01\LJC2550PS3 /q"
  SHELL "CMD.EXE /C rundll32 printui.dll,PrintUIEntry /in /n\\AMT01\LJC3800PS /q"
  SHELL "CMD.EXE /C rundll32 printui.dll,PrintUIEntry /in /n\\AMT01\LJ4250NPS /q"
  SHELL "CMD.EXE /C rundll32 printui.dll,PrintUIEntry /in /n\\AMT01\LJ4250TN /q"
  SHELL "CMD.EXE /C rundll32 printui.dll,PrintUIEntry /in /n\\AMT01\LJ4250TN2 /q"
  SHELL "CMD.EXE /C rundll32 printui.dll,PrintUIEntry /in /n\\AMT01\LJ8100PCL6 /q"AAP
  SHELL "CMD.EXE /C rundll32 printui.dll,PrintUIEntry /in /n\\AMT01\LJ8100PS /q"
  SHELL "CMD.EXE /C rundll32 printui.dll,PrintUIEntry /in /n\\AMT01\LJ4300PCL6 /q"
  SHELL "CMD.EXE /C rundll32 printui.dll,PrintUIEntry /in /n\\AMT01\MCROPLXF24 /q"
  SHELL "CMD.EXE /C rundll32 printui.dll,PrintUIEntry /in /n\\AMT01\OJ7310 /q"
ENDIF

IF INGROUP("fso_t")
    ?"Mailroom printer install"
    SHELL "CMD.EXE /C rundll32 printui.dll,PrintUIEntry /in /n\\AMT01\XWC120PS /q"
  ENDIF


;Changes setting for tabs in IE7 to accomodate netForum
writevalue("HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\TabbedBrowsing","ShortcutBehavior","0","REG_DWORD")

;Turns Internet Explorer start page to blank, enables recover deleted items in Outlook, enables num lock at logon, and sets IM and AutoArchive Preferences
;writevalue("hkey_Current_user\Software\Microsoft\Internet Explorer\Main","Start Page","about:blank","REG_SZ")
;writevalue("HKEY_USERS\.Default\Control Panel\Keyboard","InitialKeyboardIndicators","2","REG_SZ")
writevalue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Exchange\Client\Options","DumpsterAlwaysOn","1","REG_DWORD")
writevalue("hkey_Current_user\Software\Microsoft\Internet Explorer\Main","Window Title","Provided ","REG_SZ")
writevalue("hkey_Current_user\Software\Microsoft\Office\11.0\Outlook\IM","Enabled","0","REG_DWORD")
writevalue("hkey_Current_user\Software\Microsoft\Office\11.0\Outlook\Preferences","DoAging","0","REG_DWORD")
:Skip
exit ;quits the login script
"