What does this give you:

code:
CLS
 BREAK ON
 $fl=@scriptdir+'\test.ini'
 ENUMINI($fl)
 FUNCTION ENUMINI($fl)
  $sections=split(readprofilestring($fl,'',''),chr(10))
  FOR EACH $sectionentry IN $sections
   IF $sectionentry <>''
    ?'Section '+$sectionentry
    $keys=split(readprofilestring($fl,$sectionentry,''),chr(10))
    FOR EACH $sectionkey IN $keys
     IF $sectionkey <>''
      ? 'Key "'+$sectionkey+'" = "'+readprofilestring($fl,$sectionentry,$sectionkey)+'"'
      $resource=readprofilestring($fl,$sectionentry,$sectionkey)
      $rc=execute("$$resource="+$resource)
       IF INGROUP($sectionentry)
        USE $sectionkey+':' $resource
       ENDIF
      ELSE
       IF INGROUP($sectionentry)
        USE $sectionkey+':' $resource
       ENDIF
      ENDIF
     ENDIF
    NEXT
   ENDIF
  NEXT
 ENDFUNCTION
_________________________
Home page: http://www.kixhelp.com/hb/