3 通过ConnectionPtr 对象的Execute方法执行sql语句(也可通过_CommandPtr对象)
4:定义_ResulsetPtr 执行查询sql语句,并返回结果集
类的实现:
// ADOConn.cpp: implementation of the ADOConn class.
//
//////////////////////////////////////////////////////////////////////
#include "stdafx.h"
#include "企业人事管理系统.h"
#include "ADOConn.h"
#ifdef _DEBUG
#undef THIS_FILE
static char THIS_FILE[]=__FILE__;
#define new DEBUG_NEW
#endif
//////////////////////////////////////////////////////////////////////
// Construction/Destruction
//////////////////////////////////////////////////////////////////////
ADOConn::ADOConn()
{
state=0;//初始化数据库状态,1 连接 0 未连接
}
ADOConn::~ADOConn()
{
}
void ADOConn::Connection()
{
::CoInitialize(NULL);
//AfxOleInit();
// try{ m_pConnection.CreateInstance("ADODB.Connection");
// // m_pConnection.CreateInstance(__uuidof(Connection));
// //_bstr_t strSQL="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=企业人事管理系统数据库\\RSGLXT.mdb";
// //m_pConnection->Open(strSQL,"","",adModeUnknown);//Home.mdb放在工程目录下// 连接ACCESS数据库
// _bstr_t strSQL="Driver={SQL Server};Server=ZLQ-PC\\SQLEXPRESS泉水叮咚;Database=用VC++做的企业人事管理系统";//连接SQL2005数据库,注意Server=ZLQ-PC\\SQLEXPRESS泉水叮咚中是两个\\,即使你的数据库服务器只有一个\,也要再加上1个,否者会连接不成功
// m_pConnection->Open(strSQL,"sa","123",adModeUnknown);
// AfxMessageBox("连接成功");
//
//
// }catch(_com_error e){ AfxMessageBox("连接失败");}
//方式二
HRESULT hr;
try
{
hr= m_pConnection.CreateInstance("ADODB.Connection");;///创建Connection对象
if(SUCCEEDED(hr))
{
_bstr_t strSQL="Driver={SQL Server};Server=ZLQ-PC\\SQLEXPRESS泉水叮咚;Database=用VC++做的企业人事管理系统";//连接SQL2005数据库,注意Server=ZLQ-PC\\SQLEXPRESS泉水叮咚中是两个\\,即使你的数据库服务器只有一个\,也要再加上1个,否者会连接不成功
\\注意我的sqlserver2005的服务器是ZLQ-PC\SQLEXPRESSS 泉水叮咚( SQL Server 9.0.5000-sa),记住不要红色这些
hr=m_pConnection->Open(strSQL,"sa","123",adModeUnknown);
// AfxMessageBox("连接成功");
state=1;
}
}catch(_com_error e)///捕捉异常
{
CString errormessage;
errormessage.Format( "连接数据库失败!\r\n错误信息:%s ",e.ErrorMessage());
AfxMessageBox("连接失败");
AfxMessageBox(errormessage);///显示错误信息
state=0;
}
}
void ADOConn::ExitConnection()
{
if(m_pRecordset!=NULL)
m_pRecordset->Close();
if (m_pConnection->State)
{m_pConnection->Close();
}
::CoUninitialize();
state=0;
}
_RecordsetPtr ADOConn::ExecuteSQL(_bstr_t strSQL)
{ _RecordsetPtr hr;
try
{ if(m_pConnection==NULL)
Connection();
hr=m_pConnection->Execute(strSQL,NULL,adCmdText);
AfxMessageBox("执行sql语句成功");
return hr;
}catch(_com_error e){ AfxMessageBox("执行sql语句不成功"); return NULL;}
}
BOOL ADOConn::IsConnection()
{
if (state)//如果连接了数据库
{
return TRUE;
}else return FALSE;
}
一、ADO概述
ADO是Microsoft为最新和最强大的数据访问范例 OLE DB 而设计的,是一个便于使用的应用程序层接口。ADO 使您能够编写应用程序以通过 OLE. DB 提供者访问和操作数据库服务器中的数据。ADO 最主要的优点是易于使用、速度快、内存支出少和磁盘遗迹小。ADO 在关键的应用方案中使用最少的网络流量,并且在前端和数据源之间使用最少的层数,所有这些都是为了提供轻量、高性能的接口。之所以称为 ADO,是用了一个比较熟悉的暗喻,OLE 自动化接口。
OLE DB是一组”组件对象模型”(COM) 接口,是新的数据库低层接口,它封装了ODBC的功能,并以统一的方式访问存储在不同信息源中的数据。OLE DB是Microsoft UDA(Universal Data Access)策略的技术基础。OLE DB 为任何数据源提供了高性能的访问,这些数据源包括关系和非关系数据库、电子邮件和文件系统、文本和图形、自定义业务对象等等。也就是说,OLE DB 并不局限于 ISAM、Jet 甚至关系数据源,它能够处理任何类型的数据,而不考虑它们的格式和存储方法。在实际应用中,这种多样性意味着可以访问驻留在 Excel 电子数据表、文本文件、电子邮件/目录服务甚至邮件服务器,诸如 Microsoft Exchange 中的数据。但是,OLE DB 应用程序编程接口的目的是为各种应用程序提供最佳的功能,它并不符合简单化的要求。您需要的API 应该是一座连接应用程序和OLE DB 的桥梁,这就是 ActiveX Data Objects (ADO)。
二、在VC中使用ADO(开发步骤如下:)
1、引入ADO库文件
使用ADO前必须在工程的stdafx.h头文件里用直接引入符号#import引入ADO库文件,以使编译器能正确编译。代码如下所示:
用#import引入ADO库文件
#import "c:\program files\common files\system\ado\msado15.dll"no_namespaces rename("EOF" adoEOF")
BOOL CMyAdoTestApp::InitInstance()
{
if(!AfxOleInit())//这就是初始化COM库
{
AfxMessageBox(“OLE初始化出错!”);
return FALSE;
}
……
}
_ConnectionPtr pConn;
if (FAILED(pConn.CreateInstance("ADODB.Connection")))
{
AfxMessageBox("Create Instance failed!");
return;
}
CString strSRC;
strSRC="Driver=SQL Server;Server=";
strSRC+="suppersoft";
strSRC+=";Database=";
strSRC+="mydb";
strSRC+=";UID=SA;PWD=";
CString strSQL = "Insert into student(no,name,sex,address) values(3,'aaa','male','beijing')";
_variant_t varSRC(strSRC);
_variant_t varSQL(strSQL);
_bstr_t bstrSRC(strSRC);
if (FAILED(pConn->Open(bstrSRC,"","",-1)))
{
AfxMessageBox("Can not open Database!");
pConn.Release();
return;
}
COleVariant vtOptional((long)DISP_E_PARAMNOTFOUND,VT_ERROR);
pConn->Execute(_bstr_t(strSQL),&vtOptional,-1);
pConn.Release();
AfxMessageBox("ok!");
_RecordsetPtr pPtr;
if (FAILED(pPtr.CreateInstance("ADODB.Recordset")))
{
AfxMessageBox("Create Instance failed!");
return FALSE;
}
CString strSRC;
strSRC="Driver=SQL Server;Server=";
strSRC+="210.46.141.145";
strSRC+=";Database=";
strSRC+="mydb";
strSRC+=";UID=sa;PWD=";
strSRC+="sa";
CString strSQL = "select id,name,gender,address from personal";
_variant_t varSRC(strSRC);
_variant_t varSQL(strSQL);
if(FAILED(pPtr->Open(varSQL,varSRC,adOpenStatic,adLockOptimistic,adCmdText)))
{
AfxMessageBox("Open table failed!");
pPtr.Release();
return FALSE;
}
while(!pPtr->GetadoEOF())
{
_variant_t varNo;
_variant_t varName;
_variant_t varSex;
_variant_t varAddress;
varNo = pPtr->GetCollect ("id");
varName = pPtr->GetCollect ("name");
varSex = pPtr->GetCollect ("gender");
varAddress = pPtr->GetCollect ("address");
CString strNo =(char *)_bstr_t(varNo);
CString strName =(char *)_bstr_t(varName);
CString strSex =(char *)_bstr_t(varSex);
CString strAddress =(char *)_bstr_t(varAddress);
strNo.TrimRight();
strName.TrimRight();
strSex.TrimRight();
strAddress.TrimRight();
int nCount = m_list.GetItemCount();
int nItem = m_list.InsertItem (nCount,_T(""));
m_list.SetItemText (nItem,0,strNo);
m_list.SetItemText (nItem,1,strName);
m_list.SetItemText (nItem,2,strSex);
m_list.SetItemText (nItem,3,strAddress);
pPtr->MoveNext();
}
pPtr->Close();
pPtr.Release();
_CommandPtr pCommand;
_RecordsetPtr pRs;
pCommand.CreateInstance(__uuidof(Command));
pCommand->ActiveConnection=pConn;
pCommand->CommandText="select * from student";
pCommand->CommandType=adCmdText;
pCommand->Parameters->Refresh();
pRs=pCommand->Execute(NULL,NULL,adCmdUnknown);
_variant_t varValue = pRs->GetCollect("name");
Cstring strValue=(char*)_bstr_t(varValue);