主题:如何将txt逐段加入到备注中?
a1999zqw
[专家分:0] 发布于 2009-06-03 13:34:00
如何将txt逐段加入到备注中?txt如下:
464564644
156456
abc 1456464646464644
56666
16464
12
156468489
abc 164ef4ds4f9
164646949
dfasfas
1656
abc 1646494894
........
每一段结束都会有一空行,每一段最后一行必有‘abc’字符,要把第一段放到第一条记录的备注中,第2段放到第2条记录的备注中,第3段放到第3条记录的备注中...............
回复列表 (共7个回复)
沙发
martine [专家分:4950] 发布于 2009-06-03 16:34:00
笨着,不知可行不
1\建一表,一个字段,长255
append from 文本文件
用程序逐行读字段
a=a+lin+chr(13)
当len(trim(lin))=0时,打开有备注字段的表,将备注字段用a替换
skip
板凳
a1999zqw [专家分:0] 发布于 2009-06-03 21:51:00
不好意思,忘说了,每-段中都有可能超过254个字节。
3 楼
liupeisong [专家分:2340] 发布于 2009-06-03 22:14:00
好象要做一个程序才行喔
4 楼
jinlonggao [专家分:17130] 发布于 2009-06-04 11:19:00
假设文本文件名为:tt.txt,数据表已在当前工作区中打开,备注字段名为 txt. 则有:
------------------------------------------------------------
m.txt = filetostr("tt.txt")
m.txt = chrt(m.txt,chr(10),'')
scan
repl txt with left(m.txt,at(chr(13)+chr(13),m.txt))
m.txt = subs(m.txt,at(chr(13)+chr(13),m.txt)+2)
if empt(m.txt)
exit
endif
ends
-------------------------------------------------------------
没有测试过,请楼主偿试.
5 楼
a1999zqw [专家分:0] 发布于 2009-06-06 23:27:00
感谢jinlonggao,有一点看不懂,m.txt和txt有区别吗?“m.”是什么意思?
6 楼
foxdb [专家分:1830] 发布于 2009-06-07 00:25:00
m.txt的“m.”我的理解是内存变量的识别,也就是习惯,以"m"开头,我是用"m_"的...
7 楼
foxdb [专家分:1830] 发布于 2009-06-07 00:43:00
回车换行码是 0D 0A 空格是 20 所以 如果txt文件是个二纬阵列的话 字段之间的分隔符是 20
而两条记录的分隔码是 0D 0A 这样就可一把 m.txt 字符串顺利导人已按数据二纬阵列结构所建的数据库,这个方法的好处是可以对付一条记录中有连续空格的TXT文件,如果有间隔数据就还要计算空格数以防止字段移位.....
我来回复