;Script can be terminated without Logoff
Break On

; Determine time of day
$TIME = @TIME
SELECT
  CASE $TIME > "00:000:01" AND $TIME < "12:00:00"
    $TOD = "Good morning"
  CASE $TIME > "11:59:59" AND $TIME < "18:00:00"
    $TOD = "Good afternoon"
  CASE $TIME > "17:59:59" AND $TIME < "24:00:00"
    $TOD = "Good evening"
  CASE 1
    $TOD = "Welcome"
ENDSELECT

;Add Intranet-CH to the trusted sites in IE
AddKey ("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains\intranet-ch.acn")
WriteValue ("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Domains\intranet-ch.acn","HTTP","00000001",REG_DWORD)

if ingroup("Enterprise\041LUC-LS-CH")				;common netdrives CH 
	use P: "\\ACN041SQL01\ACNPOOL"
	use X: "\\ACN041SQL01\APPL_GER"
endif
	
if ingroup("Enterprise\041LUC-LS-GS")				;Global Services	
	use F: "\\ACN041EPC02\epc_cft"
	use G: "\\ACN041EPC02\EPC_FTP"
	use I: "\\ACN041EPC02\data"
	use P: "\\ACN041EPC02\epc_pub"
	use T: "\\ACN041EPC02\PROD1"
	use U: "\\ACN041EPC02\@userid"
	use X: "\\ACN041EPC02\appl"
	ADDPRINTERCONNECTION ("\\ACN041LUCRAS01\EPC_HP_1") 
endif

if ingroup("Enterprise\041LUC-LS-GS_DesignGroup")		;Global Services IDB Design and Maintenance
	use Q: "\\ACN041EPC02\gis_pub"
endif

if ingroup("Enterprise\041LUC-LS-EGCC")				;IT EGCC	
	use J: "\\ACN041EPC02\inf_pub"
	use P: "\\ACN041EPC02\esdg_pub"
	use Q: "\\acn041EPC02\cmc"
	use U: "\\ACN041EPC02\@userid"
	use X: "\\ACN041EPC02\appl"
endif

if ingroup("Enterprise\041LUC-LS-OPS")				;IT OPERATIONS	
	use I: "\\ACN041LUCAPP02\ACN_INF"
	use J: "\\ACN041LUCAPP02\nis_inf"
	use O: "\\ACN041LUCAPP02\MFINPUT"
	use Q: "\\ACN041LUCFSV01\OP"
	USE U: "\\ACN041LUCFSV01\@userid"
endif

if ingroup("Enterprise\041LUC-LS-MV")				;MARKETING & SALES	
	use I: "\\ACN041LUCAPP02\ACN_INF"
	use J: "\\ACN041LUCAPP02\nis_inf"
	use Q: "\\ACN041LUCFSV01\MV"
	USE U: "\\ACN041LUCFSV01\@userid"
	ADDPRINTERCONNECTION ("\\ACN041LUCRAS01\MV_CAN_1")
endif

if ingroup("Enterprise\041LUC-LS-FINANCE")			;FINANCE	
	use m: "\\acn041sql01\abacus"
	use N: "\\ACN041SQL01\ABACUSN"				;Abacus Neu (Lohn)
	use q: "\\acn041sql01\finance"
	USE U: "\\ACN041SQL01\@userid"
endif

if ingroup("Enterprise\041LUC-LS-DSS")				;DECISION SUPPORT SERVICES	
	use i: "\\ACN041LUCAPP02\ACN_INF"
	use j: "\\acn041LUCAPP02\nis_inf"
	use k: "\\acn041LUCAPP02\nis_cli"
	use q: "\\acn041LUCFSV01\DSS"
	use s: "\\acn041LUCFSV01\DSS_SEKR"
	use t: "\\acn041LUCFSV01\TRN"
	USE U: "\\ACN041LUCFSV01\@userid"
endif

if ingroup("Enterprise\041LUC-LS-ITSRV")			;IT Services
	use T: "\\ACN041LUCWD01\INSTALL"
endif

if ingroup("Enterprise\041LUC-LS-MGT")				;Country Management
	use S: "\\acn041lucfsv01\CountryM"
endif

if ingroup("Enterprise\041LUC-LS-DEV")				;IT Development	
	use K: "\\ACN041LUCAPP02\causal"
	use N: "\\acn041hht01\hht"
endif

if ingroup("Enterprise\041LUC-LS-STATRES")			;MEASUREMENT SCIENCE	
	use I: "\\ACN041LUCAPP02\ACN_INF"
	use J: "\\ACN041LUCAPP02\nis_inf"
	use Q: "\\ACN041LUCFSV01\OP"
	use R: "\\acn041sql01\roebi"
	use S: "\\acn041LUCAPP02\SR"
	USE U: "\\ACN041LUCFSV01\@userid"
	
endif

if ingroup("Enterprise\041LUC-LS-DC")				;DIS Spec (OE, UL)
	use G: "\\ACN041OPS01\HOST"
	use R: "\\ACN041SQL01\roebi"
endif

if ingroup("Enterprise\041LUC-LS-DIS")				;DATA INPUT SERVICES	
	use H: "\\acn041SQL01\dosapps"
	use K: "\\ACN041LUCAPP02\causal"
endif

if ingroup("Enterprise\041LUC-LS-HS")				;HOMESCAN MARKETING	
	use I: "\\ACN041LUCAPP02\ACN_INF"
	use Q: "\\ACN041lucfsv01\MV"
	use U: "\\ACN041lucfsv01\@userid"
endif

if ingroup("Enterprise\041LUC-LS-HR")				;HUMAN RESOURCES	
	use Q: "\\acn041lucfsv01\ADM"
	use M: "\\acn041sql01\abacus"
	use N: "\\acn041LUCFSV01\hr"
	use U: "\\ACN041LUCFSV01\@userid"
endif

if ingroup("Enterprise\041LUC-LS-HSOP")				;HOMESCAN OPERATIONS	
	use N: "\\chhsntcs04\chhsntcs$"
	use R: "\\chhsntcs05\chhsntcs$"
	use M: "\\ACN041LUCAPP02\homescan"
	use O: "\\ACN041LUCAPP02\MFINPUT"
	use Q: "\\acn041LUCFSV01\OP"
	USE U: "\\ACN041LUCFSV01\@userid"
endif

if ingroup("Enterprise\041LUC-LS-EMRE")				;ADMINISTATION, TELEPHONE, REPRO	
	use Q: "\\acn041lucfsv01\ADM"
	USE U: "\\ACN041LUCFSV01\@userid"
endif

if ingroup("Enterprise\041LUC-LS-TC")				;IT OPERATIONS TC	
	use H: "\\acn041acn01\dosapps"
	use I: "\\ACN041LUCAPP02\ACN_INF"
	use J: "\\acn041LUCAPP02\nis_inf"
	use O: "\\ACN041LUCAPP02\MFINPUT"
	use Q: "\\acn041LUCFSV01\OP"
	USE U: "\\ACN041LUCFSV01\@userid"
endif

if ingroup("Enterprise\041LUC-LS-TRADE")			;RETAILER SERVICES	
	use I: "\\ACN041LUCAPP02\ACN_INF"
	use J: "\\acn041LUCAPP02\nis_inf"
	use Q: "\\ACN041LUCFSV01\MV"
	use R: "\\acn041sql01\roebi"
	use S: "\\ACN041LUCFSV01\RS"
	USE U: "\\ACN041LUCFSV01\@userid"
endif

if ingroup("Enterprise\041LUC-LS-MARKETING")			;MARKETING DOCUMENTS	
	use H: "\\acn041lucfsv01\Marketing"
endif

if ingroup("Enterprise\041LUC-LS-MS")				;MERCHANDISING SERVICES	
	use i: "\\ACN041LUCAPP02\ACN_INF"
	use j: "\\acn041LUCAPP02\nis_inf"
	use k: "\\acn041LUCAPP02\nis_cli"
	use q: "\\acn041LUCFSV01\DSS"
	use r: "\\ACN041LUCFSV01\DSS_SEKR"
	use S: "\\ACN041LUCFSV01\SPACEMAN"
	use t: "\\acn041LUCFSV01\TRN"
	USE U: "\\ACN041LUCFSV01\@userid"
endif

if ingroup("Enterprise\041LUC-LS-TRAINING")			;TRAINING
	use T: "\\acn041LUCFSV01\TRN"
	use x: "\\acn041sql01\appl_ger"
	USE U: "\\ACN041LUCFSV01\@userid"
endif

if ingroup("Enterprise\041LUC-LS-INTRANET")			;Intranet
	use y: "\\acn041LUCAPP02\P_M_CH"
endif

if ingroup("Enterprise\041LUC-LS-LEGIC")			;Futterautomat
	use O: "\\ACN041SQL01\LEGIC"
endif

if ingroup("Enterprise\041LUC-LS-CHAZUBI")			;Azubi Home Drive
	use U: "\\ACN041LUCFSV01\@userid"
endif

; Determine if user is connected via RAS or VPN
IF @RAS=0 AND INSTR (@IPADDRESS0,"10. 67.16")=2
	IF EXIST ("%ProgramFiles%\NETINST\NIAGNT32.EXE") 
	 SHELL "%ProgramFiles%\NetInst\niagnt32.exe"
	 ;SHELL "@LDRIVE\ACN041\RUN_OCS.BAT"
	ELSE
	 ;SHELL "@LDRIVE\ACN041\RUN_OCS.BAT"	
	ENDIF
Endif


COLOR g+/n
cls
sleep 2
?"    The actual Info for your session    "
AT (3,20) $TOD + " " + @FULLNAME
color c+/n
at (6,20) "Userid      :"
at (7,20) "Computername:"
at (8,20) "Domain      :"
color c+/n
at (9,32) @lserver
color c+/n
at (9,20) "Logon Server: "
at (10,20) "MAC Addr    :"
at (11,20) "Datum       :"
at (12,20) "Time        :"
at (13,20) "NT Release  :"
at (14,20) "IP-Adresse  :"
;at (15,20) "Diskspace   :"
; sleep 1
color c+/n
at (6,34) @userid
at (7,34) @wksta
at (8,34) @domain
at (10,34) @Address
at (11,34) @date
at (12,34) @time
at (13,34) @dos
at (14,33) @IPADDRESS0
;at (15,34) "$ResultMB" + " Mb"

sleep 5