You could achieve this easily if only the .List property was already readable; Silly enough it's still write-only [Frown]

So you need to workaround that by evaluating the items using the .ListCount property and setting the ListIndex for each Item ... errr just like :


;...
dim $list
for $i = 0 to $lst.ListCount-1
	$lst.ListIndex = $i
	$list = $list + $lst.Text 
     	if $i < $lst.ListCount - 1 
      		$list = $list + "," 
	endif
next
$list = split($list)
;...


[ 15. August 2003, 13:01: Message edited by: Jochen ]
_________________________