Hi Rich, welcome to KoRG ... hope this helps and makes a good start ... make sure to change the $variables to suite your environment ...

Code:

break on

$path = "c:\documents and settings"

$folder = dir($path)

while @error = 0

 $folder = $path + "\" + $folder

 if getfileattr($folder) & 16

  $profile = $folder + "\" + "main.ini"

  if exist($profile)

   $= writeprofilestring($profile, "section", "value", 2)

  endif

 endif

 $folder = dir()

loop

exit 1