ado mysql 未指定的错误_ADO访问Access数据库错误解决心得随笔

BOOL CAccessDatabase::Query(const CString strSQLString, UINT nFieldNumber, vector >&vecvecVariant)

{

_variant_t Variant;

vector<_variant_t>vecVariant;

EnterCriticalSection(&m_cs);

_RecordsetPtr pRecordset=NULL;

HRESULT hr=S_FALSE;try{

hr= pRecordset.CreateInstance(_T("ADODB.Recordset"));if(SUCCEEDED(hr))

{

hr= pRecordset->Open(strSQLString.AllocSysString(), m_pConnection.GetInterfacePtr(), adOpenDynamic, adLockOptimistic, adCmdText);if(SUCCEEDED(hr))

{if (!pRecordset->adoEOF)

{

hr= pRecordset->MoveFirst();if(SUCCEEDED(hr))

{while (!(pRecordset->adoEOF))

{

vecVariant.clear();for (UINT i = 0; i < nFieldNumber; ++i)

{

ZeroMemory(&Variant, sizeof(Variant));

Variant= pRec