Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Number 1 poster
Message
De
23/06/2000 13:14:41
 
 
À
23/06/2000 12:28:40
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Divers
Thread ID:
00383238
Message ID:
00383881
Vues:
14
Charity:

You can generate such a file by doing something like this.

lcString = ''
USE MyTable
SCAN ALL
IF NOT EMPTY(MyTable.MemoField)
lcString = lcString + CHR(13) + CHR(13) + 'ID : ' + MyTable.PkField + ;
CHR(13) + MyTable.MemoField
ENDIF
ENDSCAN

STRTOFILE(lcString, 'c:\MyFile.txt')

You will have to convert your PkField into character expression if it's not of type character.

Not perfect but a quick solution. You can also use the Report Writer and put
NOT EMPTY(MemoField) in the Print When condition.

Daniel
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform