use Thedbf lcStr = "" n = afields( laFields ) for i = 1 to n lcStr = lcStr + afields[i,1] + iif( i < n, ",", chr(13)+chr(10) ) endfor copy to Thedbf.csv delimited create cursor xtemp ( mText m ) append blank replace memo mText with lcStr append memo mText from Thedbf.csv copy memo mText to Thedbf.csv>I can't seem to find this answer on my own, so I turn to the pros for help...