VC下的ADO编程入门(2-4)

最新推荐文章于 2016-10-28 15:22:28 发布
最新推荐文章于 2016-10-28 15:22:28 发布
阅读量294 收藏
点赞数
分类专栏： VC和VC++ 文章标签： 编程 exception initialization null struct 报表
<script type="text/javascript"> </script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
<script type="text/javascript"> </script><script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>

好了，现在我们正式进入本主题，Let's go

 

n          新建一个基于对话的应用程序zjy，在对话框上添加一个按钮和列表控件，并把列表控件的样式设置为报表视图，还有用classwizard给列表控件添加一个控件变量m_list

n          在StdAfx.h头文件中添加一条如下语句

#import "c:program filescommon filessystemADOmsADO15.dll" no_namespace rename("EOF","ADOEOF")

n          在zjy.cpp开始处添加自动初始化COM库的代码

struct InitOle

{

         InitOle(){::CoInitialize(NULL);}

         ~InitOle(){::CoUninitialize();}

}_init_InitOle_;

n          在zjyDlg.h中添加三个成员变量

         bool m_IsConnectionOpen;

         _ConnectionPtr m_pConnection;

         _RecordsetPtr m_pRecordset;

n          在zjyDlg.cpp的BOOL CZjyDlg::OnInitDialog()的      return TRUE;前面添加如下代码

// TODO: Add extra initialization here

         HRESULT hr;

         _bstr_t bstrQuery("select * from customers");

         _bstr_t strConnect="Provider=SQLOLEDB; data source=127.0.0.1;initial catalog=Northwind;";

         _variant_t vRecsAffected(0L);

        

         _variant_t vNULL;

         vNULL.vt=VT_ERROR;

         vNULL.scode =DISP_E_PARAMNOTFOUND;

 

         try

         {

                   hr=m_pConnection.CreateInstance(__uuidof(Connection));

                   if(SUCCEEDED(hr))

                   {

                            hr=m_pConnection->Open(strConnect,_bstr_t(L"sa"),_bstr_t(L""),adConnectUnspecified);

                            if(SUCCEEDED(hr))

                            {

                                     hr=m_pRecordset.CreateInstance(__uuidof(Recordset));

                                     if(SUCCEEDED(hr))

                                     {

                                               m_pRecordset->PutRefActiveConnection(m_pConnection);

                                               hr=m_pRecordset->Open(_variant_t(bstrQuery),vNULL,ADOpenDynamic,adLockOptimistic,adCmdText);

                                               if(SUCCEEDED(hr))

                                               {

                                                         m_IsConnectionOpen=true;

                                               }

                                     }

                            }

                   }

         }

         catch(_com_error &e)

         {

                   _bstr_t bstrSource(e.Source());

                   _bstr_t bstrDescription(e.Description());

                   TRACE("Exception throw for classes generated by #import");

                   TRACE(" Code=%08lx", e.Error);

                   TRACE(" Code meaning = %s", e.ErrorMessage);

                   TRACE(" Source = %s", (LPCTSTR)bstrSource);

                   TRACE(" Description = %s", (LPCTSTR)bstrDescription);

         }

         catch(...)

         {

                   TRACE("Unhandled Exception");

         }

n          添加对话框的WM_Destroy消息响应函数

void CZjyDlg::OnDestroy()

{

         CDialog::OnDestroy();

        

         // TODO: Add your message handler code here

         if(m_IsConnectionOpen)

         {

                    m_IsConnectionOpen=false;

                    m_pConnection->Close();

                    

                    m_pConnection=NULL;

                    m_pRecordset=NULL;

         }

}

n          最后添加按钮的消息响应函数如下

void CZjyDlg::OnButton1()

