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:\yousefthanks