;************************************************************************* 
; Script Name: Logon.kix
; Author: WMB 
; Date: 01/03/2010
; Last Ammended: 01/03/2010
; Description: Logon Script for EVault Corp. 
;************************************************************************* 
;************************** 
Break On
Dim $SO
$SO=SetOption('Explicit','On')
$SO=SetOption('NoVarsInStrings','On')
$SO=SetOption('NoMacrosInStrings','On')
;************************** 

CLS
Small
Color b+/n
Box (0,0,24,90,GRID) ; 'background grid'
Color b/n
Box (8,21,18,71,Å) ; 'shadow' of the box
Color g+/n
Box (7,20,17,70,FULL)
Color w+/n
AT ( 9,25) "Userid : " ; display some text strings
AT (10,25) "Full name : "
AT (11,25) "Privilege : "
AT (12,25) "Workstation : "
AT (13,25) "Domain : "
Color y+/n
AT ( 9,45) @userid ; ...and some macro's
AT (10,45) @fullname
AT (11,45) @priv
AT (12,45) @wksta
AT (13,45) @domain
SetConsole("show")
Use "*" /DELETE
Use X: "\\server\sound"
If InGroup ("desktop") or InGroup ("temp_users")
Use H: "\\server\%username%$"

EndIf
If InGroup ("staff") or InGroup ("tusers")
Use Z: "\\server\share1"
EndIf

If InGroup ("HR") = 1
Use p: "\\server\share"
EndIf

If Exist("C:\documents and settings\%USERNAME%\desktop\HR.lnk")
DEL "C:\documents and settings\%USERNAME%\desktop\HR.lnk"

If Exist("C:\documents and settings\%USERNAME%\desktop\HR1.lnk") = 0
Copy "P:\HR\hr1.lnk" "C:\documents and settings\%USERNAME%\desktop"
EndIf

If  InGroup ("HR") = 0
If Exist("C:\documents and settings\%USERNAME%\desktop\HR1.lnk")
DEL "C:\documents and settings\%USERNAME%\desktop\HR1.lnk"
EndIf
EndIf

If InGroup ("web")
Use w: "\\server\web"
EndIf
	
If InGroup ("LIS")
Use s: "\\server\share1"
Use w: "\\server\share2"
Use Y: "\\server\share3"
Endif

If InGroup ("reg")
Use u: "\\server\reg"
EndIf

If InGroup ("student") or InGroup ("coursework") or InGroup ("lectures") or InGroup ("course")
Use Y: "\\server\coursework"
EndIf

If InGroup ("data")
Use o: "\\server\data$"
EndIf

If InGroup ("Students")
	Use s: "\\server\tempshare"
	Use Y: "\\server\coursework"
	Use h: "\\server\%username%$"
EndIf