Save contents of list box to a text file

Level Extreme platform

Subscription

Corporate profile

Products & Services

Support

Legal

Français

Save contents of list box to a text file

Message

From

15/07/2004 09:23:37

Borislav Borissov
Microcomplex
Sofia, Bulgaria

15/07/2004 09:16:01

Evelyn Neri
Epn Inc.
Manila, Philippines

General information

Forum:

Visual FoxPro

Category:

Coding, syntax & commands

Title:

Re: Save contents of list box to a text file

Miscellaneous

Thread ID:

00924634

Message ID:

00924641

Views:

#define CRLF CHR(13)+CHR(10)

myFile = "MyAddList.TXT"

FOR nCnt = 1 TO ThisForm.lstListBox1.ListCount
    IF ThisForm.lstListBox1.Selected(nCnt)  && Is item selected?
       STRTOFILE(ThisForm.lstListBox1.List(nCnt)+CRLF, MyFile, (nCnt # 1)) 
    ENDIF
ENDFOR

or You can concatenate the string & writå it to file after FOR ... ENDFOR loop

Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.

Map

View

Click here to load this message in the networking platform