{

         // TODO: Add your control notification handler code here

         VARIANT_BOOL valEof;

        

         HRESULT hr;

        

         CString strColName;BSTR bstrColName;

 

         CString strValue;VARIANT varValue;

 

         long  ColCount,i; int RowCount=0;

         Fields * fields=NULL;Field * field=NULL;

 

         VARIANT varCounter;

         varCounter.vt=VT_I4;

         varCounter.lVal=0;

 

         try

         {

                   m_list.DeleteAllItems();

                   while(m_list.DeleteColumn(0));

 

                   hr=m_pRecordset->get_Fields(&fields);

                   if(SUCCEEDED(hr)) hr=fields->get_Count(&ColCount);

                   for(i=0;i<ColCount;i++)

                   {       

                            hr=fields->Item[i]->get_Name(&bstrColName);

                            strColName=bstrColName;

                            int nWidth=m_list.GetStringWidth(strColName)+15;

                            m_list.InsertColumn(i,strColName,LVCFMT_LEFT,nWidth);

                   }

                   if(SUCCEEDED(hr)) fields->Release();

 

                   m_pRecordset->get_ADOEOF(&valEof);

                   while(true)

                   {

                            if(valEof)break;

                            m_pRecordset->Fields->get_Item(varCounter,&field);

                            field->get_Value(&varValue);

                            strValue=VariantToString(varValue);

                            m_list.InsertItem(RowCount,strValue);

                            for(i=1;i<ColCount;i++)

                            {

                                     varCounter.lVal =i;

                                     m_pRecordset->Fields->get_Item(varCounter,&field);

                                     field->get_Value(&varValue);

                                     strValue=VariantToString(varValue);

                                     m_list.SetItemText(RowCount,i,(LPCTSTR)strValue);

                            }

                            RowCount++;

                            m_pRecordset->MoveNext();

                            m_pRecordset->get_ADOEOF(&valEof);

                            varCounter.lVal=0;

                   }

                   m_pRecordset->Close();

         }

         catch(_com_error &e)

         {

                   _bstr_t bstrSource(e.Source());

                   _bstr_t bstrDescription(e.Description());

                   TRACE(" Code=%08lx", e.Error);

                   TRACE(" Code meaning = %s", e.ErrorMessage);

                   TRACE(" Source = %s", (LPCTSTR)bstrSource);

                   TRACE(" Description = %s", (LPCTSTR)bstrDescription);

         }

         catch(...)

         {

 

         }

}

n          还有还有，在对话框类添加一个数据类型转换函数

CString CZjyDlg::VariantToString(VARIANT var)

{

CString strValue;

         _variant_t var_t;

         _bstr_t bstr_t;

         time_t cur_time;

         CTime time_value;

         COleCurrency var_currency;

         switch(var.vt)

         {

         case VT_EMPTY:

         case VT_NULL:strValue=_T("");break;

         case VT_UI1:strValue.Format("%d",var.bVal);break;

         case VT_I2:strValue.Format("%d",var.iVal);break;

         case VT_I4:strValue.Format("%d",var.lVal);break;

         case VT_R4:strValue.Format("%f",var.fltVal);break;

         case VT_R8:strValue.Format("%f",var.dblVal);break;

         case VT_CY:

                   var_currency=var;

                   strValue=var_currency.Format(0);break;

         case VT_BSTR:

                   var_t =var;

                   bstr_t=var_t;

                   strValue.Format("%s",(const char *)bstr_t);break;

         case VT_DATE:

                   cur_time=var.date;

                   time_value=cur_time;

                   strValue.Format("%A,%B,%d,%Y");break;

         case VT_BOOL:strValue.Format("%d",var.boolVal);break;

         default:strValue=_T("");break;

         }

         return strValue;

}

(完)

下一篇介绍如何对记录进行增删改操作。

<script type="text/javascript"> </script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
<script type="text/javascript"> </script><script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
zgqtxwd
关注
专栏目录
vc ADO编程入门
08-02
### VC ADO编程入门详解 #### 一、ADO概述及特点 **ActiveX Data Objects (ADO)** 是一种基于OLE DB的高级数据访问技术，在Windows环境下非常流行。它为程序员提供了简单而强大的接口来处理多种类型的数据源，包括...
MFC下的ADO编程入门实例
08-10
这个"MFC下的ADO编程入门实例"是针对初学者设计的，旨在帮助开发者理解如何在MFC应用程序中利用ADO来连接数据库并执行基本操作。 **一、MFC与ADO** MFC是微软提供的C++类库，它为Windows应用程序开发提供了丰富的...
关于 AfxOleInit进行初始化的问题
除却猩猩不是猿
10-28 2298
AfxOleInit支持单线程中调用， 一般会在软件初始化的时候App::InitInstance()添加，但是多线程里面用到OLE就失效，是因为AfxOleInit支持单线程 ，每个子线程中需要初始化一遍也就可以了，当然也可用 CoInitialize代替 不过记得CoUninitialize。AfxOleInit()对应的是 AfxOleTerm()（可以不用调用 因为MFC封装好了 自
VC++下使用ADO编写数据库程序
专注于J2EE，UNIX下C/C++网络程序开发
05-29 1963
准备：(1)、引入ADO类 #import "c:/program files/common files/system/ado/msado15.dll" /no_namespace /rename ("EOF", "adoEOF")(2)、初始化COM在MFC中可以用AfxOleInit();非MFC环境中用: CoInitialize(NULL);CoUnInitialize();(3)#imp
OleInitialize、CoInitialize、CoInitializeEx和AfxOleInit()区别
anchorxing的专栏
05-27 2456
CoInitialize CoInitializeEx 是用来初始化COM运行环境的。 OleInitialize是初始化Ole的运行环境，Ole是在Com的基础上作的扩展，是ActiveX运行的基础，OleInitialize肯定会调用CoInitialize。 CoInitialize、CoInitializeEx都是windows的API，主要是告诉windo
VC中使用ADO操作数据库的方法
07-27 364
http://www.cppprog.com/2009/0108/46.html准备工作(1)、引入ADO类#import "c:/program files/common files/system/ado/msado15.dll" /     no_namespace /     rename ("EOF", "adoEOF")  #import
VC下的ADO编程入门(2-2)
老毕的专栏
05-23 929
VARIANT_BOOL Supports(enum CursorOptionEnum CursorOptions) 常量说明adAddNew可使用 AddNew 方法添加新记录。adApproxPosition可读取并设置 AbsolutePosition 和 AbsolutePage 属性。adBookmark
ADO数据库编程
u010901792的专栏
08-19 877
转自：http://blog.csdn.net/wh8_2011/article/details/51224374 VC开发数据库基础之ADO篇    一、ADO简介 ADO(ActiveX Data Object)是Microsoft数据库应用程序开发的新接口，是建立在OLE DB之上的高层数据库访问技术，请不必为此担心，即使你对OLE DB，COM不了解也能轻松对付ADO,因为
VC下的ADO编程入门
ljx0305的专栏
05-05 1632
 VC下的ADO编程入门 n          新建一基于对话框的应用程序zjy，在对话框上添加一个列表框和一个按钮，用ClassWizard给列表框添加一个变量m_listn          在StdAfx.h头文件的所有include语句下面添加如下一条语句#import "c:/program files/common files/system/ado/msado1
