ADO初始化失败？？？

[Binyangzi]

每次都会出现，有什么问题吗
1.stdafx.h中加入
#import "C:\Program Files\Common Files\System\ado\msado15.dll" no_namespace rename("EOF","adoEOF")
2。app文件的InitInstance中加入
if(S_OK!=OleInitialize(NULL))
{
AfxMessageBox("初始化COM组件库错误");
}

[taianmonkey]

#include <icrsint.h>
#include <basetsd.h>
#include <ole2.h>

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



********************************************


::CoInitialize(NULL); //初始化Com

********************************************

IADORecordBinding *picRs = NULL;
_RecordsetPtr pRs("ADODB.Recordset");
_ConnectionPtr pConn("ADODB.Connection" );
//CFootballTeamRs rsFootballTeam;
GetModuleFileName(NULL,FileName,MAX_PATH);
(_tcsrchr(FileName,'\\'))[1] = 0;

lstrcat(FileName,_T("pass2.mdb"));

strSql = strSql +
"Provider=Microsoft.Jet.OLEDB.4.0;" +
"Data Source = " +
FileName +
";Persist Security Info=False;Jet OLEDB:Database Password=cd;";

//pConn->ConnectionString = chDataSource;
//pConn->Provider = _T("Microsoft.Jet.OLEDB.4.0");
CString sqlSentence = _T("select * from pass");
try
{
pConn->Open((_bstr_t)strSql, "", "", adModeUnknown);

pRs->QueryInterface(
__uuidof(IADORecordBinding), (LPVOID*)&picRs);

pRs->Open( (_variant_t)sqlSentence, // 查询DemoTable表中所有字段
pConn.GetInterfacePtr(), // 获取库接库的IDispatch指针
adOpenDynamic,
adLockOptimistic,
adCmdText);
}
catch(...)
{}

try
{
while(!(pRs->EndOfFile))
{
CString pass = (LPCTSTR)(_bstr_t)pRs->GetCollect("pass");
if(pass.IsEmpty()) return;
SetDlgItemText(IDC_PASS,pass);
pRs->MoveNext();
//break;
}
}
catch(...)
{}

[oyljerry]

CoInitialize(NULL);
初始化
退出时
CoUnInitialize(NULL)

[xiaohuidong]

加这个试试
CoInitialize(NULL);

[Binyangzi]

不行

[bobob]

if(S_FALSE==OleInitialize(NULL))
{
AfxMessageBox("COM组件库已经初始化！");
}

[qrlvls]

!= S_OK 并不表示不能使用数据库
必须要判断是否为 S_FALSE，在AfxOleInit()中已经被初始化