>This is another version of this program: (BTW, Mike, I found a bug in your mhHTMLcode program, you'll see by yourself)
>

The following would spin through the whole thing automagically without the UDF:

oRegExp = CREATEOBJ("Vbscript.RegExp")
oRegExp.Global = .t.
oRegExp.Pattern = "\s+" && this matches any occurrances of space, tab, ff, CR
REPLACE ALL mMemoField WITH oRegExp.Replace(mMemoField," ")

You could do a good deal more than this with the RegExp object, but it's a direct solution to the problem...