>* Converts all carriage returns and line feeds to spaces >lcString = CHRTRAN(lcString, CHR(13)+CHR(10),SPACE(1)) >* Reduce all strings of spaces to a single space >DO WHILE SPACE(2)$lcString] > lcString = STRTRAN(lcString, SPACE(2), SPACE(1)) >ENDDO >More costly - can't put that in except through a UDF - all I do is create an object and use it.