Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Removing extra blanks in a memo field
Message
From
05/04/2000 00:23:01
 
 
General information
Forum:
Visual FoxPro
Category:
Reports & Report designer
Miscellaneous
Thread ID:
00355212
Message ID:
00355509
Views:
30
>>>>Before I wrote my code, I test reduce(). It didn`t strip CHR(13), only CHR(10)
>>>
>>>Like I said, Vbscript.RegExp covers the issue just fine.
>>
>>How about another, pure VFP solution, in just as many lines of code?
>>
>>* 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.

Depends on the string eh? For short strings like a SQL statement, this will probably be faster than your COM object creation. CHRTRAN has been shown to cause performance problems in extremely large strings, but STRTRAN is devilishly fast. Also, no external dependencies to worry about.
Erik Moore
Clientelligence
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform