Jens,

Works great with a couple of mods. [Wink]

code:
 $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)+'"'
                   ENDIF
             NEXT
       ENDIF
 NEXT
Thanks,

Kent
_________________________
Utilize these resources:
UDFs (Full List)
KiXtart FAQ & How to's