怎么把文件存到库里的BLOB字段

[jiazhij]

我想把文件存到某个表里的BLOB字段，却不知道该怎么做。以前用DELPHI时用的是BDE控件，直接读文件名就可以了，可是在C++BUILDER只能使用ADO控件，这个控件我没用过，不知道怎么用，有没有人教教我，有程序例子看最好。谢谢大家。

[zzhong2]

一。直接方法
//向SQL2000中存word文档:(直接保存word文件到SQL)
TBlobField *WordField;
userinfoQuery->Edit();
//PartyRequisition为SQL中存word文档的字段,类型要为image
WordField = (TBlobField*)userinfoQuery->FieldByName("PartyRequisition");
WordField->LoadFromFile("c:\test.doc");
userinfoQuery->Post();

//从SQL中读出用直接保存方法存的word文档，并存成word文件,有两种读出方法：
1.
TBlobField *WordField;
WordField = (TBlobField*)userinfoQuery->FieldByName("PartyRequisition");
WordField->SaveToFile("c:\test.doc");

2.
TStream *Stream;
TMemoryStream *tmpStream = new TMemoryStream();
Stream = userinfoQuery->CreateBlobStream(userinfoQuery->FieldByName("PartyRequisition"),bmRead);
tmpStream->CopyFrom(Stream,Stream->Size);
tmpStream->SaveToFile("c:\test.doc");
delete Stream1;
Stream1=NULL;
delete tmpStream;


二。用TOleContainer控件
//向SQL2000中存word文档:
TStream *Stream1;

OleContainer1->CreateObjectFromFile("c:\test.doc", False);
if(userinfoQuery->State!=dsInsert&&userinfoQuery->State!=dsEdit)
userinfoQuery->Edit();
//PartyRequisition为SQL中存word文档的字段,类型要为image
Stream1=userinfoQuery->CreateBlobStream(userinfoQuery->FieldByName("PartyRequisition"), bmWrite);
try
{
OleContainer1->SaveToStream(Stream1);
((TBlobField *)userinfoQuery->FieldByName("PartyRequisition"))->LoadFromStream(Stream1);
}
__finally
{
delete Stream1;
Stream1=NULL;
userinfoQuery->Post();
}

//从SQL中读出用TOleContainer方法存的word文档，并显示在TOleContainer中
TStream *Stream1;
Stream1=userinfoQuery->CreateBlobStream(userinfoQuery->FieldByName("PartyRequisition"), bmRead);
try
{
OleContainer1->LoadFromStream(Stream1);
OleContainer1->DoVerb(ovShow);

}
__finally
{
delete Stream1;
Stream1=NULL;
}
}

[gk0205]

哈哈

[chifengwatch]

同意zzhong2()

[lihongxing2002]

我顶

[wt_sanlian]

ADOQuery控件和Query控件是一样的啊

[zzhong2]

存入文件；其中PartyRequisition字段一定要是image类型（在SQL中）也就是BLOB字段
TBlobField *WordField;
if (OpenDialog1->Execute())
{

WordField = (TBlobField*)userinfoQuery->FieldByName("PartyRequisition");
WordField->LoadFromFile(OpenDialog1->FileName);
userinfoQuery->Post();
}