k, this code works with your current ini structure and if you decide to change, with the new one too.
if you change the ini structure, only the connectshare needs to be changed...
and parameter for $share added.

Code:

Function ConnectGroupDrives()
dim $AllGroups,$group,$AllShares,$share,$DriveDefinition
  If not Exist($FileLocation + "\shares.ini") exit 1 endif
  $AllGroups=split(readprofilestring($FileLocation + "\shares.ini","",""),chr(10))
  For each $group in $AllGroups
    If ingroup($group)
      $AllShares=split(readprofilestring($FileLocation + "\shares.ini",$group,""),chr(10))
      For each $share in $AllShares
        if $share<>""
          $DriveDefinition = ReadProfileString($FileLocation + "\shares.ini", $group, $share)
          If $DriveDefinition<>""
            ConnectShare($DriveDefinition)
          EndIf
      Next 
    EndIf
  Next
EndFunction
_________________________
!

download KiXnet