当前位置: 开发笔记 > 数据库 > 正文

VC++6.0通过ADO方式连接SQLServer2005

作者：空心悟心 | 来源：互联网 | 2018-06-05 08:11

属性名类型是否为主键允许空备注snochar(8)是学号snamevarchar(10)否√姓名ageint否√年龄deptchar(4)否√所在系号commentvarchar(8)否√评语基于ADO方式的实验步骤此例中所用数据库与上例中相同；此例中无需创建数据源。

属性名类型是否为主键允许空备注 sno char(8) 是学号 sname varchar(10) 否 √ 姓名 age int 否 √ 年龄 dept char(4) 否 √ 所在系号 comment varchar(8) 否 √ 评语基于 ADO 方式的实验步骤此例中所用数据库与上例中相同；此例中无需创建数据源。

属性名	类型	是否为主键	允许空	备注
sno	char(8)	是		学号
sname	varchar(10)	否	√	姓名
age	int	否	√	年龄
dept	char(4)	否	√	所在系号
comment	varchar(8)	否	√	评语

基于ADO方式的实验步骤

此例中所用数据库与上例中相同；

此例中无需创建数据源。

（1）创建VC应用程序

打开VC&＃43;&＃43;6.0，新建工程。选择MFC AppWizard（exe），工程名为exec2,存放在D盘实验文件夹里。点击“确定”，在弹出的窗口中选择“基本对话框”，以后的步骤没有需要修改的地方，可以直接点击“完成。”这样一个基于基本对话框的工程就创建好了。

（2）界面设计

在工作区左边的树型结构中，选择ResourceView，展开Dialog节点，双击IDD_EXEC2_DIALOG，打开该对话框。在这里添加所需控件。如图17所示。

图17

为编辑框和列表框添加变量。在界面右键单击，选择“建立类向导”，弹出如图18所示窗口。

图18

本例中需要为编辑框IDC_AGE, IDC_COMMENT, IDC_DEPT, IDC_NAME, IDC_SNO，列表框IDC_LIST添加变量。以IDC_AGE为例，点击“ADD Variable”弹出如图19所示窗口。

图19

这里变量名为m_age，类型可从下拉框里选。添加变量完成之后类向导如图20所示。

图20

为按钮添加函数，双击按钮可为其添加函数，在exec2Dig.cpp文件里。

（3）与ADO相关的代码设计

引入ADO库文件，使用ADO前必须在工程的StdAfx.h头文件里用直接引入符号#import引入ADO库文件,以使编译器能正确编译。代码如下所示：

//加入ADO支持库

#import "C:\Program Files\Common Files\System\ado\msado15.dll" no_namespace rename("EOF","rsEOF")

//namespace是命名空间，这里不需要命名空间，主要是为了访问方便，在程序中可以直接访问ADO提供的Connection、Command和Recordset这三个COM接口

定义ADO连接、命令、记录集变量指针，在exec2Dlg.h文件的class CExec2Dlg : public CDialog方法中添加如下代码：

// 定义ADO连接、命令、记录集变量指针

_ConnectionPtr m_pConnection;

_CommandPtr m_pCommand;

_RecordsetPtr m_pRecordset;

// 该指针为整个应用程序共享，所以放在public下面。

初始化OLE/COM库环境。必须注意的是，ADO库是一组COM动态库，这意味应用程序在调用ADO前，必须初始化OLE/COM库环境。在MFC应用程序里，一个比较好的方法是在应用程序主类的OnInitDialog()成员函数里初始化OLE/COM库环境。

在本例中，在exec2.cpp文件的BOOL CExec2Dlg::OnInitDialog()成员函数里添加如下代码：

//初始化COM，创建ADO连接等操作

AfxOleInit();

m_pConnection.CreateInstance(__uuidof(Connection));

//在ADO操作中建议语句中要常用try...catch()来捕获错误信息，

//因为它有时会经常出现一些想不到的错误

try

{

//打开本地Sql Server库student

m_pConnection->Open("driver={SQL Server};Server=XP-201203132217\\SQLSERVER2005;Database=Student;UID=sa;PWD=yuzhongchun","","",adModeUnknown);

//Server后是服务器的计算机名，注意XP-201203132217\\SQLSERVER2005是双斜线啊，写错了就会返回 [Microsoft][ODBC SQL Server Driver][DBNETLIB]SQL Server 不存在或访问被拒绝

//Database后是数据库名

// UID="";PWD=""写入相应的用户名和密码，这里使用的是SQL server验证

}

catch(_com_error e)

{

AfxMessageBox("数据库连接失败!");

return FALSE;

}

在exec2Dlg.cpp文件中添加代码。

在#endif下面添加如下代码：

extern CExec2App theApp; // 在此引用应用类中的theApp来获取库连接指针

在BOOL CExec2Dlg::OnInitDialog()函数中添加如下代码：

// TODO: Add extra initialization here

//使用ADO创建数据库记录集

m_pRecordset.CreateInstance(__uuidof(Recordset));

// 在ADO操作中建议语句中要常用try...catch()来捕获错误信息，

// 因为它有时会经常出现一些想不到的错误

try

{

m_pRecordset->Open("SELECT * FROM s", // 查询s表中所有字段

m_pConnection.GetInterfacePtr(), // 获取库接库的IDispatch指针

adOpenDynamic,

adLockOptimistic,

adCmdText);

}

catch(_com_error *e)

{

AfxMessageBox(e->ErrorMessage());

}

至此，与ADO相关的代码都已添加完了。下面在exec2Dlg.cpp文件中添加应用代码。

（4）与功能相关的代码设计

在界面上用到列表框，当鼠标点击列表框的某一行时，其中的数据能够在编辑框中显示出来，这要用到列表框的一个函数。添加此函数的方法如下：摁住Ctrl和w键，进入类向导，如图21所示。

图21

选择IDC_LIST，在右边的Messages下面选择LBN_SELCHANGE，然后点击“Add Function”按钮，最后点击“确定”按钮，即为列表框添加了此函数。具体代码如下：

//名称：OnSelchangeList

//功能：当每次选择新的记录时，都会移动指针到新的记录位置并将&＃20540;显示出来

void CExec2Dlg::OnSelchangeList()

