|
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")
（编辑：李大同）
【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!
|
