In the code listed above that loops through the software, change the WriteProfileString to a variable and append each value until the loop ends. Then use WriteProfileString to write the software entry.

$Software = Software + ","

end loop

$Software = Left($Software,Len($Software)-1)
WriteProfileString($file, $Section, "Software", $Software)

[ 03. September 2002, 15:54: Message edited by: Howard Bullock ]
_________________________
Home page: http://www.kixhelp.com/hb/