SQLSERVER数据库连接的配置及数据集的设置
HRESULT hr =S_FALSE;
_RecordsetPtr m_QryRcdSet;
_ConnectionPtr m_pConnection;
hr =m_pConnection.CreateInstance("ADODB.Connection");
if (FAILED(hr))
return FALSE;
try
{
m_pConnection->ConnectionTimeout =8;
CString strConnect = "Provider=SQLOLEDB.1;Data Source=" + （数据库服务器的IP） + ";Initial Catalog=" + (数据库的名称)+ ";User ID="
+ （用户名）+ "; PWD=" +（密码）;
m_pConnection->Open(_bstr_t(strConnect),"","",adModeUnknown);
}
catch(_com_error e)///捕捉异常
{
AfxMessageBox("数据库连接失败!" +CString(e.ErrorMessage()));
ASSERT(FALSE);
return FALSE;
}
hr =m_QryRcdSet.CreateInstance("ADODB.Recordset");
if (FAILED(hr))
return FALSE;
try
{
m_QryRcdSet->CursorType =adOpenStatic;
m_QryRcdSet->CursorLocation =adUseClient;
hr = m_QryRcdSet->Open(_bstr_t(SqlStr),_variant_t((IDispatch *)m_pConnection, true), adOpenDynamic, adLockPessimistic, adCmdText);
ADO_LONGPTR count =m_QryRcdSet->GetRecordCount();
if(count > 0)
m_QryRcdSet->MoveFirst();
}
catch(_com_error e)///捕捉异常
{
e.Description();
AfxMessageBox(e.Description());
AfxMessageBox("数据库连接失败!" + CString(e.ErrorMessage()));
ASSERT(FALSE);
return FALSE;
}
在stdafx.h文件中加入以下语句：
#import "c:\program files\common files\system\ado\msado15.dll" no_namespace rename("EOF","adoEOF")
