Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Memo field fix - urgent
Message
 
 
À
15/12/2008 10:30:29
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP
Network:
Windows 2003 Server
Database:
MS SQL Server
Divers
Thread ID:
01367445
Message ID:
01367484
Vues:
8
>>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
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform