VC操作Sqlserver

//在文件头上加入

#import "c:\program files\common files\system\ado\msado15.dll" no_namespace rename("EOF","adoEOF") 

//连接SQLserver
void CTestSqlserverDlg::OnBnClickedBtnConn()
{
	
	/*
	其中：//关闭数据库

void CTestSqlserverDlg::OnBnClickedBtnDbClose()
{
	m_pConnection->Close();
	m_pConnection.Release();
}

  ----- ADO连接SQL Server的数据库连接字符串模板 ---------- 身份验证模式为:"sql server和windows" Provider=SQLOLEDB.1;Persist Security Info=True;User ID=用户名;Password=密码;Initial Catalog=数据库名;Data Source=SQL服务器名 身份验证模式为:"仅windows" Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=数据库名;Data Source=SQL服务器名 */ CString strSQL; HRESULT hr; try { hr=m_pConnection.CreateInstance(__uuidof(Connection)); m_pConnection->CursorLocation=adUseClient; strSQL="Provider=SQLOLEDB.1;Persist Security Info=True;User ID=sa;Password=adminadmin;Initial Catalog=LocalDataAnalyticalSystem;Data Source=10.36.65.232"; if(SUCCEEDED(hr)) { hr=m_pConnection->Open(_bstr_t(strSQL),"","",-1); } } catch(_com_error e)///捕捉异常 { CString errormessage; errormessage.Format(_T("连接数据库失败!\r\n错误信息:%s"),e.ErrorMessage()); AfxMessageBox(errormessage);///显示错误信息 return; } /* HRESULT hr; try { hr = m_pConnection.CreateInstance("ADODB.Connection");///创建Connection对象 if(SUCCEEDED(hr)) { hr = m_pConnection->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=test.mdb","","",adModeUnknown);///连接数据库 ///上面一句中连接字串中的Provider是针对ACCESS2000环境的，对于ACCESS97,需要改为:Provider=Microsoft.Jet.OLEDB.3.51; } } } catch(_com_error e)///捕捉异常 { CString errormessage; errormessage.Format(_T("连接数据库失败!\r\n错误信息:%s"),e.ErrorMessage()); AfxMessageBox(errormessage);///显示错误信息 } */ }  简单查询 // 简单查询

void CTestSqlserverDlg::OnBnClickedBtnDb()
{
	//直接得到数据
	//CListCtrl* lstData=(CListCtrl*)this->GetDlgItem(IDC_LST_DATA);
	

	Command15Ptr pCommand;
	Recordset15Ptr pRs;
	pCommand.CreateInstance(__uuidof(Command));
	pCommand->ActiveConnection=(_ConnectionPtr)m_pConnection;
	pCommand->CommandText="select * from TBL_CFG_ROLES";
	pCommand->CommandType=adCmdText;
	pCommand->Parameters->Refresh();
	pRs=pCommand->Execute(NULL,NULL,adCmdUnknown);	

	/*
	long   nCount   =   pRs-> GetFields()-> GetCount(); 
	for (long i=0;i<nCount;i++)
	{
		_variant_t varValue = pRs->GetCollect("ROLE_NAME");
		//CString strValue=_bstr_t(varValue);
		//MessageBox(strValue);
		m_lstData.InsertItem(0,_bstr_t(varValue));		
	}
	*/

	m_lstData.InsertItem(0,_bstr_t(pRs->GetCollect(0L)));
	m_lstData.InsertItem(1,_bstr_t(pRs->GetCollect(1L)));
	m_lstData.InsertItem(2,_bstr_t(pRs->GetCollect(2L)));

	
	
	while(pRs->MoveNext())
	{
		m_lstData.InsertItem(0,_bstr_t(pRs->GetCollect(0L)));
		m_lstData.InsertItem(1,_bstr_t(pRs->GetCollect(1L)));
		m_lstData.InsertItem(2,_bstr_t(pRs->GetCollect(2L)));
	}
	
	
	pRs->Close();
	pRs.Release();
	pCommand.Release();	
}