VC下的ADO编程入门(2-3)
老毕的专栏
05-23 944
在正式进入本主题前，让我们先来看一下COM API编程 #include #include #include #include "adoid.h" #include "adoint.h"  struct InitOle{         InitOle(){::CoInitialize(NULL);}         ~InitOle(){::CoU
VC++ ADO编程入门简介
diaokai2608的博客
03-13 120
VC++ ADO编程入门简介 一、ADO简介 ADO(ActiveX Data Object)是Microsoft数据库应用程序开发的新接口，是建立在OLE DB之上的高层数据库访问技术，请不必为此担心，即使你对OLE DB，COM不了解也能轻松对付ADO,因为它非常简单易用，甚至比你以往所接触的ODBC API、DAO、RDO都要容易使用，并不失灵活性。本文将详细地介绍在VC...
VC6从入门到精通-VC与数据库管理.rar_VC6_Vc_vc 入门_从入门到精通_数据库管理
09-19
《VC6从入门到精通-VC与数据库管理》是一份针对初学者的全面教程，旨在帮助读者掌握Visual C++ 6.0（简称VC6）的使用，并深入了解如何利用VC6进行数据库管理。本教程结合理论与实践，通过实例解析，使学习者能够逐步...
ado-Access.rar_ADO ACCESS_VC ADO ACCE_access ado vc_ado Access数
09-24
在本文中，我们将深入探讨如何使用VC++与ADO（ActiveX Data Objects）来操作Microsoft Access数据库，这非常适合初学者入门。ADO是微软提供的一种数据访问接口，它允许开发者通过简单的编程方式连接并操作各种数据库...
ADO数据库编程入门（VC）
07-05
ADO数据库编程入门 本文简要介绍了在VC++ 6.0中使用 ADO进行客户端数据库编程的基本步骤，以及常见问题的解决方法，可供入门级的参考之用。 ADO 是目前在Windows环境中比较流行的客户端数据库编程技术。ADO是建立在...
基于SpringBoot仿天猫购物系统.zip(毕设&课设&实训&大作业&竞赛&项目)
09-20
项目工程资源经过严格测试可直接运行成功且功能正常的情况才上传，可轻松复刻，拿到资料包后可轻松复现出一样的项目，本人系统开发经验充足（全领域），有任何使用问题欢迎随时与我联系，我会及时为您解惑，提供帮助。 【资源内容】：包含完整源码+工程文件+说明（如有）等。答辩评审平均分达到96分，放心下载使用！可轻松复现，设计报告也可借鉴此项目，该资源内项目代码都经过测试运行成功，功能ok的情况下才上传的。 【提供帮助】：有任何使用问题欢迎随时与我联系，我会及时解答解惑，提供帮助 【附带帮助】：若还需要相关开发工具、学习资料等，我会提供帮助，提供资料，鼓励学习进步 【项目价值】：可用在相关项目设计中，皆可应用在项目、毕业设计、课程设计、期末/期中/大作业、工程实训、大创等学科竞赛比赛、初期项目立项、学习/练手等方面，可借鉴此优质项目实现复刻，设计报告也可借鉴此项目，也可基于此项目来扩展开发出更多功能 下载后请首先打开README文件（如有），项目工程可直接复现复刻，如果基础还行，也可在此程序基础上进行修改，以实现其它功能。供开源学习/技术交流/学习参考，勿用于商业用途。质量优质，放心下载使用。
Python网络爬虫与推荐算法新闻推荐平台(毕设&课设&实训&大作业&竞赛&项目)
最新发布
09-20
Python网络爬虫与推荐算法新闻推荐平台：网络爬虫：通过Python实现新浪新闻的爬取，可爬取新闻页面上的标题、文本、图片、视频链接（保留排版） 推荐算法：权重衰减+标签推荐+区域推荐+热点推荐.zip项目工程资源经过严格测试可直接运行成功且功能正常的情况才上传，可轻松复刻，拿到资料包后可轻松复现出一样的项目，本人系统开发经验充足（全领域），有任何使用问题欢迎随时与我联系，我会及时为您解惑，提供帮助。 【资源内容】：包含完整源码+工程文件+说明（如有）等。答辩评审平均分达到96分，放心下载使用！可轻松复现，设计报告也可借鉴此项目，该资源内项目代码都经过测试运行成功，功能ok的情况下才上传的。 【提供帮助】：有任何使用问题欢迎随时与我联系，我会及时解答解惑，提供帮助 【附带帮助】：若还需要相关开发工具、学习资料等，我会提供帮助，提供资料，鼓励学习进步 【项目价值】：可用在相关项目设计中，皆可应用在项目、毕业设计、课程设计、期末/期中/大作业、工程实训、大创等学科竞赛比赛、初期项目立项、学习/练手等方面，可借鉴此优质项目实现复刻，设计报告也可借鉴此项目，也可基于此项目来扩展开发出更多功能 下载后请首先打开README文件（如有），项目工程可直接复现复刻，如果基础还行，也可在此程序基础上进行修改，以实现其它功能。供开源学习/技术交流/学习参考，勿用于商业用途。质量优质，放心下载使用。
THUCNews数据集
09-20
THUCNews数据集
Q音：Vue3+Pinia+Vue Router4+Vant4的移动端仿抖音短视频项目.zip(毕设&课设&实训&大作业&竞赛&
09-20
项目工程资源经过严格测试可直接运行成功且功能正常的情况才上传，可轻松复刻，拿到资料包后可轻松复现出一样的项目，本人系统开发经验充足（全领域），有任何使用问题欢迎随时与我联系，我会及时为您解惑，提供帮助。 【资源内容】：包含完整源码+工程文件+说明（如有）等。答辩评审平均分达到96分，放心下载使用！可轻松复现，设计报告也可借鉴此项目，该资源内项目代码都经过测试运行成功，功能ok的情况下才上传的。 【提供帮助】：有任何使用问题欢迎随时与我联系，我会及时解答解惑，提供帮助 【附带帮助】：若还需要相关开发工具、学习资料等，我会提供帮助，提供资料，鼓励学习进步 【项目价值】：可用在相关项目设计中，皆可应用在项目、毕业设计、课程设计、期末/期中/大作业、工程实训、大创等学科竞赛比赛、初期项目立项、学习/练手等方面，可借鉴此优质项目实现复刻，设计报告也可借鉴此项目，也可基于此项目来扩展开发出更多功能 下载后请首先打开README文件（如有），项目工程可直接复现复刻，如果基础还行，也可在此程序基础上进行修改，以实现其它功能。供开源学习/技术交流/学习参考，勿用于商业用途。质量优质，放心下载使用。
VC++中ADO编程入门指南
在VC++中使用ADO编程 ADO（ActiveX Data Objects）是一种数据访问技术，允许开发者使用OLE Automation对象来访问数据。ADO实际上就是由一组Automation对象构成的组件，因此可以象使用其它任何Automation对象一样...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值