ADO MFC SQL2000

对于初学VC的朋友来说,连接数据库其实是一件不容易的事情。记得我当时为了与数据库连接上,找了好多资料,上网看了好多文章,都没有解决这个问题。后
来,有个网友帮我解决了,我再次表示感谢。为了后来VC初学的朋友的方便,我现在将VC连接SQL2000数据库的方法写下来,就算你是初学,即使刚入
门,也可以成功连接数据库的。

(注意:由于文章过长,本文章未写完,如果想要整个的代码,可以留个邮箱,或发邮件到[email protected]索要)

先做点准备工作吧。

1学VC连接数据库,要安装两个软件,Visual
C++6.0和SQL2000。怎么安装,我不说了。

2要连接数据库先要启动SQL2000的服务器,看下图吧

单击开始,就可以启动了。

3然后,还是上面,打开“企业管理器”,要建立数据库和表了。打开根目录后,有个

(local)(WindowsNT)的,在上面单击右键,选择属性,再选择安全性,身份验证选择上面那个SQL
Server和Windows,再确定,是。等一下就好了。

4建立数据库,在“数据库”根目录上,单击右键,选择“新建数据库”,输入数据库名字

db_client(也可以用其他的名字,但是下面有些地方会用到),展开db_client,在“表”上右键单击,选择“新建表”,建立如下表:

完成之后,直接关闭,提示保存,选择“是”,然后填入表名字,tb_user,即可。然后在表中填入数据。右键单击刚建立的表tb_user,选择“打开表”,“返回所以行”,填入数据,(为了方便登录,第一行都输入1吧)。这样表就建立好了。

5现在要开始正式编程了。打开VC6.0.

选择“文件”,“新建”,“工程”,MFC
AppWizard(exe),工程名字为:Client,路径自己选择一下吧。第一步,选择“对话框应用程序”,直接“完成”。

6现在要开始写程序了,

先新建一个类吧,“Insert”,“New class”,classicType 选择:Generic
Classic,Name为:CADO,

OK即可。ADO.h文件的代码如下:

#if
!defined(AFX_ADO_H__9B5E5042_244A_4558_A0EA_DECC024DB191__INCLUDED_)

#define
AFX_ADO_H__9B5E5042_244A_4558_A0EA_DECC024DB191__INCLUDED_

#include "stdafx.h"

#if _MSC_VER > 1000

#pragma once

#endif // _MSC_VER > 1000

class ADO

{

public:

_RecordsetPtr m_pRecordset;//定义记录集指针

_ConnectionPtr m_pConnection;//定义连接指针

public:

void GetData(CString strSQL,CString UserID);

CString m_UserID;//用户ID

CString m_UserPwd;//用户密码

CString m_UserType;//用户类型

//      bool Test(CString
SQL);

void rstOpen(CString TSQL);//打开记录集

void ExecuteSQL(CString SQL);//执行SQL语句

bool Move(int nRecordNum);//移动记录集

CString GetFieldValue(CString Field);//获得字段值

void GetErrors(_com_error eErrors);//获得错误信息

bool Open(CString srecordset,UINT adCmd);//打开记录集

int GetRecordCount();//获得记录个数

bool MoveFirst();//最开始一条

bool MoveNext();//下一条

bool MoveLast();//最后一条

bool MovePrevious();//前一条

void close();//关闭连接和记录集

ADO();

virtual ~ADO();

};

#endif //
!defined(AFX_ADO_H__9B5E5042_244A_4558_A0EA_DECC024DB191__INCLUDED_)

ADO.cpp文件代码为:

#include "stdafx.h"

#include "Client.h"

#include "ADO.h"

#ifdef _DEBUG

#undef THIS_FILE

static char THIS_FILE[]=__FILE__;

#define new DEBUG_NEW

#endif

//////////////////////////////////////////////////////////////////////

// Construction/Destruction

//////////////////////////////////////////////////////////////////////

ADO::ADO()  //构造ADO对象时候自动调用打开连接

{

::CoInitialize(NULL);//初始化

try

{

m_pConnection.CreateInstance(_uuidof(Connection));//建立ADO连接的句柄

_bstr_t strConnect="Provider=SQLOLEDB;data
source=127.0.0.1;Database=db_client;uid=sa;pwd=sa;";

//注意:如果你建立数据库时候没有用户名和密码,上面一句该为下面的:

strConnect="Provider=SQLOLEDB;data
source=127.0.0.1;Database=db_client;uid=;pwd=;";

m_pConnection->Open(strConnect,"","",0);//打开连接

}

catch(_com_error e)

{

AfxMessageBox(e.Description());

}

}

ADO::~ADO()

{

}

void ADO::close()  //关闭记录集和连接

{

m_pRecordset->Close();

m_pConnection->Close();

m_pRecordset=NULL;

m_pConnection=NULL;

::CoUninitialize();

}

bool ADO::MovePrevious()  //记录集前一条

{

try

{

m_pRecordset->MovePrevious();

}

catch(_com_error e)

{

AfxMessageBox(e.Description());

return false;

}

return TRUE;

}

bool ADO::MoveLast() //记录集最后一条

{

try

{

m_pRecordset->MoveLast();

}

catch(_com_error e)

{

AfxMessageBox(e.Description());

return false;

}

return TRUE;

}

bool ADO::MoveNext()//记录集下一条

{

try

{

m_pRecordset->MoveNext();

}

catch(_com_error e)

{

AfxMessageBox(e.Description());

return false;

}

return TRUE;

}

bool ADO::MoveFirst() //记录集开始一条

{

try

{

m_pRecordset->MoveFirst();

}

catch(_com_error e)

{

AfxMessageBox(e.Description());

return false;

}

return TRUE;

}

int ADO::GetRecordCount()  //获得记录数目

{

int nCount;

try

{

m_pRecordset->MoveFirst();

}

catch(_com_error e)

{

return 0;

}

if(m_pRecordset->adoEOF)

return 0;

while(!m_pRecordset->adoEOF)

{

m_pRecordset->MoveNext();

nCount++;

}

m_pRecordset->MoveFirst();

return nCount;

}

bool ADO::Open(CString srecordset, UINT adCmd)
//打开记录集

{

try

{

//用连接指针打开记录集,可以打开空记录集

m_pRecordset=m_pConnection->Execute((_bstr_t)srecordset,NULL,adCmd);

}

catch(_com_error &e)

{

this->GetErrors(e);

return false;

}

return true;

}

void ADO::GetErrors(_com_error eErrors) 
//获得错误信息

{

ErrorsPtr pErrors=m_pConnection->GetErrors();

if(pErrors->GetCount()==0)

MessageBox(NULL,eErrors.ErrorMessage(),"错误",MB_OK|MB_ICONEXCLAMATION);

else

{

for(int i=0;i<pErrors->GetCount();i++)//多个错误

{

//获得ADO执行时出错的语言描述,并输出

_bstr_t
desc=pErrors->GetItem((long)i)->GetDescription();

MessageBox(NULL,desc,"错误",MB_OK|MB_ICONEXCLAMATION);

}

}

}

CString ADO::GetFieldValue(CString Field) 
//获得字段值

{

_variant_t Thevalue;

CString temp;

Thevalue=m_pRecordset->GetCollect((_bstr_t)Field);

if(Thevalue.vt==VT_EMPTY || Thevalue.vt==VT_NULL)

temp="";

else

{

temp=(char*)(_bstr_t)Thevalue;

temp.TrimLeft();

temp.TrimRight();

}

return temp;

}

bool ADO::Move(int nRecordNum) //移动记录集指针到指定位置

{

try

{

if(!m_pRecordset->adoBOF)

{

m_pRecordset->MoveFirst();

}

m_pRecordset->Move(nRecordNum);

}

catch(_com_error e)

{

AfxMessageBox(e.Description());

return false;

}

return TRUE;

}

void ADO::ExecuteSQL(CString SQL) //执行

{

try

{

m_pConnection->Execute((_bstr_t)SQL,NULL,adCmdText);//用指向连接的指针指向SQL语句

}

catch(_com_error e)

{

AfxMessageBox(e.Description());

}

}

void ADO::rstOpen(CString TSQL)  //打开记录集

{

try

{

//用记录指针打开记录集

_bstr_t strSQL=TSQL.AllocSysString();

m_pRecordset.CreateInstance(_uuidof(Recordset));

m_pRecordset->Open(strSQL,(IDispatch*)m_pConnection,adOpenDynamic,adLockOptimistic,adCmdText);

}

catch(_com_error e)

{

m_pRecordset=m_pConnection->Execute(_bstr_t(TSQL),NULL,adCmdText);

}

}

void ADO::GetData(CString strSQL,CString
UserID)

{

m_pRecordset.CreateInstance(_uuidof(Recordset));//创建记录集对象

m_pRecordset->Open((LPTSTR)strSQL.GetBuffer(130),m_pConnection.GetInterfacePtr()

,adOpenDynamic,    adLockOptimistic,adCmdText);//取得表中的记录

//返回各列值

if(m_pRecordset->adoEOF)

{

return ;

}

else

{

m_UserID=UserID;

m_UserPwd=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("user_mm");

m_UserType=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("user_type");

}

}

在StdAfx.h里面加入下面的代码:

#import "c:\Program Files\Common
Files\System\ado\msado15.dll" no_namespace rename("EOF","adoEOF")
rename("BOF","adoBOF")

7下面新建一个对话框,该ID为:IDD_MAINDLG

为该对话框新建一个类,直接在对话框上双击,在弹出的对话框单击OK
输入Name为:CMainDlg

8把第一个对话框ID为: IDD_DIALOG1该为:ID D_LOGINDLG

并设计该对话框为下图:

编辑框控件ID为:IDC_USERID,IDC_USERPWD

按钮控件ID为:IDC_OK,IDC_EXIT

9现在为按钮控件添加消息响应:菜单,“View”,“ClassWiarzd”,“MessageMap
”,“Client”,

“CClientDlg”,IDC_OK,BN_CLICED,Add Function
,OK,OK,

用同样的方法添加IDC_EXIT消息处理。

在CClientDlg的头文件中的某个Public下添加:

int m_count;

ADO adoConn;

在OnExit()的代码如下:

void CClientDlg::OnExit()

{

//
TODO: Add your control notification handler code here

int result;

if(m_count>3)

{

CDialog::OnCancel();

}

else

{

result=MessageBox("是否真的要退出","提示",MB_YESNO);

if(IDYES==result) //exit

{

CDialog::OnCancel();

}

else if(IDNO==result) //no

{

m_UserID="";

m_UserPwd="";

UpdateData(FALSE);

GetDlgItem(IDC_USERID)->SetFocus();

}

}

}

另一篇:

(1).在文件stdafx.h中最后一个#endif的前一行写入 

#import "C:\program files\common files\System\ado\msado15.dll"  no_namespace \

rename("EOF","EndOfFile") \

rename("LockTypeEnum","newLockTypeEnum") \

rename("DataTypeEnum","newDataTypeEnum") \

rename("FieldAttributeEnum","newFieldAttributeEnum") \

rename("EditModeEnum","newEditModeEnum") \

rename("RecordStatusEnum","newRecordStatusEnum") \

rename("ParameterDirectionEnum","newParameterDirectionEnum")

如果你的系统不是安装在C盘的话就把#import 后面的C改成系统所有的盘

--------------------------------------------------------------------------
(2).在C***App类的public:下加入 

     _RecordsetPtr m_pADOSet; 

     bool ADOExecute(_RecordsetPtr &ADOSet, _variant_t &strSQL); 
在private:下加入

private:

     _ConnectionPtr ADOConn; 
--------------------------------------------------------------------------
在class C***App : public CWinApp 


... 
};之后#endif之前加入

extern CxxxApp theApp; 
--------------------------------------------------------------------------
(3)在BOOL C***App::InitInstance()函数中Enable3dControls(); // Call this when linking 

to MFC statically这一行下面加入 
if( FAILED(::CoInitialize(NULL)) ) 



     AfxMessageBox("ADO Init failed"); 

     return false; 

try 



     ADOConn.CreateInstance(__uuidof(Connection)); 

     ADOConn->Open("DSN=OBDC数据源;Provider=MSDASQL","用户","密码", 

    adConnectUnspecified);//这一行要自已修改 


catch(_com_error &e) 


     CString err; 

     err.Format("%s", (char*)(e.Description()) ); 

     AfxMessageBox(err); 


catch(...) 


     AfxMessageBox("Unknown Error..."); 



m_pADOSet.CreateInstance(__uuidof(Recordset)); 
-------------------------------------------------------------------------
并在文件最后加上如下代码: 

bool CxxxApp::ADOExecute(_RecordsetPtr &ADOSet, _variant_t &strSQL) 



     if ( ADOSet->State == adStateOpen) ADOSet->Close(); 

     try 
     { 

         ADOSet->Open(strSQL, ADOConn.GetInterfacePtr(), adOpenStatic, adLockOptimistic, 

         adCmdUnknown); 

         return true; 

     } 

     catch(_com_error &e) 

     { 

         CString err; 

         err.Format("ADO Error: %s",(char*)e.Description()); 

         AfxMessageBox(err); 

         return false; 

     } 


------------------------------------------------------------------------
最后就可以在登录时执行SQL语句了,比如用户为CString strUser, 密码是CString 

strPwd;数据库表是user_table(user_id, user_name, user_pwd)则 

_variant_t sqlQuery ;

sqlQuery = "select * from user_table where user_name=‘"+strUser +"‘ and 

user_pwd=‘"+ strPwd +"‘"; 

theApp.ADOExecute(theApp.m_pADOSet, sqlQuery );

int iCount = theApp.m_pADOSet->GetRecordCount(); 

if ( 0==iCount ) 


     AfxMessageBox(_T("密码错误"), MB_ICONEXCLAMATION); 

     return; 

else 


     AfxMessageBox(_T("登录成功"), MB_ICONEXCLAMATION); 

}

