VC简单调用ADO访问数据库

VC简单调用ADO访问数据库

   #include <msado15.h>

CComPtr<_ADOConnection> pADOConnection;

//创建连接对象

HRESULT hr = pADOConnection.CoCreateInstance(L"ADODB.Connection");

if (FAILED(hr))

{  

MessageBox(_T("无法创建ADO对象!"));

return ;

}

//设置游标

pADOConnection->put_CursorLocation(adUseClientBatch);

CString strCon("DSN=netbar;");

//打开数据库连接

hr = pADOConnection->Open(strCon.AllocSysString());

CComVariant v;

CComPtr<_ADORecordset> pRst;

CString strSQL("SELECT * FROM activemember");

//查询返回记录集

hr = pADOConnection->Execute(strSQL.AllocSysString(), &v, 0, &pRst);

long count = 0;

pRst->get_RecordCount(&count);

//移到第一个跳记录

pRst->MoveFirst();

CComPtr<ADOFields> pADOFields;

//读取所有的字段

pRst->get_Fields(&pADOFields);

CComVariant vFieldsName("memberId"); //可以是字段名称也可以是编号

CComPtr<ADOField> pADOField;

//获取指定的字段

pADOFields->get_Item(vFieldsName, &pADOField);

pADOField->get_Value(&v);

pRst->Close();

//关闭数据库连接

pADOConnection->Close();