先建一个数据表结构
VFP9代码
lc=filetostr([a.txt])
FOR lnI=1 TO ALINES(ATXT,LC,CHR(13)+CHR(10))
=ALINES(ATXT1,ATXT[lnI])
INSERT INTO 表名 FROM ARRAY ATXT1
ENDFOR
SELECT 表名
BROWSE
VFP9代码
lc=filetostr([a.txt])
FOR lnI=1 TO ALINES(ATXT,LC,CHR(13)+CHR(10))
=ALINES(ATXT1,ATXT[lnI])
INSERT INTO 表名 FROM ARRAY ATXT1
ENDFOR
SELECT 表名
BROWSE
坚守VFP最后的阵地
