ADO操作数据的几个问题-数据库技术-3P代码网
繁体中文
设为首页
加入收藏
当前位置:数据库技术首页 >> 数据库开发 >> ADO操作数据的几个问题

ADO操作数据的几个问题

2006-09-09 01:01:23  作者:laiyiling  来源:互联网  浏览次数:10  文字大小:【】【】【
简介:总结了几个在用ADO操作数据库的时候常遇见的问题。总结了几个在用ADO操作数据库的时候常遇见的问题。1读数据库中的二进制数据,在论坛里有人提到用GetChunk不行,只能读Image类型的数据,下面是一个声音数据的例...
关键字:几个问题 数据 ADO

总结了几个在用ADO操作数据库的时候常遇见的问题。

总结了几个在用ADO操作数据库的时候常遇见的问题。

1

读数据库中的二进制数据,在论坛里有人提到用GetChunk不行,只能读Image类型的数据,下面是一个声音数据的例子:

long lDataSize = m_adoRecordSet.GetFields()->GetItem("声音")->ActualSize;

if(lDataSize > 0)

{

_variant_t varBLOB;

varBLOB = m_adoRecordSet.GetFields()->GetItem("声音")->GetChunk(lDataSize);

if(varBLOB.vt == (VT_ARRAY | VT_UI1))

{

char *pBuf = NULL;

SafeArrayAccessData(varBLOB.parray,(void **)&pBuf);

sndPlaySound(pBuf, SND_MEMORY | SND_SYNC | SND_NODEFAULT );//播放声音

SafeArrayUnaccessData(varBLOB.parray);//注意这句不能少的

}

}

2

在DLL中引入ADO库

采用下面方法在stdafx中加入

#import "C:\Program Files\Common Files\System\ADO\msado15.dll" no_namespace rename("EOF","adoEOF")

引入ADO库的时候可能会遇到下面一些错误信息,说是有EditModeEnum、RecordStatusEnum、ParameterDirectionEnum、LockTypeEnum、DataTypeEnum、FieldAttributeEnum重定义!总是编译通不过。

遇到这种情况可以试试改成

#pragma warning(disable:4146)

#import "C:\Program Files\Common Files\System\ADO\msado15.dll" named_guids rename("EOF","adoEOF"), rename("BOF","adoBOF")

#pragma warning(default:4146)

using namespace ADODB;

3

读写时间值的操作,下面只是一种可行的方法,可能还存在其他更好的方法。

写入时间值

COleDateTime oleDate = COleDateTime::GetCurrentTime();

_variant_t vtFld;

vtFld.vt = VT_DATE;

vtFld.date = oleDate;

pRecordSet->PutCollect("出生年月", vtFld);

读时间值

_bstr_t TheValue=m_pset->Fields->GetItem("出生年月")->Value;

temp=(char *)TheValue;

COleVariant vtime(temp);

vtime.ChangeType(VT_DATE);

COleDateTime time=vtime;

4

压缩ACCESS数据库,

Reference: MS KB Article ID:Q230501 Compacting an Access Database via ADO

#import "C:\PROGRAM FILES\COMMON FILES\System\ado\MSJRO.DLL" no_namespace

try

{

IJetEnginePtr jet(__uuidof(JetEngine));

jet->CompactDatabase( "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\\nwind2.mdb;Jet OLEDB:Database Password=test",

"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\\abbc.mdb;" \

"Jet OLEDB:Engine Type=4;Jet OLEDB:Database Password=test");

}

catch(_com_error &e)

{

::MessageBox(NULL, (LPCTSTR)e.Description( ), "", MB_OK) ;

}

责任编辑:admin
相关文章