;Enumerate all group for the current user.
$groups = arrayenumgroup()
;Start the magic for each group.
For Each $group in $groups
	;Read the number of drives to be mapped for each group.
	$drives = ReadProfileString("D:\My Dropbox\Specsavers\Login Scripts\Specsavers\DriveMapping.ini", $group, "NumberOfDrives")
	;Map each drive.
	For $i = 1 to $drives
		;Read drive data from ini file.
		$drive = ReadProfileString("D:\My Dropbox\Specsavers\Login Scripts\Specsavers\DriveMapping.ini", $group, "MapDrive" + $i)
		$drive = Split($drive, ",")
		;MapDrv ($drive[0],$drive[1],$drive[2])
		Use $drive[0] + ': "' + $drive[1] + '"'
	Next
Next

Exit

;DO NOT MODIFY ANYTHING BELOW THIS LINE.
;IT IS A UDF AND IT COMES READY FOR USE.

;NAME          ARRAYENUMGROUP
;
;AUTHOR        Jens Meyer (sealeopard@usa.net)
;
;ACTION        Creates an array of groups of which the current user is a member
;   
;SYNTAX        ARRAYENUMGROUP()
;  
;PARAMETERS    none
;
;RETURNS       Array containing the group names
; 
;REMARKS       none
;
;DEPENDENCIES  none
;  
;EXAMPLE       $retcode=arrayenumgroup()
;
Function arrayenumgroup()
	Dim $retcode, $valuecounter, $currentvalue, $valuearray
		  
	$valuecounter = 0
	Do
		$currentvalue = EnumGroup($valuecounter)
		If $currentvalue <> 259 And @ERROR = 0
			ReDim preserve $valuearray[$valuecounter]
			$valuearray[$valuecounter] = $currentvalue
			$valuecounter = $valuecounter + 1
		EndIf
	Until $currentvalue = 259 Or @ERROR
		  
	$arrayenumgroup = $valuearray
EndFunction

; Drive mappings other than primary user, group and common drives

[Authenticated Users]
NumberOfDrives=2
MapDrive1=f,perseus,exporthome\andyn
MapDrive2=i,Perseus.gg.specsavers.com,SolarisOutput

[Domain Users]
NumberOfDrives=1
MapDrive1=t,Perseus,co-data

Function arrayenumgroup()
	Dim $retcode, $valuecounter, $currentvalue, $valuearray
		  
	$valuecounter = 0
	$currentvalue = EnumGroup($valuecounter)
        While Not @ERROR And $currentvalue
		ReDim preserve $valuearray[$valuecounter]
		$valuearray[$valuecounter] = $currentvalue
		$valuecounter = $valuecounter + 1
		$currentvalue = EnumGroup($valuecounter)
	Loop
		  
	$arrayenumgroup = $valuearray
EndFunction