VC连接SQL2005(例子ADO_2)

(1)    在StdAfx.h中添加下面一句话：

#import "C:\Program Files\Common Files\System\ado\msado15.dll" no_namespace rename("EOF", "rsEOF")

(2)    void CADO_2Dlg::OnBtnQuery() 

{

       CoInitialize(NULL);                                                        // 初始化COM库

       _ConnectionPtr pConn(__uuidof(Connection));          // 建立Connection

       _RecordsetPtr pRst(__uuidof(Recordset));          // 建立Recordset

 

       _CommandPtr pCmd(__uuidof(Command));                     // 建立Command

 

       try

       {

              //pConn->ConnectionString = "Provider=SQLOLEDB;Password=XXX;Persist Security Info=True;User ID=sa;Initial Catalog=pubs";       //此句正确

              pConn->ConnectionString = "driver={SQL Server};Server=(local);DATABASE=pubs;UID=sa;PWD=xxx";

              pConn->Open("", "", "", adConnectUnspecified);

 

              //pRst = pConn->Execute("select * from authors", NULL, adCmdText);

              //pRst->Open("select * from authors", _variant_t((IDispatch*) pConn), adOpenDynamic, adLockOptimistic, adCmdText);

              pCmd->put_ActiveConnection(_variant_t((IDispatch*) pConn));

              pCmd->CommandText = "select * from authors";

              pRst = pCmd->Execute(NULL, NULL, adCmdText);

 

 

              while(!pRst->rsEOF)

              {

                     ((CListBox*)GetDlgItem(IDC_LIST1))->AddString((_bstr_t)pRst->GetCollect("au_lname")); //查询au_lname字段

                     pRst->MoveNext();

              }

       }

       catch(_com_error e)

       {

              CString errormessage;

              errormessage.Format("Error: %s", e.ErrorMessage());

              AfxMessageBox(errormessage);

       }

 

       AfxMessageBox("查询结束!");

 

       pRst->Close();

       pConn->Close();

       pRst.Release();                                                               // 释放相应COM接口上的引用计数 

       pConn.Release();

       CoUninitialize();                                                       // 卸载COM库

}