sString = '' FOR k=1 TO 10000 sString = m.sString +','+REPLICATE('a',RAND()*1000) NEXT ? LEN(m.sString) t1=SECONDS() FOR k=1 TO 10 =OCCURS(",",m.sString) NEXT ? SECONDS()-t1 && 2444 ms t1=SECONDS() FOR k=1 TO 10 =ALINES(aoccurs,m.sString,",") NEXT ? SECONDS()-t1 && 1342 msFabio