{

int curSel = m_list.GetCurSel();

_variant_t var,varIndex;

if(curSel <0)

return;

try

{

// 先将指针移向第一条记录，然后就可以相对第一条记录来随意移动记录指针

m_pRecordset->MoveFirst();

m_pRecordset->Move(long(curSel));

var = m_pRecordset->GetCollect("sname");

if(var.vt != VT_NULL)

m_sname = (LPCSTR)_bstr_t(var);

var = m_pRecordset->GetCollect("age");

if(var.vt != VT_NULL)

m_age=(LPCSTR)_bstr_t(var);

var = m_pRecordset->GetCollect("sno");

if(var.vt != VT_NULL)

m_sno = (LPCSTR)_bstr_t(var);

var = m_pRecordset->GetCollect("dept");

if(var.vt != VT_NULL)

m_dept = (LPCSTR)_bstr_t(var);

var = m_pRecordset->GetCollect("comment");

if(var.vt != VT_NULL)

m_comment = (LPCSTR)_bstr_t(var);

UpdateData(false);

}

catch(_com_error *e)

{

AfxMessageBox(e->ErrorMessage());

}

将数据库中的数据显示在列表框中，添加函数ListData()。添加的方法是，在工作区左边的树型结构中，选择ClassView，右键单击CExec2Dlg，在弹出的菜单中选择Add Member Function，出现如图22所示的窗口，类型为void，函数描述为ListData()。

图22

此函数的具体代码如下：

//名称：ListData

//功能：将数据库中的数据显示在列表框中

void CExec2Dlg::ListData()

{

_variant_t var;

CString strname,strage,strsno,strdept,strcom;

//清空列表框

m_list.ResetContent();

strname=strage=strsno=strdept=strcom="";

//在ADO操作中建议语句中要常用try...catch()来捕获错误信息，

//因为它有时会经常出现一些想不到的错误。

try

{

if(!m_pRecordset->BOF)

m_pRecordset->MoveFirst();

else

{

AfxMessageBox("表内数据为空");

return;

}

// 读入库中各字段并加入列表框中

while(!m_pRecordset->adoEOF)

{

var = m_pRecordset->GetCollect("sno");

if(var.vt != VT_NULL)

strsno = (LPCSTR)_bstr_t(var);

var = m_pRecordset->GetCollect("sname");

if(var.vt != VT_NULL)

strname = (LPCSTR)_bstr_t(var);

var = m_pRecordset->GetCollect("age");

if(var.vt != VT_NULL)

strage = (LPCSTR)_bstr_t(var);

var = m_pRecordset->GetCollect("dept");

if(var.vt != VT_NULL)

strdept = (LPCSTR)_bstr_t(var);

var = m_pRecordset->GetCollect("comment");

if(var.vt != VT_NULL)

strcom = (LPCSTR)_bstr_t(var);

m_list.AddString( strsno &＃43; " --> " &＃43;strname &＃43; " --> "&＃43;strage&＃43; " --> "&＃43; strdept&＃43; " --> "&＃43; strcom);

m_pRecordset->MoveNext();

}

// 默认列表指向第一项，同时移动记录指针并显示

m_list.SetCurSel(0);

OnSelchangeList();

}

catch(_com_error *e)

{

AfxMessageBox(e->ErrorMessage());

}

插入按钮对应的函数代码如下：

//名称：OnWritedata

//功能：将编辑框中输入的学生信息插入到s表中

void CExec2Dlg::OnWritedata()

{

UpdateData();

if(m_sname == "" || m_sno == "")

{

AfxMessageBox("学号和姓名信息不能为空!");

return;

}

//在ADO操作中建议语句中要常用try...catch()来捕获错误信息，

//因为它有时会经常出现一些想不到的错误。

try

{

// 写入各字段&＃20540;

m_pRecordset->AddNew();

m_pRecordset->PutCollect("sno", _variant_t(m_sno));

m_pRecordset->PutCollect("sname", _variant_t(m_sname));

m_pRecordset->PutCollect("age", atol(m_age));

m_pRecordset->PutCollect("dept", _variant_t(m_dept));

m_pRecordset->PutCollect("comment", _variant_t(m_comment));

m_pRecordset->Update();

AfxMessageBox("插入成功!");

// 更新显示其库内容

int nCurSel = m_list.GetCurSel();

ListData();

m_list.SetCurSel(nCurSel);

// 移动记录指针到新的位置

OnSelchangeList();

}

catch(_com_error *e)

{

AfxMessageBox(e->ErrorMessage());

}

修改按钮对应的函数代码如下：

//名称：OnModify

//功能：修改学生信息

void CExec2Dlg::OnModify()

{

UpdateData(); // 更新对话框数据

if(m_list.GetCount() == 0)

{

AfxMessageBox("表中记录数为空!");

return;

}

else if(m_list.GetCurSel() <0 || m_list.GetCurSel() > m_list.GetCount())

m_list.SetCurSel(0);

// 修改当前记录的字段&＃20540;

try

{

m_pRecordset->PutCollect("sno", _variant_t(m_sno));

m_pRecordset->PutCollect("sname", _variant_t(m_sname));

m_pRecordset->PutCollect("age", atol(m_age));

m_pRecordset->PutCollect("dept", _variant_t(m_dept));

m_pRecordset->PutCollect("comment", _variant_t(m_comment));

m_pRecordset->Update();

// 重新读入库记录更新显示

int nCurSel = m_list.GetCurSel();

ListData();

m_list.SetCurSel(nCurSel);

// 移动记录指针到新的位置

OnSelchangeList();

}

catch(_com_error *e)

{

AfxMessageBox(e->ErrorMessage());

}

删除按钮对应的函数代码如下：

//名称：OnDelete

//功能：删除选中的学生信息

void CExec2Dlg::OnDelete()

{

if(m_list.GetCount() == 0)

return;

else if(m_list.GetCurSel() <0 || m_list.GetCurSel() > m_list.GetCount())

m_list.SetCurSel(0);

try

{

// 删除当前行记录

m_pRecordset->Delete(adAffectCurrent);

m_pRecordset->Update();

// 删除列表中当前&＃20540;

int nCurSel = m_list.GetCurSel();

m_list.DeleteString(nCurSel);

if(nCurSel == 0 && (m_list.GetCount() != 0))

m_list.SetCurSel(nCurSel);

else if(m_list.GetCount() != 0)

m_list.SetCurSel(nCurSel-1);

// 移动记录指针到新的位置

OnSelchangeList();

}

catch(_com_error *e)

{

AfxMessageBox(e->ErrorMessage());

}

查询按钮对应的函数代码如下：

//名称：OnQuery()

//功能：按照学号和姓名查询学生信息，如果只输入学号则只按照学号查询

//只输入姓名则只按照姓名查询，两者都没有输入则查询所有学生信息

void CExec2Dlg::OnQuery()

{

UpdateData(TRUE);

//构造Sql语句

//为简单考虑，这里只把学号和姓名作为查询条件

CString strSql;

if(m_sname != "" && m_sno != "")

strSql.Format("SELECT * FROM s WHERE sname = '%s' AND sno = '%s'",

m_sname,m_sno);

else if(m_sname != "" && m_sno == "")

strSql.Format("SELECT * FROM s WHERE sname = '%s'",m_sname);

else if(m_sname == "" && m_sno != "")

strSql.Format("SELECT * FROM s WHERE sno = '%s'",m_sno);

else

strSql = "SELECT * FROM s";

try

{

//先关闭已经打开的记录集对象

m_pRecordset->Close();

//根据新的Sql查询语句，重新打开记录集对象

m_pRecordset->Open(strSql.AllocSysString(),

theApp.m_pConnection.GetInterfacePtr(),

adOpenDynamic,

adLockOptimistic,

adCmdText);

}

catch(_com_error *e)

{

AfxMessageBox(e->ErrorMessage());

}

//将查询后得到的新记录集显示出来

ListData();

}

刷新按钮对应的函数代码如下：

//名称：OnRefresh

//功能：刷新编辑框和列表框

void CExec2Dlg::OnRefresh()

{

m_sno="";

m_sname="";

m_age="";

m_dept="";

m_comment="";

m_list.ResetContent();

UpdateData(false);

}

（5）运行结果

图23

推荐阅读

sql
基于PgpoolII的PostgreSQL集群安装与配置教程

本文介绍了基于PgpoolII的PostgreSQL集群的安装与配置教程。Pgpool-II是一个位于PostgreSQL服务器和PostgreSQL数据库客户端之间的中间件，提供了连接池、复制、负载均衡、缓存、看门狗、限制链接等功能，可以用于搭建高可用的PostgreSQL集群。文章详细介绍了通过yum安装Pgpool-II的步骤，并提供了相关的官方参考地址。 ... [详细]

蜡笔小新 2023-12-14 19:10:25
sql
SQL日志收缩及截断方法详解

本文详细介绍了SQL日志收缩的方法，包括截断日志和删除不需要的旧日志记录。通过备份日志和使用DBCC SHRINKFILE命令可以实现日志的收缩。同时，还介绍了截断日志的原理和注意事项，包括不能截断事务日志的活动部分和MinLSN的确定方法。通过本文的方法，可以有效减小逻辑日志的大小，提高数据库的性能。 ... [详细]

蜡笔小新 2023-12-14 18:23:25
json
Android 新闻App的本地服务器搭建教程

本文介绍了在开发Android新闻App时，搭建本地服务器的步骤。通过使用XAMPP软件，可以一键式搭建起开发环境，包括Apache、MySQL、PHP、PERL。在本地服务器上新建数据库和表，并设置相应的属性。最后，给出了创建new表的SQL语句。这个教程适合初学者参考。 ... [详细]

蜡笔小新 2023-12-14 17:15:19
sql
如何限制php数据库链接数和连接超时时间？

本文介绍了如何使用php限制数据库插入的条数并显示每次插入数据库之间的数据数目，以及避免重复提交的方法。同时还介绍了如何限制某一个数据库用户的并发连接数，以及设置数据库的连接数和连接超时时间的方法。最后提供了一些关于浏览器在线用户数和数据库连接数量比例的参考值。 ... [详细]

蜡笔小新 2023-12-14 14:06:10
sql
Python高级之网络编程及TCP/IP协议簇的OSI七层模型介绍

本文介绍了Python高级网络编程及TCP/IP协议簇的OSI七层模型。首先简单介绍了七层模型的各层及其封装解封装过程。然后讨论了程序开发中涉及到的网络通信内容，主要包括TCP协议、UDP协议和IPV4协议。最后还介绍了socket编程、聊天socket实现、远程执行命令、上传文件、socketserver及其源码分析等相关内容。 ... [详细]

蜡笔小新 2023-12-14 18:16:27
sql
Netty拆包粘包问题解决 —— 特殊结束符

本文介绍了解决Netty拆包粘包问题的一种方法——使用特殊结束符。在通讯过程中，客户端和服务器协商定义一个特殊的分隔符号，只要没有发送分隔符号，就代表一条数据没有结束。文章还提供了服务端的示例代码。 ... [详细]

蜡笔小新 2023-12-14 18:02:45
sql
Linux服务器密码过期策略、登录次数限制、私钥登录等配置方法

本文介绍了在Linux服务器上进行密码过期策略、登录次数限制、私钥登录等配置的方法。通过修改配置文件中的参数，可以设置密码的有效期、最小间隔时间、最小长度，并在密码过期前进行提示。同时还介绍了如何进行公钥登录和修改默认账户用户名的操作。详细步骤和注意事项可参考本文内容。 ... [详细]

蜡笔小新 2023-12-14 17:57:01
sql
rhel5.5搭建网关+LAMP+postfix+dhcp的步骤和配置方法

本文介绍了在rhel5.5操作系统下搭建网关+LAMP+postfix+dhcp的步骤和配置方法。通过配置dhcp自动分配ip、实现外网访问公司网站、内网收发邮件、内网上网以及SNAT转换等功能。详细介绍了安装dhcp和配置相关文件的步骤，并提供了相关的命令和配置示例。 ... [详细]

蜡笔小新 2023-12-14 17:13:20
redis
搭建Windows Server 2012 R2 IIS8.5+PHP（FastCGI）+MySQL环境的详细步骤

本文详细介绍了搭建Windows Server 2012 R2 IIS8.5+PHP（FastCGI）+MySQL环境的步骤，包括环境说明、相关软件下载的地址以及所需的插件下载地址。 ... [详细]

蜡笔小新 2023-12-14 17:03:58
redis
【译】发送表单数据

这是原文链接：sendingformdata许多情况下，我们使用表单发送数据到服务器。服务器处理数据并返回响应给用户。这看起来很简单，但是 ... [详细]

蜡笔小新 2023-12-14 16:19:10
redis
AJAX的POST请求及实现数据修改功能的方法

本文介绍了使用AJAX的POST请求实现数据修改功能的方法。通过ajax-post技术，可以实现在输入某个id后，通过ajax技术调用post.jsp修改具有该id记录的姓名的值。文章还提到了AJAX的概念和作用，以及使用async参数和open()方法的注意事项。同时强调了不推荐使用async=false的情况，并解释了JavaScript等待服务器响应的机制。 ... [详细]

蜡笔小新 2023-12-14 16:12:01
数据库
PHP设置MySQL字符集的方法及使用mysqli_set_charset函数

本文介绍了PHP设置MySQL字符集的方法，详细介绍了使用mysqli_set_charset函数来规定与数据库服务器进行数据传送时要使用的字符集。通过示例代码演示了如何设置默认客户端字符集。 ... [详细]

蜡笔小新 2023-12-14 15:30:33
数据库
Centos7.6安装Gitlab教程及注意事项

本文介绍了在Centos7.6系统下安装Gitlab的详细教程，并提供了一些注意事项。教程包括查看系统版本、安装必要的软件包、配置防火墙等步骤。同时，还强调了使用阿里云服务器时的特殊配置需求，以及建议至少4GB的可用RAM来运行GitLab。 ... [详细]

蜡笔小新 2023-12-14 14:01:06
数据库
Hibernate配置lazy=false时无法加载数据的问题解决方法

本文介绍了在Hibernate配置lazy=false时无法加载数据的问题，通过采用OpenSessionInView模式和修改数据库服务器版本解决了该问题。详细描述了问题的出现和解决过程，包括运行环境和数据库的配置信息。 ... [详细]

蜡笔小新 2023-12-14 13:59:45
数据库
如何使用Java获取服务器硬件信息和磁盘负载率

本文介绍了使用Java编程语言获取服务器硬件信息和磁盘负载率的方法。首先在远程服务器上搭建一个支持服务端语言的HTTP服务，并获取服务器的磁盘信息，并将结果输出。然后在本地使用JS编写一个AJAX脚本，远程请求服务端的程序，得到结果并展示给用户。其中还介绍了如何提取硬盘序列号的方法。 ... [详细]

蜡笔小新 2023-12-14 13:56:20

空心悟心

这个家伙很懒，什么也没留下！

Tags | 热门标签

RankList | 热门文章