>PARAMETERS FN >BUFFER=" " >HANDLE=FOPEN(FN,2) >IF HANDLE>-1 > FREAD(HANDLE,@BUFFER,1) > FBYTE=ASC(BUFFER) > FSEEK(HANDLE,0,0) > IF FBYTE=3 > FWRITE(HANDLE,CHR(26),1) > ENDIF > FCLOSE(HANDLE) >ENDIF >RETURN .T. >It's already VFP code. You can alternatively you filetostr, strtran, strtofile functions.