lcStr = ALLTRIM(lcOriginalStr) && remove leading and trailing spaces >>DO WHILE AT(" ", lcStr) > 0 && look for double space >> lcStr = STRTRAN(lcStr, " ", " ", 1, 1) && convert double space to single >>ENDDOIf you hit the reply button, you'll see the actual tags.
oReg = CREATEOBJ('VBScript.RegExp') >oReg.Global = .T. && FOR ALL OCCURANCES >oReg.Pattern = '\b[\t ]+\b' && Match any occurance of one or more spaces/tabs >cReducedString = oReg.Replace(cUnReducedString,' ') &&Replace match with ' '< g >Well, and unbeknownst to me, it looks like it can. I just tried:
lcstring = "John " + CHR(9) + " Smith" ? lcstring && Prints John Smith ? Reduce(lcstring) && Prints John SmithSo apparently it can (at least in 6.0). Also placed multiple occrences of the tab and spaces between them and it still worked. **Braaaaaaaaaaaack**< sticks tongue out at Ed >:-)