for $i=0 to ubound($aFruit)

    $aFruit[$i] = "'" + $aFruit[$i] + "'"

    $i = 1 + $i

next

$sFruit = join($aFruit,",")

;  fullpath to the list.ini

$file = "g:\kix\sandbox\list.ini"



$fruit1 = getini($file,"fruit")

for each $line in $fruit1

	? $line

next