Break On					;;; ALLOWS SCRIPT TO BE INTERRUPTED DURING EXECUTION (may want to remove once in production)
$nul = SetOption("NoVarsInStrings","On")	;;; IGNORES VARIABLES THAT ARE INCLUDED IN STRINGS
$nul = SetOption("NoMacrosInStrings","On")	;;; IGNORES MACROS THAT ARE INCLUDED IN STRINGS
$nul = SetOption("Explicit","On")		;;; REQUIRES ALL VARIABLES TO BE DECLARED

Dim $inifile,$mappings,$mapping,$group,		;;;  DIM VARIABLES
    $drive,$share,$

$inifile = "\\path\to\inifile.ini"		;;; CHANGE THIS TO THE CORRECT PATH OF YOUR DRIVE INI FILE

$mappings = EnumINI($inifile)			;;; USES EnumINI() UDF TO CREATE AN ARRAY LIST OF ALL THE SECTIONS IN INI FILE

For Each $mapping in $mappings			;;; CYCLES THROUGH EACH ELEMENT OF THE ARRAY

   $group = ReadProfileString($inifile,$mapping,"group")	;;; READS THE GROUP KEY FROM CURRENT SECTION
   $drive = ReadProfileString($inifile,$mapping,"drive")	;;; READS THE DRIVE KEY FROM CURRENT SECTION
   $share = ReadProfileString($inifile,$mapping,"share")	;;; READS THE SHARE KEY FROM CURRENT SECTION

   If InGroup($group)
      ? "Mapping "+$group+" to the "+$share+" share using drive letter "+$drive

      Use $drive $share /persistent		;;; ATTEMPTS TO CONNECT DRIVE
      If @Error=0				;;; CHECKS FOR ERROR
         ? "Mapped successfully"
      Else
         ? "Error"
      Endif
   Endif
Next

? "Script complete. Press any key to exit..."
get $						;;; PAUSES SCRIPT UNTIL KEY IS PRESSED

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;  EnumINI() - Enumerates INI file keys into an array.                               ;;;
;;;  Written By: Glenn Barnas                                                          ;;;
;;;  http://www.kixtart.org/forums/ubbthreads.php?ubb=showflat&Board=7&Number=135385   ;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Function EnumIni($_fSrcFile, OPTIONAL $_fSectName)
  Dim $_fSectList
  If Exist($_fSrcFile) = 0
    Exit 2
  EndIf
  $_fSectList = ReadProfileString($_fSrcFile, $_fSectName, '')
  If @ERROR
    Exit @ERROR
  EndIf
  If Len($_fSectList) > 0
    $EnumIni = Split(Left($_fSectList,len($_fSectList)-1), Chr(10))
    Exit 0
  EndIF
  Exit 13
EndFunction