时间: 2025-01-06 06:29:42

ADO MFC SQL2000的相关文章

MFC中使用ADO进行数据库操作

参考FROM:http://hi.baidu.com/sunkanghome/item/e1fda510b3186359f1090ee2 数据库与数据库编程: 当前各种主流数据库有很多,包括Oracle, MS SQL Server, Sybase, Informix, MySQL, DB2, Interbase / Firebird, PostgreSQL, SQLite, SAP/DB, TimesTen, MS ACCESS等等. 数据库编程是对数据库的创建.读写等一列的操作.数据库编程分

vs2010 MFC +win7下的程序 在win7上正常运行,Server2008就出错(ADO数据库连接出错)

ADO 应用程序不能在别的操作系统运行的解决方案 我的机子是WIN7系统,在WIN7下开发的MFC ADO应用程序到Server2008上就不能运行了. 解决方案如下: 1.先下载下面的文件 32位WIN7系统:Msado60_Backcompat_i386.tlb 64位WIN7系统(INTEL平台):Msado60_Backcompat_i386.tlb 和Msado60_Backcompat_x64.tlb 64位WIN7系统(AMD平台):Msado60_Backcompat_i386.

MFC通过ADO操作Access数据库

我在<VC知识库在线杂志>第十四期和第十五期上曾发表了两篇文章--"直接通过ODBC读.写Excel表格文件"和"直接通过DAO读.写Access文件",先后给大家介绍了ODBC和DAO两种数据库访问技术的基本使用方法,这次要给大家介绍的是ADO数据库访问技术的使用方法.ADO(Active Data Object,活动数据对象)实际上是一种基于COM(组件对象模型)的自动化接口(IDispatch)技术,并以OLE DB(对象连接和镶入的数据库)为基础

MFC ADO数据库操作

MFC ADO数据库操作 - 延陵小明 - CSDN博客 http://blog.csdn.net/guoming0000/article/details/7280070/ 内容比较乱,作为草稿,对现有的ado数据库操作函数方法进行汇总. 小函数m_pRecordset->RecordCount//取得记录数量 全局变量#import "msado15.dll" no_namespace rename("EOF","adoEOF")rena

MFC学习(一)——ADO数据库编程

这几篇是是在MFC框架下做保险项目的学习心得,只学了两周,但是还是学了很多知识. 下面介绍一下用ADO来进行数据库的各种操作. 1.数据库连接和打开 这次项目用的是SQL Server数据库,ADO连接数据遇到最重要的问题就是找到连接字符串,经过亲身经历各种尝试,在网上发现了一种无bug的方法,就是通过新建ado.udl文件,然后打开填写相应的数据库后用记事本打开即可得到连接字符串.下面是我封装的一个打开数据库的方法: 1 BOOL CDateOperator::OpenDateBase() 2

MFC,ADO方式实现数据库操作

参考: MSDN数据访问编程 (MFC/ATL): https://msdn.microsoft.com/zh-cn/library/kd4ck1tt.aspx?f=255&MSPPError=-2147217396 ado方式操作数据库封装类的使用范例: http://download.csdn.net/detail/xianglitian/2383423 使用ADO封装类的数据库程序开发实例: http://wenku.baidu.com/link?url=A3g4_Ucz1RuijQMZ8

封装ADO库之MFC应用

Microsoft Activex Data Objects(ADO)支持用于建立基于客户端/服务器和web的应用程序开发的主要功能.其主要优点是易于使用.高速度.低内存支出和占用磁盘空间较少. 本次封装的CadoInterface类仅针对MFC的使用,目的是优化对ADO的操作,避免频繁写try catch(...)以及在连库.开表.写数据.读数据等过程中一些重复性的工作.该类仅对一些常用的操作进行封装,用户可以根据需要进行修改和扩展. 封装类主要包括:基本操作.增值操作.支持算法与支持结构.基

MFC:用ADO连接SQLSERVER

1.新建一对话框:Ado,如图所示:控件listbox和button 2.导入ADO库:在stdafx.h中导入该库 1 #import "C:\Program Files\Common Files\System\ado\msado15.dll" no_namespace rename("EOF","rsEOF") 3.查询按钮代码: 1 void CAdoDlg::OnBtnQuery() 2 { 3 // TODO: Add your con

MFC ADO连接Sql Server数据库报无效指针的问题

相关症状:  Win7sp1上编译的ADO程序无法在低版本系统上运行,创建ADO时提示错误:0x80004002 解决办法如下:  1.下载:  http://download.microsoft.com/download/6/4/3/64318ED2-7E18-4A5C-80E2-9BDA0DF02DB3/msado60_Backcompat_i386.tlb 2.相关代码导入修改为:  #import "msado60_Backcompat.tlb" no_namespace re