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
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement