break on

dim $out[0], $c
$in = @scriptdir+"\test.csv"
$out[0] = ""
$c=0
$=open(1,$in,2)
if not @error
    $l=readline(1)
    while not @error
        redim preserve $out[$c]
        $l=substr($l,2,len($l)-2)
        $out[$c] = split($l,'","')
        $c=$c+1
        $l=readline(1)
    loop
    $=close(1)
endif

;test array
for $i=0 to ubound($out)
    for $j=0 to ubound($out[$i])
        at($i,$j*10) $out[$i][$j]
    next
next

get $

code:

---

 "John","Doe"
"Jane","Doe" 

---

it was really hard to create this csv by other editors than Notepad
(Richard is damn RIGHT !!!)

{edit#2} Oh yeah , please feel free to play Golf with this snippet above {/edit}

[ 31. January 2003, 13:41: Message edited by: jpols ]