L
limansi
Unregistered / Unconfirmed
GUEST, unregistred user!
如何将一整篇word文档导入到sql server 2000数据库中啊？？而且整篇word文档作为一个字段，文档的每一行作为数据表的一条记录，（就是word中有多少列那么数据表中就有几条记录，而且word中一行有几个字，那么对应的数据表中的这行纪录就有几个字）。。用delphi 7 实现，，
Z
zywcd
Unregistered / Unconfirmed
GUEST, unregistred user!
不太好理解你说的.
Z
zj_mpy
Unregistered / Unconfirmed
GUEST, unregistred user!
啥意思
S
superego
Unregistered / Unconfirmed
GUEST, unregistred user!
你还是将数据复制到Excel表格中再导入还好一点,要不你写程序来单个来读取
L
limansi
Unregistered / Unconfirmed
GUEST, unregistred user!
看到你们的留言了，，感谢！
我没有说清楚，我的意思是，通过用delphi 7.0写程序，把一篇word文档读入数据库（SQL Server 2000）。
要倒入的这一整篇文档是一个字段，而且只占一个字段（意思就是：这个数据表里只有一个字段，这个字段里存的就是word文档里的所有的字）。
但是，文档的每一行要作为数据库中表的一个记录，也就是说，这一整篇文档有多少行，数据库里就有多少条记录。
我没有说清楚，我的意思是，通过用delphi 7.0写程序，把一篇word文档读入数据库（SQL Server 2000）。
要倒入的这一整篇文档是一个字段，而且只占一个字段（意思就是：这个数据表里只有一个字段，这个字段里存的就是word文档里的所有的字）。
但是，文档的每一行要作为数据库中表的一个记录，也就是说，这一整篇文档有多少行，数据库里就有多少条记录。
Z
zywcd
Unregistered / Unconfirmed
GUEST, unregistred user!
我觉得是不是可以这样。使用richedit载入doc文档，然后使用循环richedit.line.count
这样你可以得到每行数据载入数据库。
这样你可以得到每行数据载入数据库。
F
fjxujin
Unregistered / Unconfirmed
GUEST, unregistred user!
为什么不可以?nText和Image字段类型都可以存图文混排的文档。
L
limansi
Unregistered / Unconfirmed
GUEST, unregistred user!
谢谢上面的楼主[
]
“我觉得是不是可以这样。使用richedit载入doc文档，然后使用循环richedit.line.count
这样你可以得到每行数据载入数据库。 ”
因为涉及到文档导入数据库以后要对表中的字符串检索以及检索期间要做的判断关键字所在位置，所以不能以流媒体的形势存入数据库中，
“为什么不可以?nText和Image字段类型都可以存图文混排的文档。” 我理解你的意思是不是把整篇文档作为一条记录存入数据表里，用image?
]“我觉得是不是可以这样。使用richedit载入doc文档，然后使用循环richedit.line.count
这样你可以得到每行数据载入数据库。 ”
因为涉及到文档导入数据库以后要对表中的字符串检索以及检索期间要做的判断关键字所在位置，所以不能以流媒体的形势存入数据库中，
“为什么不可以?nText和Image字段类型都可以存图文混排的文档。” 我理解你的意思是不是把整篇文档作为一条记录存入数据表里，用image?
L
limansi
Unregistered / Unconfirmed
GUEST, unregistred user!
不好意思再问一句，楼上“来自：zywcd, 时间：2006-8-27 20:31:49, ID：3546754
--我觉得是不是可以这样。使用richedit载入doc文档，然后使用循环richedit.line.count
这样你可以得到每行数据载入数据库。
”我不太理解你所说的。。关于richedit应该怎么用啊？？
--我觉得是不是可以这样。使用richedit载入doc文档，然后使用循环richedit.line.count
这样你可以得到每行数据载入数据库。
”我不太理解你所说的。。关于richedit应该怎么用啊？？
Z
zywcd
Unregistered / Unconfirmed
GUEST, unregistred user!
richedit载入文档后可以使用，你可以得到总的line,
像下面这样，
var i:Integer;
begin
for i:=0 to RichEdit2.Lines.Count-1 do
adoquery1.insert;
adoquery1.fieldbyname('fieldname').asstring:= RichEdit2.Lines.Strings;
adoquery1.post;
end;
但是有一些没有测试，也不知道，就是如果包含表格和图片，或者其他对象的时候会怎么样。
像下面这样，
var i:Integer;
begin
for i:=0 to RichEdit2.Lines.Count-1 do
adoquery1.insert;
adoquery1.fieldbyname('fieldname').asstring:= RichEdit2.Lines.Strings;
adoquery1.post;
end;
但是有一些没有测试，也不知道，就是如果包含表格和图片，或者其他对象的时候会怎么样。
N
nicai_wgl
Unregistered / Unconfirmed
GUEST, unregistred user!
其他方法：
1、用Word把文档打开；
2、另存为text格式；
3、用filestream(或file)读入并写入SQL2000。呵呵
1、用Word把文档打开；
2、另存为text格式；
3、用filestream(或file)读入并写入SQL2000。呵呵
L
limansi
Unregistered / Unconfirmed
GUEST, unregistred user!
感谢上面几层楼主。。请问nicai_wgl，你说的filestream是word里的还是delphi还是sql server 2000里的啊？？
N
nicai_wgl
Unregistered / Unconfirmed
GUEST, unregistred user!
delphi里的啊，TFileStream，文件流
L
limansi
Unregistered / Unconfirmed
GUEST, unregistred user!
哦，我找找啊
T
themars
Unregistered / Unconfirmed
GUEST, unregistred user!
存为TEXT格式后 ，例如123.txt
用一个StringList: TStringList
StringList.LoadFromFile('123.txt')
然后StringList就对应你说的每一行
用一个StringList: TStringList
StringList.LoadFromFile('123.txt')
然后StringList就对应你说的每一行
L
limansi
Unregistered / Unconfirmed
GUEST, unregistred user!
请教zywcd：richedit这个控件我还不会用，所以想先问一下“richedit载入文档后可以使用”，这样载入文档是不是就是用代码实现一次性载入多个文档？
M
mel
Unregistered / Unconfirmed
GUEST, unregistred user!
楼主我以前用得是ORCL数据库，可以把WORD文档作为附件放到BOLB字段中的。要读取时也是到指定的BOLB字段中读就行。不知道SQL可不可以。
L
limansi
Unregistered / Unconfirmed
GUEST, unregistred user!
不好意思，请问上面楼主BOLB字段是系统里就有的吗
T
tl_lyq
Unregistered / Unconfirmed
GUEST, unregistred user!
楼主,我觉得一整篇文档保存到一个字段里不顶好吗?
L
limansi
Unregistered / Unconfirmed
GUEST, unregistred user!
上面的搂住，，因为要涉及到关键字的查找以及定位，所以是一行一行的导入