64,642
社区成员
发帖
与我相关
我的任务
分享
ADO连接:
首先应该导入:#import "C:\Program Files\Common Files\System\ado\msado15.dll" no_namespace rename("EOF","rsEOF")
具体操作如下:
CoInitialize(NULL);
_ConnectionPtr pConn(__uuidof(Connection));
pConn.CreateInstance("ADODB.connection");
_RecordsetPtr pRs(__uuidof(Recordset));
CString conn="Driver={SQL Server};server=(local);uid=sa;database=pubs";//server=127.0.0.1
if(FAILED(pConn->Open((_bstr_t)conn,"","",-1)))
{
AfxMessageBox("连接失败");
return;
}
pRs=pConn->Execute("select * from authors",NULL,adCmdText);
while(!pRs->rsEof)
{
((CListBox*)GetDlgItem(ID_RS_LIST))->AddString(
(_bstr_t)pRs->GetCollect("au_lname"));
pRs->MoveNext();
}
pRs->Close();
pConn->Close();
pRs.Release();
pConn.Release();
CoUninitialize();