Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Memo field fix - urgent
Message
 
 
To
15/12/2008 10:30:29
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP
Network:
Windows 2003 Server
Database:
MS SQL Server
Miscellaneous
Thread ID:
01367445
Message ID:
01367484
Views:
9
>>I want to reduce all CHR(13) + CHR(10) to only one between lines. However, using
>>
>>lcNotes = STRTRAN(field, CHR(13) + CHR(10) + CHR(13) + CHR(10),CHR(13) + CHR(10))
>>
>>is not working for me.
>>
>
>
>(1) you have to repeat the operation n times
>(2) of course, you have to replace the memo field
>
>
>#define CRLF chr(13) + Chr(10)
>
>local lcNotes
>lcNotes = FieldNameNotes
>
>do while !empty(at(CRLF+CRLF, m.lcNotes))
>     lcNotes = strtran(strtran(m.lcNotes, CRLF+CRLF, CRLF), CRLF+CRLF, CRLF)
>enddo
>
>repl FieldNameNotes with m.lcNotes in TheCursorName
>
You would not believe it, but it didn't work. I still see 2 empty lines before my last note.
If it's not broken, fix it until it is.


My Blog
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform