; Mapper opp stasjoner

SETCONSOLE ("SHOW")
? " "
? "      Velkommen til @domain domenet @fullname."
? " "
? "      Vennligst vent, loginscript kjører."
? " "
? "      Dette kan ta noen minutter . . .      "
? " "
; SETCONSOLE ("HIDE")

; Tillater fjerntilkobling av disker"

	WRITEVALUE("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrectVersion\Policies\System","EnableLinkedConnections","1","REG_DWORD")

; Deler ut hjemmeområde
	use h: /delete
	use h: "\\VIKvdc01.vikenfibernett.local\users\%username%"
	;Gir intuitivt navn til H:
	WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##VIKVDC01#users#@userid","_LabelFromReg", "@FullName Hjemmeområde", "REG_SZ")

; Ikke "huske" nettverkstilkoblinger
shell "cmd /c net use /persistent:no"


; Deler ut Fellesområder
	use f: /delete
	use f: "\\VIKvdc01.vikenfibernett.local\Felles"
	; Gir intuitivt navn til F:
	WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##VIKVDC01#Felles","_LabelFromReg", "Felles", "REG_SZ")

; Deler ut Program-Området
	use p: /delete
	use p: "\\VIKvdc01.vikenfibernett.local\Program"
	; Gir intuitivt navn til P:
	WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##VIKVDC01#Program","_LabelFromReg", "Program", "REG_SZ")

; Deler ut TelMe/Telemator
	use t: /delete
	use t: "\\VIKENSQL\TelMe"
	; Gir intuitivt navn til T:
	WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##VIKENSQL#TelMe","_LabelFromReg", "TelMe", "REG_SZ")

; Deler ut I:\ Intern_Drift.
IF INGROUP ("\\VIKVDC01.vikenfibernett.local\GL-Intern_Drift")
	use I: /delete
	use I: "\\VIKvdc01.vikenfibernett.local\Intern_Drift"
	; Gir intuitivt navn til I:
	WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##VIKVDC01#Intern_Drift","_LabelFromReg", "Intern_Drift", "REG_SZ")
ENDIF

; Deler ut K:\ Kontor.
IF INGROUP ("\\VIKVDC01.vikenfibernett.local\GL-Kontor")
	use k: /delete
	use k: "\\VIKvdc01.vikenfibernett.local\Kontor"
	; Gir intuitivt navn til K:
	WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##VIKVDC01#Kontor","_LabelFromReg", "Kontor", "REG_SZ")
ENDIF

; Deler ut Ledelse
IF INGROUP ("\\VIKVDC01.vikenfibernett.local\GL-Ledelse")
	use l: /delete
	use l: "\\VIKvdc01.vikenfibernett.local\Ledelse$"
	; Gir intuitivt navn til L:
	WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##VIKVDC01#Ledelse$","_LabelFromReg", "Ledelse", "REG_SZ")
ENDIF

; Deler ut Marked
IF INGROUP ("\\VIKVDC01.vikenfibernett.local\GL-Marked")
	use m: /delete
	use m: "\\VIKvdc01.vikenfibernett.local\Marked$"
	; Gir intuitivt navn til L:
	WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##VIKVDC01#Marked$","_LabelFromReg", "Marked", "REG_SZ")
ENDIF

; Deler ut Økonomi
IF INGROUP ("\\VIKVDC01.vikenfibernett.local\GL-Okonomi")
	use o: /delete
	use o: "\\VIKvdc01.vikenfibernett.local\Okonomi$"
	; Gir intuitivt navn til O:
	WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##VIKVDC01#Okonomi$","_LabelFromReg", "Økonomi", "REG_SZ")
ENDIF

; Deler ut BRL
IF INGROUP ("\\VIKVDC01.vikenfibernett.local\GL-BRL")
	use q: /delete
	use q: "\\VIKvdc01.vikenfibernett.local\BRL"
	; Gir intuitivt navn til Q:
	WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##VIKVDC01#BRL","_LabelFromReg", "BRL", "REG_SZ")
ENDIF

; Deler ut FTP-området
IF INGROUP ("\\VIKVDC01.vikenfibernett.local\GL-FTP")
	use x: /delete
	use x: "\\VIKENDC2\FTP"
	; Gir intuitivt navn til X:
	WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##VIKENDC2#FTP","_LabelFromReg", "FTP", "REG_SZ")
ENDIF

; Deler ut Salg-området
IF INGROUP ("\\VIKVDC01.vikenfibernett.local\GL-Salg")
	use s: /delete
	use s: "\\VIKvdc01.vikenfibernett.local\Salg"
	; Gir intuitivt navn til S:
	WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##VIKVDC01#Salg","_LabelFromReg", "Salg", "REG_SZ")
ENDIF

; Deler ut Utbygging-området
IF INGROUP ("\\VIKVDC01.vikenfibernett.local\GL-Utbygging")
	use u: /delete
	use u: "\\VIKvdc01.vikenfibernett.local\Utbygging"
	; Gir intuitivt navn til U:
	WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##VIKVDC01#Utbygging","_LabelFromReg", "Utbygging", "REG_SZ")
ENDIF

; Deler ut Scan-området
IF INGROUP ("\\VIKVDC01.vikenfibernett.local\GL-Scan")
	use v: /delete
	use v: "\\VIKvdc01.vikenfibernett.local\Scan"
	; Gir intuitivt navn til V:
	WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##VIKVDC01#SCAN","_LabelFromReg", "Scan", "REG_SZ")
ENDIF

; Deler ut Juridisk-Området
IF INGROUP ("\\VIKVDC01.vikenfibernett.local\GL-Juridisk")
	use j: /delete
	use j: "\\VIKvdc01.vikenfibernett.local\juridisk"
	; Gir intuitivt navn til J:
	WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##VIKVDC01#Juridisk","_LabelFromReg", "Juridisk", "REG_SZ")
ENDIF