文本文件读入数据库(5分)

J

joann

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-02

• #1

例如:文本文件的某行如下
楼盘名称xxxx建设发展有限公司楼盘编号000001
.............

数据库表table1有2个字段Lpmc,Lpbh.
将上句的第5-16位"xxxx建设发展有限公司"读入LPMC,第21-26位"000001"读入LPBH后
table1数据为:
Lpmc Lpbh
xxxx建设发展有限公司 000001
.............

Pascal语言如何写?

 

C

celeron

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-02

• #2

一个字符一个字符读，然后再控制截取就行

 

小

小猪

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-02

• #3

先写一个程序把文本文件整理成如下形式：
lpmc,lpbh
xxxxxxx建设发展有限公司,000001
xxxxxxx建设发展有限公司,000002
xxxxxxx建设发展有限公司,000003
......
然后建一个odbc的文本数据源，就可以把它当数据库文件用啦。
第一行就是字段名。再怎么导入到其他数据库就是轻而易举的事情啦。

 

李

李鸿章

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-02

• #4

如果你不嫌麻烦，也可以这么做。
一行一行处理，读一行文本就用copy分别处理一下，反正你几位到几位存入什么字段
很清楚。反正我觉得用字符串函数做比较好，为了这个先做一个程序来处理是舍近求远那

 

J

joann

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-02

• #5

Pascal语言如何写?

 

5

555

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-03

• #6

index:=Pos('楼盘编号',Str);
dataset.fieldByName('Lpmc').AsString:=Copy(9,Index-9);
dataset.fieldByName('Lpbh').AsString:=Copy(Index+9,Length(str));

 

J

joann

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-03

• #7

接受答案了.