====关于ado一个问题======

Question

//打开游标记录
BOOL CMemberView::ado_OpenCurRecordset(CString strTableName)
{
if(!m_fConnected) return FALSE;
if(strTableName.IsEmpty()) return FALSE;
AfxMessageBox("11");
//-------------------------------------------------------
HRESULT hr;
CString strQuery;
strQuery.Format("select * from %s", strTableName);
_bstr_t query = strQuery;
_bstr_t source =  m_strSource;
AfxMessageBox("12");
try
{
hr = m_recordset->Open(query, source, adOpenDynamic, adLockOptimistic, adCmdText);
AfxMessageBox("13");
}
catch (_com_error &e)
{
MessageBox(e.ErrorMessage()); 
return FALSE;
}
//*/
AfxMessageBox("14");
return (SUCCEEDED(hr));
}运行到m_recordset->Open处出错，如下
IDispatch #error 3149

Answer 1

你有没有对COM初始化呀，在前面加上：
CoInitialize(NULL);

Answer 2

别忘了退出程序时加上CoUninitialize();

Answer 3

已经初始化了BOOL CMemberApp::ATLInit()
{
m_bATLInited = TRUE;

#if _WIN32_WINNT >= 0x0400
HRESULT hRes = CoInitializeEx(NULL, COINIT_MULTITHREADED);
#else
HRESULT hRes = CoInitialize(NULL);
#endif

if (FAILED(hRes))
{
m_bATLInited = FALSE;
return FALSE;
}

return TRUE;
}void CMemberApp::ATLOut()
{
if (m_bATLInited)
{
CoUninitialize();
}
}
分别在Inistince

Answer 4

我这有个ADO的例子，楼主可以对照参考一下，楼主要就留个邮箱吧

Answer 5

会不会是你的参数source有问题
可以是"DSN=YourDSN"
或者是_variant_t((IDispatch*)m_pConn)其中m_pConn是_ConnectionPtr对象

Answer 6

又出现了新错误
unknown error 0x800aoe7d

Answer 7

to王进
你说的我也试过了，IDispatch #error是这个原因
但又出现了unknown error 0x800aoe7d的错误

Answer 8

是不是你的ADO版本不兼容，你用ado20.tlb试试，ado15.dll我觉得有问题

Answer 9

m_recordset->Open(query, source, adOpenDynamic, adLockOptimistic, adCmdText);
source有问题，这个参数应该是和_ConnectionPtr对象有关系
例如：
_ConnectionPtr gl_pConnection;
....
....
m_pRs->Open(buf,gl_pConnection.GetInterfacePtr(),adOpenStatic,adLockOptimistic,adCmdText);