>clear >lcline="" >lccode="REM Test.txt"+CHR(13) >lccode=lccode+"COPY %1 <<IMPORTPATH>> <<IMPORTFILE>>" >BG_ACCUWIN="C:\FOXPRO\TMP\" >m.handle=FCREATE("test.txt") >FOR i = 1 TO LEN(lccode) > IF ASC(SUBSTR(lccode,i,1))=13 .OR. ASC(SUBSTR(lccode,i,1))=13 > lcline=lcline+CHR(13)+CHR(10) > ? lcline > ELSE > lcline=lcline+SUBSTR(lccode,i,1) > IF "<<IMPORTPATH>>" $ lcline > ?"Original lines: "+lcline > STRTRAN(lcline,"<<IMPORTPATH>>",BG_ACCUWIN) > ?"New Lines: "+lcline > ?"******************************" > WAIT WINDOW "Found <<IMPORTPATH>>" > ENDIF > IF "<<IMPORTFILE>>" $ lcline > ?"Original line: "+lcline > STRTRAN(lcline,"<<IMPORTFILE>>","ACCUWIN.TXT") > ?"New Line: "+lcline > ?"******************************" > WAIT WINDOW "Found <<IMPORTFILE>>" > ENDIF > ENDIF >ENDFOR >=FPUTS(m.handle,lcline) >=FCLOSE(m.handle) >MODIFY COMMAND test.txt >