>hi all,
>
>i try to convert dbf to text file as this code,
>
>
>

>CLOSE all
>thisform.text1.value=GETFILE('dbf')
>USE alltrim(thisform.text1.value) in 0
>
>gcDelimName = ALIAS( ) + '.txt'
>gcDelimFile = PUTFILE('text_file:', gcDelimName, 'txt')
>IF EMPTY(gcDelimFile)
>   CANCEL
>ENDIF
>COPY TO (gcDelimFile)    && Create not delimited file
>COPY TO (gcDelimFile) TXT  && error
>SET DEFAULT TO d:\yousef
>

>
>thanks

Try either

COPY TO (gcDelimFile) TYPE SDF

or

COPY TO (gcDelimFile) TYPE CSV

or

COPY TO (gcDelimFile) DELIMITED