作者在 2014-04-08 23:21:20 发布以下内容
文件内容为：
0900|8888043006215692|090000020662|何宁|A|515302198605110039|CNY|5349.74|99|
先建一个数据表结构
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