不是导入文本格式数据库,而是指读和写一般意义上的文本文件!
------解决方案--------------------------------------------------------
示例:
handtxt = fopen( '23.TXT ',12)
HH=FCREATE( "GG.TXT ")
?handtxt
STORE FSEEK(handtxt, 0, 2) TO gnEnd && Move pointer to EOF
STORE FSEEK(handtxt, 0) TO gnTop &&
DO WHILE !FEOF(HANDTXT)
IF FEOF(handtxt)
EXIT
ENDIF
LCSTR = FGETS(HANDTXT,GNEND)
FPUTS(HH ,LCSTR+ "123 "+CHR(13))
ENDDO
=FCLOSE(handtxt)
=FCLOSE(HH)