VC连接ADO数据库

1。初始化

if(!AfxOleInit())
{
        AfxMessageBox(_T("数据库初始化错误!"));
        return FALSE;
}

 

2。定义全局变量

_ConnectionPtr m_pConnection;

_RecordsetPtr m_pRecordset;

 

3。连接数据库

try

{
        hr = m_pConnection.CreateInstance("ADODB.Connection");
        if(SUCCEEDED(hr))
        {   
             _bstr_t strConnect="provider=sqloledb;server=远程IP/本地服务器名;

                                              database=数据库名;  uid=用户名;pwd=密码";
            hr = m_pConnection->Open(strConnect,"用户名","密码",adModeUnknown);
            AfxMessageBox(_T("数据库连接成功!"));
        }
    }
    catch(_com_error e)
    {
        CString strError;
        strError.Format(_T("数据库连接失败/n错误信息:%s"),e.ErrorMessage());
        AfxMessageBox(strError);
        return;
    }

 
4。查询

CString strSQL＝“SQL查询语句”;

BSTR bstrSQL=strSQL.AllocSysString();
m_pRecordset.CreateInstance("ADODB.Recordset");
m_pRecordset->CursorLocation=adUseClient;

//执行查询

m_pRecordset->Open( bstrSQL,

                                    (IDispatch*)m_pConnection,

                                     adOpenDynamic,

                                     adLockOptimistic,

                                      adCmdText);

m_pRecordset->Close();