开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > ActiveX/DCOM/ATL > 查看源码
com笔记总结.txt
资源名称：code_and_note_of_COM.rar　[点击查看]
上传用户：weisheen
上传日期：2022-07-09
资源大小：19390k
文件大小：82k
源码类别：

ActiveX/DCOM/ATL

开发平台：

Visual C++

com笔记总结.txt：源码内容
  1. 1.  1.1 OOP:   类，   对象， 继承，重载，重写，引用；
  2.        OOC：组件，组件实例（设计状态/运用状态）， 引用；
  3.      1.2       OOP{cpp/java/c#/vb.net/...}
  4.                OOC{COM/EJB/CORBA}(Component Object Model)   COM+(提供组件运行平台和企业级服务)
  5.                  /DCOM（分布式的COM）
  6.       1.3      组件的特征（OOC):   
  7.                         1. 二进制封装；
  8.                         2. BITS原则： （Bit Service)原则；
  9.                             2.1 软件实体通过接口对外提供服务；
  10.                             2.2 软件接口通过接口依赖其它的软件实体；
  11.                         3. 组件需要部署和安装；独立编译/安装/部署，独立的软件实体；
  12.       1.4      组件接口定义：
  13.                         1.4.1 刻画组件的功能；完整刻画；
  14.                         1.4.2 接口的定义语言：c/cpp;java/c#/vb.net;不满足通用性
  15.                         1.4.3 如果采用 MIDL, 只能定义接口；
  16.       1.5      IDL语言基础：
  17.                         import,    调用其它接口定义文件；
  18.                         interface, 定义接口；
  19.                         coclass,   定义接口实现者，COM类，或COM构件；
  20.                         library,     组件库；对应一个具体组件；
  21.                    MFC： CObject;
  22.                    COM:   IUnknown;//提供组件功能查询；查的是接口；和 new ====>基类级别
  23.                    组件（library）/构件(coclass)/接口(interface)；组件实体；
  24.       1.6     COM组件实体的定义方法；
  25.                   1.1 GUID, 512位随机数据；GUIDGen.exe;
  26.                    [头:uuid,指定名字；
  27.                    helpstring，说明性信息；pointer_default定义借口指针的一种模式；
  28.                    version，版本；
  29.                    default， ]
  30.                    名字
  31.                    {
  33.                    }
  34.        1.7    通过IDL，编写add, sub;使用midl.exe编译成C；           
  35.        1.8    COM数据类型列表；
  36.                 HRESULT，32整数；代表执行的结果；0表示正确，非零表示错误；
  37.                 BSTR，       宽字符串；使用Unicode码；（一个字符，两个字节）
  38.                                     前两个字节，对应字符串中字符个数，后面依次为UNICDODE码；
  39.                                    "hello",    [h][e][l][l][o][]
  40.                                                     [0][5][0][h][0][e][0][l][0][l][0][o]
  41.                 VARIANT    智能型数据类型；（万能型）
  42.                     vt属性，表示当前变量所用作的类型；
  43.                     值，根据类型不同在不同属性中；
  46.        1.9 ATL库中的方法宏：
  47.                    1.9.1 方法声明宏：STDMETHOD;
  48.                    1.9.2 方法实现宏：STDMETHODIMP;
  49.        1.10 com 安装和卸载  regsvr32.exe *.dll; regsvr32.exe -u *.dll
  50. 2. COM接口定义技术；
  51.        2.1  Custom,自定义接口; 必须使用.idl文件;
  52.            2.1.1 IUnknown接口;
  53.               2.1.1.1 管理组件的生命周期;
  54.               2.1.1.2 管理组件的功能列表;
  55.            2.1.2 IUnknonw的实现(CComObjectRootEx);
  56.               2.1.2.1 和生命周期相关(add/release) 
  57.                       DECLARE_PROTECT_FINAL_CONSTRUCT;
  58.                       CComObjectRootEx<线程类型>
  59.               2.1.2.2 接口映射表;
  60.      将接口类型添加到接口映射表中,否则QueryInterface找不到;
  61.               2.1.2.3 COM资源使用原则“谁使用谁释放”；
  63. 3. 练习，使用WebBrowser组件熟悉COM的基本概念和特征。
  64.             3.1 IHTML****;
  65.             3.2 IWebBrowser;
  66.             3.3 IHTMLDocument; IHTMLDocument2,IHTMLDocument3,IHTMLDocument4
  67.             3.4 IHTMLElement;
  68.             3.5 IHTMLImgElement
  69. 4. COM结构;
  70.             4.1 COM层次结构: 组件中包含多个构件,构件实现多个接口;
  71.             4.2 接口映射表(同一个构件上的接口进行映射);
  72.             4.3 构件映射表(同一个组件上构件的映射);
  73.             4.4 ATL应用程序实体; CComModule _Module;
  74.             4.3 ATL在DllMain方法中,组装COM组件;
  75. 　　　       MFC WinMain    CWinApp theApp  多个窗口　消息映射　　　
  76. 　　　       ATL        DllMain    CComModule _Module　多个构件　接口映射　　　构件映射
  78. 　　　       MFC initialInstance
  79. 　　　       ATL           _Module.init;
  80.   DllCanUnloadNow,判断组件是否能够卸载；
  81. 　　　　　DllGetClassObject，被CoCreateInstance方法调用，生成构件；_Module.GetClassObject
  82. 　　　　　DllRegisterServer,将组件的ＩＤ和名称的关联信息写入注册表；
  83. 　　　　　DllUnregisterServer，将组件的ＩＤ和名称关联信息删除；
  84. 5.   COM数据类型列表；
  85.                 HRESULT，32整数；代表执行的结果；0表示正确，非零表示错误；
  86.                 BSTR，       宽字符串；使用Unicode码；（一个字符，两个字节）
  87.                                     前两个字节，对应字符串中字符个数，后面依次为UNICDODE码；
  88.                                    "hello",    [h][e][l][l][o][]
  89.                                                     [0][5][0][h][0][e][0][l][0][l][0][o]
  90.                 VARIANT    智能型数据类型；（万能型）
  91.                     vt属性，表示当前变量所用作的类型；
  92.                     值，根据类型不同在不同属性中；
  93. 　
  94. 6.  自动化接口;  不需要IDL文件;//有些麻烦
  95.               1. 自动化接口，主要支持vb,javascript, vbscript, actionscript;调用时不需要头文件；
  96.               2. 自动化接口是对自定义接口的扩展， 自动化接口也从IUnknown继承;
  97.               3. 自动化接口从IDispatch继承；
  98.               4.   不使用头文件调用IDispatch接口；
  99.                     HRESULT Invoke( 
  100. DISPID dispIdMember,   //调用方法的id;
  101. REFIID riid, LCID lcid,    //保留字，IID_NULL;
  102. WORD wFlags,               //Local_system_default;
  103. DISPPARAMS FAR *pDispParams,  //
  104. VARIANT FAR *pVarResult,             //
  105. EXCEPINFO FAR *pExcepInfo, 
  106. unsigned int FAR *puArgErr);
  107.               5. CLSIDFromProgID,根据组建名字查找组建CLSID;
  108.               6. GetIDsOfNames;
  109.               7. DISPPARAMS; 
  110. 7.  COM中的结构，数组，智能指针
  111.               7.1 BSTR int  VARIANT,基本数据类型
  112.               7.2 自定义接口/结构；
  113.               7.3 DTO（只有成员变量，没有方法）
  114.               7.4 CoTaskMemAlloc/CoTaskMemFree;  SysAlloString/SysFreeString;
  115.               7.5 从COM中获取结构或结构数组；
  116.               7.6 向COM中传递结构或结构数组；
  117.               7.7 COM中的属性；
  118.               7.8 接口智能指针；CComPtr/CComQIPtr;
  119.               7.9   BSTR智能指针；_bstr_t(<comdef.h>)/CComBSTR(<atlbase.h>);
  120.               7.10 VARIATN智能指针；_variant_t   /CComVariant  ;
  121.               7.11 智能指针：1）是个类；2）管理一个指针；3）自动释放（析构）方法中释放；
  122.               7.12  智能指针分类（工具类Utility Class）
  123.                     7.12.1 COM接口类 CComPtr/CComQIPtr;
  124.                     7.12.2 字符串指针  CComBSTR/_bstr_t;
  125.                     7.12.2 万能型变量  CComVariant/_variant_t;
  127. 8.  COM回调接口( COM组件的回调和事件)；
  128.        8.1 自定义回调接口；
  129.             8.1.1 回调的概念；
  130.             8.1.2 回调三要素：1，回调接口定义；2，私有成员变量；3，公共的设置方法；       
  131.        8.2 自定义COM回调接口（IUnknown)
  132.             8.2.1 IUnknonw类型的回调接口；
  133.             8.2.2 实现IUnknown接口；
  134.        8.3 自定义COM回调接口（IDispatch)
  135.             8.3.1 IDispatch类型的回调接口；
  136.             8.3.2 实现IDispatch接口；         
  137.        8.4 COM事件的定义和处理
  138.             8.4.1 事件（类型，声明，触发，处理）
  139.             8.4.2 事件类型：事件接口（一种特殊的回调接口），ATL框架提供支持
  140.             8.4.2.1 dispinterface/attribute/method；            
  141.             8.4.3 事件可以具备多个事件处理代码；
  145. 3.  COM组件的实现技术;
  146.        3.1 接口映射;
  147.        3.2 多接口实现;
  148. 4.  COM组件的回调和事件;//COM的主题
  149. 5.  COM组件的合成与集合;
  150. 6.  COM组件的客户端调用技术;
  160. ---02.22----------------------day09---------------------------------
  162. COM组件：
  164. 1.项目FirstDemo(组件类)，创建组件：
  165. 右键-->New ATL Object-->Simple Object-->(Interface)Custom-->右键-->add method------>
  166. ---hello
  167. ---([in] BSTR name,[out] BSTR* result); //in表输入，out表输出 
  168. //import:调用其他接口的文件
  169. //library:组件库
  170. //coclass:定义接口实现者
  171. //interface:定义接口
  172. //uuid:指定名字(微软为了防止名字重复，设定为512位的随机数)
  173. //helpstring说明性信息
  174. //pointer_default定义接口指针的模式
  175. //version版本
  176. -->再创建一个接口时要手工加入(如上操作的话，都会设定当前接口为默认接口，有些麻烦)
  177. -->新的接口的uuid可在目录VSCommonTools中的GUIDGEN.EXE中复制一个过来
  178. -->在实现文件的头文件中的类要继承该接口，在BEGIN_COM_MAP(CMyAbc)中添加接口映射，声明接口类函数(在函数前要加上STDMETHOD)，然后在实现文件中重写继承自接口类的函数(在函数前要加上STDMETHODIMP)
  179. -----------------其中FirstDemo.idl及Debug中的FirstDemo.dll==>COM的安装：regsvr32.exe *.dll(写入注册表)-->卸载：regsvr32.exe -u *.dll(删除注册表信息)
  182. 2.项目intertest01(组件类)中的myaddinter.idl-->
  183. (在命令提示窗口中)在文件目录下输入-- cl.exe -->midl.exe myaddinter.idl
  184. 生成5个文件：myaddinter.h、myaddinter_i.c有用，是必须的
  188. 3.项目clientDemo(窗体类)，导入两个由FirstDemo.idl编译后生成的文件：FirstDemo.h、FirstDemo_i.c--->在clientDemo中必须引入以上两个文件做头文件，即可直接使用(不用重写，直接引用组件提供的功能，但是要声明引用)
  189. clientDemo03用IUnknonw的QueryInterface来定位要找的接口实现的入口名字。
  190. ::CoInitialize(NULL);//COM的初始化函数
  191. ::CoUninitialize();//释放内存
  194. 4.项目IUnknownDemo包含组件和测试类，组件编译后，测试类通过头文件引用IUnknownDemo.h和IUnknownDemo_i.c；
  195. ::SysAllocString
  196. str.AllocSysString()
  199. ---02.23----------------------day10---------------------------------
  201. 1.项目demoIe使用WebBrowser组件熟悉COM的基本概念和特征：
  202. 先建一个MFC项目，然后在窗体中添加WEB控件-->右键->向导->Member Variables中绑定IDC_EXPLORER1为CWebBrowser2（有提示的），然后项目中自动生成 CWebBrowser2类；
  203. 在Button1中this->m_mybrowser.Navigate("C:\danei.htm",NULL,NULL,NULL,NULL);表按照指定路径打开网页
  204. 在Button2中，定义IHTMLDocument2(要加头文件mshtml.h)-->表与文本相关,
  205. --pDisp=this->m_mybrowser.GetDocument();//获取文本信息
  206. --pDisp->QueryInterface(IID_IHTMLDocument2,(void **)&pDoc);//查询匹配接口
  207. --IHTMLElementCollection* allImage=NULL;//采集信息放置的地方
  208. --pDoc->get_images(&allImage);//获取图片
  209. --allImage->get_length(&iCount);//获取图片数量
  210. 之后的循环用于循环输出图片路径
  213. 2.项目demoiechangeimage与项目demoIe相比，只修改循环为改变所有图片
  214. 其中用到CString strhtml="c:\source.bmp"、strhtml.AllocSysString()；
  215. --AllocSysString()的作用是把CString型转化成BSTR型
  218. 3.项目demoiechangeLink与项目demoIe相比，添加了一个test.html超链接，且只修改循环为禁用所有超链接:
  219. --CString strhtml="#";//这个属性的链接是被封掉的即无法打开
  220. --CString attName="href";
  221. --VARIANT var;
  222. --var.vt=VT_BSTR;
  223. --var.bstrVal=strhtml.AllocSysString();//字符串转BSTR类型，组件类的有些函数参数是BSTR类型
  224. --mylink->setAttribute(attName.AllocSysString(),var,0);
  225. setAttribute为设置属性
  227. 4.项目TestCom1通过手工添加代码来熟悉COM的过程:
  228.   4.1 TestCom1_01：右键-->new class-->Generic Class(一般类)-->在.idl文件中添加相应接口
  230.   4.2 TestCom1_02：给接口添加函数；
  232.   4.3 TestCom1_03：在类头文件中构造组件接口映射表且要组件继承：
  233. DECLARE_PROTECT_FINAL_CONSTRUCT();
  234. BEGIN_COM_MAP(CMyTools)
  235. COM_INTERFACE_ENTRY(IMyAdd)
  236. END_COM_MAP()
  237.     STDMETHOD(add)(int a, int b, int* c);
  239. class ATL_NO_VTABLE CMyTools  : 
  240.       public CComObjectRootEx<CComSingleThreadModel>,
  241.       public CComCoClass<CMyTools,&CLSID_MyTools>,
  242.       public IMyAdd
  243. 在类的实现文件中导入组件接口实现函数：
  244. STDMETHODIMP CMyTools::add(int a, int b, int* c)
  245. {
  246. *c=a+b;
  247. return S_OK;
  248. }
  251.   4.4 TestCom1_04：在文件夹中添加registry.bin文件，并在资源文件resource.h中加入
  252. #define IDR_REGISTRY1   205(随意与其他宏不冲突的数字)-->
  253. 在MyToohs.h中添加#include "resource.h"-->编译后在resources项目分类组中有REGISTRY文件夹自动生成
  254. -->如果宏不出问题的话在Resource files中可看到registry.bin自动导入
  255. -->然后在registry.bin中输入文本：
  256. HKCR
  257. {
  258. FirstDemo.MyAbc.1 = s 'MyAbc Class'
  259. {
  260. CLSID = s '{AAC11C54-F25F-40fe-A4AC-F2829CE37FD7}'//接口ID
  261. }
  262. FirstDemo.MyAbc = s 'MyAbc Class'
  263. {
  264. CLSID = s '{AAC11C54-F25F-40fe-A4AC-F2829CE37FD7}'//接口ID
  265. CurVer = s 'FirstDemo.MyAbc.1'
  266. }
  267. NoRemove CLSID
  268. {
  269. ForceRemove {AAC11C54-F25F-40fe-A4AC-F2829CE37FD7} = s 'MyAbc Class'
  270. {
  271. ProgID = s 'FirstDemo.MyAbc.1'
  272. VersionIndependentProgID = s 'FirstDemo.MyAbc'
  273. InprocServer32 = s '%MODULE%'
  274. {
  275. val ThreadingModel = s 'Apartment'
  276. }
  277. 'TypeLib' = s '{E565170F-79D7-4EFB-9402-4D877139D459}'//组件ID
  278. }
  279. }
  280. }
  282. 这些内容将完全导入registry.rgs中(自动生成的组件接口文件都有.rgs文件，但是看不到.bin文件.....)
  286. ---02.26----------------------day11---------------------------------
  288. 1.项目autoDemo实现自动化接口(与)：
  289.   1.1项目autoDemo01：右键-->New ATL Object-->Simple Object-->(Interface)Dual-->(name:)MyAbc
  290. //(Interface)Dual为自动化接口实现的关键
  291. 然后新建一个test项目添加一个按钮用于测试：
  292. //添加相关头文件
  293. #include "../autoDemo.h"
  294. #include "../autoDemo_i.c"
  295. void CTestDlg::OnButton1() 
  296. {
  297. // TODO: Add your control notification handler code here
  298. ::CoInitialize(NULL);
  299.    IDispatch* pDisp=NULL;
  300.    IMyAbc* pTools=NULL;
  301.    ::CoCreateInstance(CLSID_MyAbc,NULL,CLSCTX_INPROC_SERVER,IID_IDispatch,(void **)&pDisp);
  302.    pDisp->QueryInterface(IID_IMyAbc,(void **)&pTools);
  303.    int iResult=0;
  304.    pDisp->Release();
  305.    pTools->add(12,13,&iResult);
  306.     CString str1;
  307. str1.Format("%d",iResult);
  308. MessageBox(str1);
  309.    pTools->Release();
  310. ::CoUninitialize();
  311. }
  313.   1.2项目autoDemo02：再新建一个AutoTest项目添加一个按钮用于测试:
  314. //不需要引入头文件(与上面按钮代码不在同一个文件内)
  315. void CAutoTestDlg::OnButton1() 
  316. {
  317. // TODO: Add your control notification handler code here
  318. ::CoInitialize(NULL);
  319. CString str="AutoDemo.MyAbc";
  320. CLSID mycomid;//CLSID为_i.c文件中的实现宏
  321. ::CLSIDFromProgID(L"AutoDemo.MyAbc",&mycomid);//名字匹配，到注册表去找
  322. IDispatch* pDisp=NULL;
  323. ::CoCreateInstance(mycomid,NULL,CLSCTX_INPROC_SERVER,IID_IDispatch,(void **)&pDisp);
  324. DISPID addid;
  325. BSTR   funnames[1];
  326. funnames[0]=::SysAllocString(L"add");//函数的名字
  327. pDisp->GetIDsOfNames(IID_NULL,funnames,1,LOCALE_SYSTEM_DEFAULT,&addid);
  329. ::CoUninitialize();
  330. }
  332.   1.3项目autoDemo03为项目autoDemo02的完善，--->比引入头文件麻烦
  335. 2.项目StructDemo是对一个结构体操作(之前的都是对单独的数据，意义不大)：
  336.   2.1项目StructDemo01先建一个自动接口类(老师在建是选了support MFC)：MyStruct,在该.idl文件中添加一个结构体---//因为接口的函数想参数需要
  337. typedef struct StPerson
  338. {
  339.      BSTR name;
  340.  UINT age;
  341.  BSTR sex;
  342. }StPerson;
  343. --然后右键-->add method-->GetPersonById--([in] UINT id,[out] StPerson** Result)--
  344. -->并在接口实现文件中添加一个函数------
  345. //这样赋值- -!
  346. STDMETHODIMP CMyStruct::GetPersonById(UINT id,StPerson** Result)
  347. {
  348. StPerson* p=(StPerson*)::CoTaskMemAlloc(sizeof(StPerson));//申请空间
  349. p->age=23;
  350. p->name=::SysAllocString(L"zhangsan");//name为BSTR类型
  351. p->sex=::SysAllocString(L"male");
  352. *Result=p;
  353. return S_OK;
  354. }
  355. --->然后新建一个MFC项目test用于读取数据：
  356. #include "../StructDemo.h"
  357. #include "../StructDemo_i.c"
  359. void CTestDlg::OnButton1() 
  360. {
  361. // TODO: Add your control notification handler code here
  362. ::CoInitialize(NULL);
  363. IMyStruct* pTools=NULL;//接口指针
  364. ::CoCreateInstance(CLSID_MyStruct,NULL,CLSCTX_INPROC_SERVER,IID_IMyStruct,(void **)&pTools);
  365. StPerson* pPer=NULL;//结构体指针
  366. pTools->GetPersonById(1,&pPer);
  367. CString strName(pPer->name);
  368. ::SysFreeString(pPer->name);
  369. UINT uage(pPer->age);
  370. CString strSex(pPer->sex);
  371. ::SysFreeString(pPer->sex);
  372. ::CoTaskMemFree(pPer);//释放结构体指针
  373. CString str1;
  374. str1.Format("%s: %d %s",strName,uage,strSex);
  375. MessageBox(str1);
  376. ::CoUninitialize();
  377. }
  378.   
  379.   2.2项目StructDemo02再在接口文件中添加一个功能函数：
  380. STDMETHODIMP CMyStruct::GetAllPerson(UINT* number,StPerson** Result)
  381. {
  382. StPerson* p=(StPerson*)::CoTaskMemAlloc(2*sizeof(StPerson));//申请2个空间
  383. ZeroMemory(p,2*sizeof(StPerson));//初始化数组（连续的）空间
  384. p->age=23;
  385. p->name=::SysAllocString(L"芙蓉");
  386. p->sex=::SysAllocString(L"女");
  387. (p+1)->age=23;
  388. (p+1)->name=::SysAllocString(L"李松涛");
  389. (p+1)->sex=::SysAllocString(L"男");
  390.     *Result=p;
  391. *number=2;
  392. return S_OK;
  393. }
  395. --->在项目test中添加一个按钮实现输出功能：
  396. //输出多个结构体数据
  397. void CTestDlg::OnButton2() 
  398. {
  399. // TODO: Add your control notification handler code here
  400. ::CoInitialize(NULL);
  401. IMyStruct* pTools=NULL;
  402. ::CoCreateInstance(CLSID_MyStruct,NULL,CLSCTX_INPROC_SERVER,IID_IMyStruct,(void **)&pTools);
  403. StPerson* pPer=NULL;
  404. UINT iSize=0;
  405. pTools->GetAllPerson(&iSize,&pPer);
  406. for(int i=0;i<iSize;i++)
  407. {
  408. CString strName((pPer+i)->name);
  409. ::SysFreeString((pPer+i)->name);
  410. UINT uage((pPer+i)->age);
  411. CString strSex((pPer+i)->sex);
  412. ::SysFreeString((pPer+i)->sex);
  413. CString str1;
  414. str1.Format("%s: %d %s",strName,uage,strSex);
  415. MessageBox(str1);
  416. }
  417. ::CoTaskMemFree(pPer);
  418. ::CoUninitialize();
  420. }
  422.   2.3项目StructDemo03再在接口文件中添加一个功能函数：
  423. STDMETHODIMP CMyStruct::SavePerson(UINT number,StPerson* Result, UINT* pResult)
  424. {
  425. int iResult=0;
  426. for(int i=0;i<number;i++)
  427. {
  428. iResult+=(Result+i)->age;
  429. }
  430. *pResult=iResult;
  431. return S_OK;
  432. }
  433. --->在项目test中添加一个按钮实现输出功能：(用处不大)
  434. void CTestDlg::OnButton3() 
  435. {
  436. // TODO: Add your control notification handler code here
  437. ::CoInitialize(NULL);
  438. IMyStruct* pTools=NULL;//用来引入接口的函数
  439. ::CoCreateInstance(CLSID_MyStruct,NULL,CLSCTX_INPROC_SERVER,IID_IMyStruct,(void **)&pTools);
  440.     StPerson* Ref=new StPerson[2];
  441. Ref[0].age=12;
  442. Ref[1].age=13;
  443. UINT iResult=0;
  444. pTools->SavePerson(2,Ref,&iResult);
  445. CString str1;
  446. str1.Format("%d",iResult);
  447. MessageBox(str1);
  450.   2.4项目StructDemo04给接口文件添加属性(函数)：右键(接口)-->Add property
  451. -->属性类型：BSTR ---属性名：UID ---参数：(留空)-->先声明个私有成员BSTR m_uid;-->然后在实现文件中添加：
  452. TDMETHODIMP CMyStruct::get_UID(BSTR *pVal)
  453. {
  454. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  455. *pVal=::SysAllocString(this->m_uid);
  456. return S_OK;
  457. }
  459. STDMETHODIMP CMyStruct::put_UID(BSTR newVal)
  460. {
  461. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  462. this->m_uid=::SysAllocString(newVal);
  463. ::SysFreeString(newVal);
  464. return S_OK;
  465. }
  467. --->在项目test中添加一个按钮实现输出功能：
  468. void CTestDlg::OnButton5() 
  469. {
  470. // TODO: Add your control notification handler code here
  471. ::CoInitialize(NULL);
  472. IMyStruct* pTools=NULL;
  473. ::CoCreateInstance(CLSID_MyStruct,NULL,CLSCTX_INPROC_SERVER,IID_IMyStruct,(void **)&pTools);
  474. CString str("zhangsan");
  475. pTools->put_UID(str.AllocSysString());
  476. BSTR bt;
  477. pTools->get_UID(&bt);
  478. CString strName(bt);//__
  479. ::SysFreeString(bt);
  480. MessageBox(strName);//__
  481. }
  483. 3.项目SmartPtrDemo01为智能指针的用法：
  484. 先建一个自动接口类(老师在建是选了support MFC)：MyAbc;再在接口文件中添加一个功能函数：
  485. STDMETHODIMP CMyAbc::Hello(BSTR name, BSTR *bstrResult)
  486. {
  487. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  489. // TODO: Add your implementation code here
  490. CString strTemp(name);
  491. ::SysFreeString(name);
  492. strTemp="Hello: "+strTemp;
  493. *bstrResult=strTemp.AllocSysString();
  494. return S_OK;
  495. }
  496. --->在项目test中添加两个按钮实现输出功能：
  497. --按钮一为一般做法：
  498. #include "../SmartPtrDemo.h"
  499. #include "../SmartPtrDemo_i.c"
  501. void CTestDlg::OnButton1() 
  502. {
  503. // TODO: Add your control notification handler code here
  504. ::CoInitialize(NULL);
  505. IMyAbc* pTools=NULL;
  506. ::CoCreateInstance(CLSID_MyAbc,NULL,CLSCTX_INPROC_SERVER,IID_IMyAbc,(void **)&pTools);
  507. BSTR bResult;
  508. CString str("zhangsan");
  509. pTools->Hello(str.AllocSysString(),&bResult);
  510. CString strTemp(bResult);
  511. MessageBox(strTemp);
  512.     pTools->Release();
  513. ::CoUninitialize();
  514. }
  516. --按钮二为引入智能指针做法：
  517. #include <atlbase.h>//智能指针类的头文件
  518. void CTestDlg::OnButton2() 
  519. {
  520. // TODO: Add your control notification handler code here
  521. ::CoInitialize(NULL);
  522. CComPtr<IMyAbc> mytools;//智能指针
  523. mytools.CoCreateInstance(CLSID_MyAbc);//. 表示用父类的函数
  524. BSTR bResult;
  525. CString str("zhangsan");
  526. mytools->Hello(str.AllocSysString(),&bResult);
  527. CString strTemp(bResult);
  528. MessageBox(strTemp);
  529. // ::CoUninitialize(); //与智能指针的析构函数冲突，即智能指针已经调用析构函数释放了指针，再释放就出问题了
  530. }
  532. ---02.27----------------------day12---------------------------------
  534. 1.项目 DemoBstr为熟悉智能指针：(项目本身的意义不大)
  535.   1.1项目DemoBstr01 右键-->New ATL Object-->Simple Object-->(Interface)Dual-->(name:)MyBstr-->
  536. 添加两个私有成员变量BSTR m_uid;BSTR m_pwd;并初始化-->然后右键-->add method-->Authen--[in] BSTR name, [in] BSTR pwd, [out] BSTR* Result)---->并在接口实现文件中添加一个函数------
  537. STDMETHODIMP CMyBstr::Authen(BSTR name, BSTR pwd, BSTR *Result)
  538. {
  539. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  541. // TODO: Add your implementation code here
  542. if(this->m_pwd!=NULL)
  543. {
  544. ::SysFreeString(this->m_pwd);
  545. this->m_pwd=NULL;
  546. }
  547. this->m_pwd=::SysAllocString(pwd);
  548. ::SysFreeString(pwd);
  549. if(this->m_uid!=NULL)
  550. {
  551. ::SysFreeString(this->m_uid);
  552. this->m_uid=NULL;
  553. }
  554. this->m_uid=::SysAllocString(name);
  555. ::SysFreeString(name);
  556. *Result=::SysAllocString(L"OK");
  557. return S_OK;
  558. }
  559. --->然后新建一个MFC项目test并添加一个按钮功能用于读取数据：
  560. //引入头文件
  561. #include "../DemoBstr.h"
  562. #include "../DemoBstr_i.c"
  563. #include <comdef.h>//_bstr_t类型智能指针相关
  564. #include <atlbase.h>//智能指针相关
  565. void CTestDlg::OnButton1() 
  566. {
  567. // TODO: Add your control notification handler code here
  568. ::CoInitialize(NULL);
  569. _bstr_t name("zhangsan");
  570. _bstr_t pwd("abc");
  571. BSTR result;
  572. CComPtr<IMyBstr> mytools;
  573. mytools.CoCreateInstance(CLSID_MyBstr);
  574. mytools->Authen(name,pwd,&result);//自定义接口实现函数
  575. ::SysFreeString(result);
  576. }
  577.   
  578.   1.2项目DemoBstr02：在项目test上添加第二个按钮功能用于读取数据：
  579. (只比DemoBstr01多了两句：CString strTemp=(CString)result;MessageBox(strTemp);)
  580. void CTestDlg::OnButton2() 
  581. {
  582. // TODO: Add your control notification handler code here
  583. ::CoInitialize(NULL);
  584. CComBSTR name("zhangsan");
  585. CComBSTR pwd("list");
  586. CComBSTR result;
  587. CComPtr<IMyBstr> mytools;//智能指针
  588. mytools.CoCreateInstance(CLSID_MyBstr);
  589. mytools->Authen(name,pwd,&result);//自定义接口实现函数
  590. //result为从接口实现函数Authen()返回的结果
  591. CString strTemp=(CString)result;//CString strTemp(bResult);
  592. MessageBox(strTemp);
  593. }
  595. 2.项目DemoVariant为熟悉Variant智能指针(CComVariant)(Button3)功能：
  596.   2.1项目DemoVariant01在接口实现文件中添加一个函数------
  597. STDMETHODIMP CMyVariant::add(VARIANT a, VARIANT b, VARIANT *c)
  598. {
  599. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  601. // TODO: Add your implementation code here
  602. c->vt=VT_I4;
  603. c->lVal=a.lVal+b.lVal;
  604. return S_OK;
  605. }
  606. 在项目test上添加三个按钮功能：
  607. #include "../DemoVariant.h"
  608. #include "../DemoVariant_i.c"
  609. #include <atlbase.h>
  610. #include <comdef.h>
  612. void CTestDlg::OnButton1() 
  613. {
  614. // TODO: Add your control notification handler code here
  615. CoInitialize(NULL);
  616. CComPtr<IMyVariant> mytools;
  617. mytools.CoCreateInstance(CLSID_MyVariant);//生成构件
  618. VARIANT A,B;
  619. A.vt=VT_I4;
  620. A.lVal=12;
  621. B.vt=VT_I4;
  622. B.lVal=13;
  623. VARIANT c;
  624. mytools->add(A,B,&c);
  625. CString str;
  626. str.Format("没有强制类型转换：%d",c.lVal);
  627. MessageBox(str);
  628. }
  630. void CTestDlg::OnButton2() 
  631. {
  632. // TODO: Add your control notification handler code here
  633. CoInitialize(NULL);
  634. CComPtr<IMyVariant> mytools;
  635. mytools.CoCreateInstance(CLSID_MyVariant);
  636. long a=12;
  637. long b=13;
  638. _variant_t vt(a);
  639. _variant_t vt1(b);
  640. _variant_t result;
  641. mytools->add(vt,vt1,&result);
  642. long c1=(long)result;//强制类型转换使智能指针具体化
  643. CString str;
  644. str.Format("强制类型转换后：%d",c1);
  645. MessageBox(str);
  646. }
  648. void CTestDlg::OnButton3() 
  649. {
  650. // TODO: Add your control notification handler code here
  651. CoInitialize(NULL);
  652. CComPtr<IMyVariant> mytools;
  653. mytools.CoCreateInstance(CLSID_MyVariant);
  654. long a=12;
  655. long b=13;
  656. CComVariant vt(a);//CComVariant的方法比_variant_t的多
  657. CComVariant vt1(b);
  658. CComVariant result;
  659. mytools->add(vt,vt1,&result);
  660. CString str; 
  661. str.Format("用CComVariant来定义后：%d",result.lVal);
  662. MessageBox(str);
  663. }
  665. 3.项目ComCallBack回调接口的实现：
  666.   3.1项目ComCallBack01：右键-->New ATL Object-->Simple Object-->(Interface)Dual-->(name:)MyAbc
  667. -->然后再添加一个新的接口ILogs，并在ILogs中添加接口方法[helpstring("string")] HRESULT WriteLog([in] BSTR message);-->(老师手工)在MyAbc类中添加一个ILogs* pTools;并初始化//声明回调接口变量；
  668. 及两个接口函数：------
  669. //设置属性
  670. STDMETHODIMP CMyAbc::SetLog(ILogs* ptools)
  671. {
  672. this->pTools=ptools;
  673. return S_OK;
  674. }
  675. STDMETHODIMP CMyAbc::add(int a, int b,int* c)
  676. {
  677. *c=a+b;
  678. CComBSTR bstr("this result is:");
  679. char strTemp[500];
  680. sprintf(strTemp,"%d",c);
  681. bstr.Append(strTemp);
  682. if(this->pTools!=NULL)//回调要点，条件返回
  683. {
  684. this->pTools->WriteLog(bstr);//另一个接口的实现函数
  685. }
  686. else
  687. *c=0;
  688. return S_OK;
  689. }
  691.   3.2项目ComCallBack02在项目1的基础上添加项目test，并在test 中添加一个继承接口ILogs的普通类MyLog(与接口ILogs关联)，在其头文件中声明STDMETHOD(WriteLog)(BSTR message);//STDMETHOD是虚函数的宏
  692. ------（#define STDMETHOD(method)       virtual HRESULT STDMETHODCALLTYPE method）-------
  693. 然后在实现文件中重载该虚函数：(其功能为把信息保存到指定(日志)文件中)
  694. STDMETHODIMP MyLog::WriteLog(BSTR message)
  695. {
  696. CFile f;
  697. CFileException ex;
  698. f.Open("./log.txt",CFile::modeCreate| CFile::modeReadWrite,&ex);
  699. CString str(message);
  700. f.Write(str.GetBuffer(100),str.GetLength());
  701. ::SysFreeString(message);
  702. f.Close();
  703.     return S_OK;
  704. }
  706. -->然后添加一个按钮调用接口：
  707. #include "../ComCallBack.h"
  708. #include "../ComCallBack_i.c"
  709. #include <atlbase.h>
  710. #include "MyLog.h"
  711. void CTestDlg::OnButton1() 
  712. {
  713. // TODO: Add your control notification handler code here
  714. //装配调用代码；
  715. ::CoInitialize(NULL);
  716. CComPtr<IMyAbc> mytools;
  717. mytools.CoCreateInstance(CLSID_MyAbc);
  718. ILogs* pLog=new MyLog();
  719. mytools->SetLog(pLog);//接口注入语句；没有这个句子就无法满足回调的条件
  720. int iResult=0;        //IoC 
  721. mytools->add(12,13,&iResult);
  722. if(iResult)
  723.   MessageBox("信息保存成功！");
  724. else
  725.   MessageBox("没有信息要保存！");
  726. }
  729. 4.项目DemoIUnknown接口改为继承IUnknown(继承IUnknown更符合COM规范):
  730.   4.1项目DemoIUnknown01：右键-->New ATL Object-->Simple Object-->(Interface)Dual-->(name:)MyAbc
  731. -->然后再添加一个新的继承自IUnknown的接口ILog，然后分别添加函数writeLog()、SetLog()、add()---
  732. [
  733. object,
  734. uuid(BA4816E3-7295-4189-B7B5-274676745821),
  735. helpstring("IMyAbc Interface"),
  736. pointer_default(unique)
  737. ]
  738. interface ILog : IUnknown//继承IUnknown更符合COM规范
  739. {
  740. [helpstring("asdfdasf")] HRESULT writeLog([in] BSTR message);//////////
  741. };
  744. [
  745. object,
  746. uuid(BA4816E3-7295-4189-B7B5-274676745820),
  747. dual,
  748. helpstring("IMyAbc Interface"),
  749. pointer_default(unique)
  750. ]
  751. interface IMyAbc : IDispatch
  752. {     
  753. [id(1), helpstring("method SetLog")] HRESULT SetLog([in] IUnknown* pTools);////
  754. [id(2), helpstring("method add")] HRESULT add([in] int a, [in] int b, [out] int* c);////
  755. };
  758.   4.2项目DemoIUnknown02再新建一个test类并新建一个继承ILog的普通类MyLog，并在其头文件中
  759. STDMETHOD(writeLog)( BSTR message);//接口自定义的虚函数
  760. //重载3个IUnknown的虚函数,原型为
  761. //        virtual HRESULT STDMETHODCALLTYPE QueryInterface( 
  762.         //       /* [in] */ REFIID riid,
  763.         //        /* [iid_is][out] */ void __RPC_FAR *__RPC_FAR *ppvObject) = 0;    
  764.         //    virtual ULONG STDMETHODCALLTYPE AddRef( void) = 0;    
  765.         //    virtual ULONG STDMETHODCALLTYPE Release( void) = 0;
  766. //相关的宏
  767. //#define STDMETHOD(method)       virtual HRESULT STDMETHODCALLTYPE method
  768. //#define STDMETHOD_(type,method) virtual type STDMETHODCALLTYPE method
  769.     STDMETHOD(QueryInterface)(REFIID riid, void __RPC_FAR *__RPC_FAR *ppvObject);
  770.     STDMETHOD_(ULONG,AddRef)(void);    
  771.     STDMETHOD_(ULONG,Release)(void);  
  772. private:
  773. ULONG ilisongtao;//与AddRef、Release函数相关，要初始化
  775. --->然后在实现文件中重载：
  776. STDMETHODIMP MyLog::writeLog( BSTR message)
  777. {
  778. //
  779. return S_OK;
  780. }
  781. STDMETHODIMP MyLog::QueryInterface(REFIID riid, void __RPC_FAR *__RPC_FAR *ppvObject)
  782. {
  783. if(riid==IID_ILog)
  784. {
  785. *ppvObject=(ILog*)this;
  786. this->AddRef();
  787. return S_OK;
  788. }
  789. else if(riid==IID_IUnknown)
  790. {
  791. *ppvObject=(IUnknown*)this;
  792. this->AddRef();
  793. return S_OK;
  794. }
  795. else
  796. {
  797. *ppvObject=NULL;
  798. return S_FALSE;
  799. }
  800. }
  802. STDMETHODIMP_(ULONG) MyLog::AddRef()
  803. {
  804. return this->ilisongtao++;
  805. }    
  806. STDMETHODIMP_(ULONG) MyLog::Release()
  807. {
  808. this->ilisongtao--;
  809. if(this->ilisongtao==0)
  810. {
  811. delete this;
  812. }
  813. return this->ilisongtao;
  814. }  
  816.   4.3
  822. 5.项目demoActivex建一个窗体COM组件：右键-->New ATL Object-->(controls)Composite Control-->(name:)MyPwd-----------然后可看见一个可编译的窗体文本--->添加控件(对一个按钮操作)
  823. -->双击按钮，弹出一个事件触发框，把按钮与点击事件绑定，然后双击该点击事件函数就会进入实现函数：
  824. LRESULT OnClickedButton1(WORD wNotifyCode, WORD wID, HWND hWndCtl, BOOL& bHandled)
  825. {
  826. // TODO : Add Code for control notification handler.
  827. AfxMessageBox("Hello");
  828. return 0;
  829. }
  830. };
  831. 在文件夹中可看见MyPwd.htm文件，点击后可看见该控件的样式==>COM可被浏览器调用、还有java、.Net....
  832. 编译后就写进了注册表变成一个MyPwd Class控件---------
  833. 6.项目testPwd建一个单文档Dlg-->右键(窗体)--->Insert ActiveX Control--->找到MyPwd Class
  834. --->添加后窗体中的该控件就是项目demoActivex导入的控件
  836. ---02.28----------------------day13---------------------------------
  838. 1.(通用性强)项目DispCallBack通过IDisPatch接口实现回调接口：
  839.   1.1项目DispCallBack01不用IUnknow来做回调接口：-->New ATL Object-->Simple Object-->(Interface)Dual-->(name:)MyAbc-->(右键)添加两个方法SetLog([in] ILog* mylog);add([in] int a, [in] int b, [out] int* c );--->然后在.idl文件中接口IMyAbc的上面定义ILog接口(类似于C语言，顺序反的话话报错的)并添加WriteLog函数：
  840. [
  841. object,
  842. uuid(8BF1F3AA-6C46-4042-86EF-781E17040E08),
  843. dual,
  844. helpstring("ILog Interface"),
  845. pointer_default(unique)
  846. ]
  847. interface ILog : IDispatch
  848. {
  849. [id(1), helpstring("method WriteLog")] HRESULT WriteLog([in] BSTR message);
  850. };
  854. [
  855. object,
  856. uuid(8BF1F3AA-6C46-4042-86ED-781E17040E09),
  857. dual,
  858. helpstring("IMyAbc Interface"),
  859. pointer_default(unique)
  860. ]
  861. interface IMyAbc : IDispatch
  862. {     
  863. [id(1), helpstring("method SetLog")] HRESULT SetLog([in] ILog* mylog);
  864. [id(2), helpstring("method add")] HRESULT add([in] int a, [in] int b, [out] int* c );
  865. };
  866. 然后在MyAbc.h中声明一个私有成员变量IDispatch* pMytools;(昨天的例子中是声明成IUnknown*)并在构造函数中初始化；
  868.   1.2项目DispCallBack02与01相比：把接口ILog(接口保留)屏蔽掉，并把引用ILog类型改成IDispatch类型，如：SetLog([in] ILog* mylog);==>SetLog([in] IDispatch* mylog);
  869. STDMETHOD(SetLog)(/*[in]*/ ILog* mylog);==>STDMETHOD(SetLog)(/*[in]*/ IDispatch* mylog);
  870. STDMETHODIMP CMyAbc::SetLog(ILog *mylog)==>STDMETHODIMP CMyAbc::SetLog(IDispatch *mylog)
  871. 这样子在接口组件中就不在出现接口ILog的影子了(WriteLog函数是与接口分离的),这样的代码是非常通用的，即把回调接口虚拟化了，并完成具体功能：
  872. STDMETHODIMP CMyAbc::SetLog(IDispatch *mylog)
  873. {
  874. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  876. // TODO: Add your implementation code here
  877. this->pMytools=mylog;
  878. return S_OK;
  879. }
  881. STDMETHODIMP CMyAbc::add(int a, int b, int *c)
  882. {
  883. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  885. // TODO: Add your implementation code here
  886. *c=a+b;
  887. if(this->pMytools!=NULL)
  888. {
  889. long id=1;
  890. //回调方法id;
  891. DISPID methodid=(DISPID)id;
  892. //回调方法参数;
  893. VARIANT paras[1];
  894. paras[0].vt=VT_BSTR;
  895. char buffer[20];
  896. sprintf(buffer,"%d",*c);
  897. CString str(buffer);
  898. paras[0].bstrVal=str.AllocSysString();
  899. DISPPARAMS disp;
  900. disp.cArgs=1;
  901. disp.rgvarg=paras;
  902. disp.cNamedArgs=0;
  903. disp.rgdispidNamedArgs=NULL;
  904. //输出参数；
  905. VARIANT vout;
  906. EXCEPINFO  ex;
  907. UINT   result=0;
  908. this->pMytools->Invoke(methodid,IID_NULL,LOCALE_SYSTEM_DEFAULT,DISPATCH_METHOD,
  909. &disp,&vout,&ex,&result);
  910. }
  911. return S_OK;
  912. }
  914.   1.3项目DispCallBack03在02的基础上添加一个test项目并添加一个继承ILog接口的类MyLog，声明并重写WriteLog(BSTR message)函数及IDispatch的虚函数：
  915.     STDMETHOD(WriteLog)(BSTR message);
  916.     STDMETHOD(GetTypeInfoCount)(UINT __RPC_FAR *pctinfo);     
  917.     STDMETHOD(GetTypeInfo)( 
  918. UINT iTInfo,
  919. LCID lcid,
  920. ITypeInfo __RPC_FAR *__RPC_FAR *ppTInfo);    
  921.     STDMETHOD(GetIDsOfNames)( 
  922. REFIID riid,
  923. LPOLESTR __RPC_FAR *rgszNames,
  924. UINT cNames,
  925. LCID lcid,
  926. DISPID __RPC_FAR *rgDispId);        
  927.     STDMETHOD(Invoke)( 
  928. DISPID dispIdMember,
  929. REFIID riid,
  930. LCID lcid,
  931. WORD wFlags,
  932. DISPPARAMS __RPC_FAR *pDispParams,
  933. VARIANT __RPC_FAR *pVarResult,
  934. EXCEPINFO __RPC_FAR *pExcepInfo,
  935. UINT __RPC_FAR *puArgErr);
  936. STDMETHOD(QueryInterface)( 
  937. REFIID riid,
  938. void __RPC_FAR *__RPC_FAR *ppvObject);        
  939.     STDMETHOD_(ULONG,AddRef)( void);
  940. STDMETHOD_(ULONG,Release)( void);
  941. =====================================================
  942. STDMETHODIMP MyLog::Invoke( 
  943.   DISPID dispIdMember,
  944.   REFIID riid,
  945.   LCID lcid,
  946.   WORD wFlags,
  947.   DISPPARAMS __RPC_FAR *pDispParams,
  948.   VARIANT __RPC_FAR *pVarResult,
  949.   EXCEPINFO __RPC_FAR *pExcepInfo,
  950.   UINT __RPC_FAR *puArgErr)
  951. {
  952. if(dispIdMember==1)
  953. {
  954. BSTR bBuffer=::SysAllocString(pDispParams->rgvarg[0].bstrVal);
  955. SysFreeString(pDispParams->rgvarg[0].bstrVal);
  956. return this->WriteLog(bBuffer);
  957. }
  958. else
  959. {
  960. *puArgErr=1;
  961. return S_FALSE;
  962. }
  963. }        
  966.  1.4项目DispCallBack04完善WriteLog(BSTR message)方法，并添加一个按钮
  967. STDMETHODIMP MyLog::WriteLog(BSTR message)
  968. {
  969. CString msg(message);
  970. ::SysFreeString(message);
  971. AfxMessageBox(msg);
  972. return S_OK;
  973. }  
  975. #include "../DispCallBack.h"
  976. #include "../DispCallBack_i.c"
  977. #include <atlbase.h>
  978. #include "mylog.h"
  979. void CTestDlg::OnButton1() 
  980. {
  981. // TODO: Add your control notification handler code here
  982. CoInitialize(NULL);
  983.     ILog* pLog=NULL;
  984. CComPtr<IMyAbc> pTools;
  985. pTools.CoCreateInstance(CLSID_MyAbc);
  986. pLog=new MyLog();
  987. pTools->SetLog(pLog);
  988. int iResult;
  989. pTools->add(12,13,&iResult);
  990. }
  991.      
  992. 2.项目EventDemoCOM 事件的定义和处理：
  993.   2.1项目EventDemo01-->New ATL Object-->Simple Object-->(Interface)Dual-->(name:)MyAbc-->在接口中添加一个函数add([in] int a, [in] int b, [out] int* c );并实现：
  994. STDMETHODIMP CMyAbc::add(int a, int b, int *c)
  995. {
  996. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  998. // TODO: Add your implementation code here
  999. *c=a+b;
  1000. CString str;
  1001. str.Format("%d",*c);
  1002. this->Fire_OnLog(str.AllocSysString());
  1003. return S_OK;
  1004. }
  1005. ------->(手工代码建控件)在.idl文件的library EVENTDEMOLib(组件)下添加：
  1006.     [
  1007. uuid(C26E3137-7CDB-48F9-ACCB-95A272C68E68),
  1008. helpstring("adfasdf")
  1009. ]
  1010. dispinterface _MyEvent //interface MyEvent: IDispatch
  1011. {
  1012. properties:
  1013.     methods:
  1014. [id(1),helpstring("adsf")] HRESULT OnLog([in] BSTR msg);
  1015. }
  1016. 并在coclass MyAbc(构件中)添加：
  1017. [default,source] dispinterface _MyEvent;
  1019. 然后可看到自动生成接口MyEvent-->(右键CMyAbc)Implement Connection points-->在_MyEvent选项处打钩-->可看见有类CProxy_MyEvent<class T>生成，其下包含有方法Fire_OnLog(BSTR msg)(与_MyEvent的方法对应)
  1024. 3.项目Event：(有界面的--控件形式)事件处理：(右键)New ATL Object-->controls-->Composite Controls(建控件)-->(name:MyPwds)-->support Connection points--->生成事件接口IMyPwdsEvents、接口IMyPwds及类CMyPwds-->在事件接口IMyabcEvents中添加函数：
  1025. [id(1), helpstring("method add")] HRESULT add([in] BSTR msg);-->(右键CMyPwds)Implement Connection points-->在_IMyPwdsEvents选项处打钩-->(编译后)可看见有类CProxy_IMyPwdsEvents<class T>生成，其下包含有方法Fire_add(BSTR msg)(与_IMyPwdsEvents的方法对应)--->然后在dialog中添加一个按钮，然后双击添加button的BN_CLICKED，自动生成函数OnClickedButton1-->(点击Edit Exiting后)完成功能代码：
  1026. LRESULT OnClickedButton1(WORD wNotifyCode, WORD wID, HWND hWndCtl, BOOL& bHandled)
  1027. {
  1028. // TODO : Add Code for control notification handler.
  1029. this->Fire_add(::SysAllocString(L"控件制作成功"));
  1030. return 0;
  1031. }
  1032. };
  1033. 编译后即可---------
  1034. -->然后添加一个test项目，在Dialog中右键插入控件MyPwds Class-->(右键Event)绑定IDC_MYPWDS1和方法add-->(点击Edit Exiting后)完成功能代码：
  1036. void CTestDlg::OnaddMypwds1(LPCTSTR msg) 
  1037. {
  1038. // TODO: Add your control notification handler code here
  1039. CString str(msg);
  1040. MessageBox(msg);
  1041. }
  1045. 4.项目MyAbc
  1046.   4.1项目MyAbc01:(无界面的--控件形式)事件处理：(右键)New ATL Object-->Simple Object-->(Interface)Dual-->(name:)Abc-->support Connection points--->生成事件接口IAbcEvents、接口IAbc及类CAbc-->在事件接口IAbcEvents中添加函数：
  1047. [id(1), helpstring("method add")] HRESULT WriteLog([in] BSTR  msge);
  1048. -->(右键CMyPwds)Implement Connection points-->在_IAbcEvents选项处打钩-->(编译后)可看见有类CProxy_IAbcEvents<class T>生成，其下包含有(自动生成)方法Fire_WriteLog(BSTR msge)(与_IAbcEvents的方法对应)：
  1049. template <class T>
  1050. class CProxy_IAbcEvents : public IConnectionPointImpl<T, &DIID__IAbcEvents, CComDynamicUnkArray>
  1051. {
  1052. //Warning this class may be recreated by the wizard.
  1053. public:
  1054. HRESULT Fire_WriteLog(BSTR msge)
  1055. {
  1056. CComVariant varResult;
  1057. T* pT = static_cast<T*>(this);
  1058. int nConnectionIndex;
  1059. CComVariant* pvars = new CComVariant[1];
  1060. int nConnections = m_vec.GetSize();
  1062. for (nConnectionIndex = 0; nConnectionIndex < nConnections; nConnectionIndex++)
  1063. {
  1064. pT->Lock();
  1065. CComPtr<IUnknown> sp = m_vec.GetAt(nConnectionIndex);
  1066. pT->Unlock();
  1067. IDispatch* pDispatch = reinterpret_cast<IDispatch*>(sp.p);
  1068. if (pDispatch != NULL)
  1069. {
  1070. VariantClear(&varResult);
  1071. pvars[0] = msge;
  1072. DISPPARAMS disp = { pvars, NULL, 1, 0 };
  1073. //writeLog跟函数pDispatch->Invoke()相关==========
  1074. pDispatch->Invoke(0x1, IID_NULL, LOCALE_USER_DEFAULT, DISPATCH_METHOD, &disp, &varResult, NULL, NULL);
  1075. }
  1076. }
  1077. delete[] pvars;
  1078. return varResult.scode;
  1080. }
  1081. };
  1082. -->然后在接口IAbc中添加函数(可用右键完成)：
  1083. [id(1), helpstring("method add")] HRESULT add([in] int a, [in] int b, [out] int* c);
  1084.   
  1085.   4.2项目MyAbc02在MyAbc01基础上像1.3项目DispCallBack03一样添加项目test，即添加函数：
  1086. STDMETHODIMP MyLog::GetTypeInfoCount(UINT __RPC_FAR *pctinfo)
  1087. {
  1088. return S_FALSE;
  1089. }        
  1091. STDMETHODIMP MyLog::GetTypeInfo( 
  1092. UINT iTInfo,
  1093. LCID lcid,
  1094. ITypeInfo __RPC_FAR *__RPC_FAR *ppTInfo)
  1095. {
  1096. return S_FALSE;
  1097. }        
  1099. STDMETHODIMP MyLog::GetIDsOfNames( 
  1100. REFIID riid,
  1101. LPOLESTR __RPC_FAR *rgszNames,
  1102. UINT cNames,
  1103. LCID lcid,
  1104. DISPID __RPC_FAR *rgDispId)
  1105. {
  1106. return S_FALSE;
  1107. }        
  1109. STDMETHODIMP MyLog::Invoke( 
  1110. DISPID dispIdMember,
  1111. REFIID riid,
  1112. LCID lcid,
  1113. WORD wFlags,
  1114. DISPPARAMS __RPC_FAR *pDispParams,
  1115. VARIANT __RPC_FAR *pVarResult,
  1116. EXCEPINFO __RPC_FAR *pExcepInfo,
  1117. UINT __RPC_FAR *puArgErr)
  1118. {
  1119. //实现day12的WriteLog的功能(基本是复制的):生成日志文件
  1120. CFile f;
  1121. CFileException ex;
  1122. f.Open("./log.txt",CFile::modeCreate| CFile::modeReadWrite,&ex);
  1123. CString str(pDispParams->rgvarg[0].bstrVal);//改变的地方
  1124. f.Write(str.GetBuffer(100),str.GetLength());
  1125. ::SysFreeString(pDispParams->rgvarg[0].bstrVal);
  1126. f.Close();
  1127. return S_OK;
  1128. }        
  1130. STDMETHODIMP MyLog::QueryInterface( 
  1131. REFIID riid,
  1132. void __RPC_FAR *__RPC_FAR *ppvObject)
  1133. {
  1134.     *ppvObject=this;
  1135. return S_OK;
  1136. }        
  1137. STDMETHODIMP_(ULONG) MyLog::AddRef( void)
  1138. {
  1139. return 1;
  1140. }
  1141. STDMETHODIMP_(ULONG) MyLog::Release( void)
  1142. {
  1143. return 1;
  1144. }
  1148. ---03.01---------------------day14---------------------------------
  1150. 1.项目DemoError
  1151.   1.1项目DemoError01添加接口时，选择支持异常--Support ISupportsErrorInfo--可看到有异常类自动生成：
  1152. STDMETHODIMP CMyAbc::InterfaceSupportsErrorInfo(REFIID riid)
  1153. {
  1154. static const IID* arr[] = 
  1155. {
  1156. &IID_IMyAbc
  1157. };
  1158. for (int i=0; i < sizeof(arr) / sizeof(arr[0]); i++)
  1159. {
  1160. if (InlineIsEqualGUID(*arr[i],riid))
  1161. return S_OK;
  1162. }
  1163. return S_FALSE;
  1164. }
  1166. -->然后给接口添加并实现函数：
  1168. STDMETHODIMP CMyAbc::div(int a, int b, int *c)
  1169. {
  1170. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  1172. // TODO: Add your implementation code here
  1173. if(b==0)
  1174. {
  1175. CString str("b can not be zero!");
  1176. this->Error(str.AllocSysString());
  1177. return S_FALSE;
  1178. }
  1179. else
  1180. {
  1181. *c=a/b;
  1182. return S_OK;
  1183. }
  1184. }
  1186.   1.2项目DemoError02再建一个新项目test并添加一个按钮捕获异常：(.idl文件没变)
  1187. #include "../DemoError.h"
  1188. #include "../DemoError_i.c"
  1189. #include <atlbase.h>
  1191. void CTest1Dlg::OnButton1() 
  1192. {
  1193. // TODO: Add your control notification handler code here
  1194. ::CoInitialize(NULL);
  1195. CComPtr<IMyAbc> mytools;
  1196. mytools.CoCreateInstance(CLSID_MyAbc);
  1197. int iResult=0;
  1198. HRESULT hr=mytools->div(12,0,&iResult);
  1199. if(hr!=0)
  1200. {
  1201. ISupportErrorInfo* pError=NULL;//判断是否支持异常
  1202. mytools->QueryInterface(IID_ISupportErrorInfo,(void**)&pError);
  1203. HRESULT h1=pError->InterfaceSupportsErrorInfo(IID_IMyAbc);//判断接口是否支持异常
  1204. if(SUCCEEDED(h1))
  1205. {
  1206. IErrorInfo* pMyException=NULL;
  1207. ::GetErrorInfo(0,&pMyException);
  1208. BSTR msg;
  1209. pMyException->GetDescription(&msg);//捕获错误异常提示
  1210. CString str(msg);
  1211. MessageBox(str);
  1212. }
  1213. }
  1215. }
  1218. 2.项目EquationDemo通过接口(支持异常)实现一元二次方程求根:
  1219.   2.1项目EquationDemo02实现求根函数：
  1220. 在.idl文件中
  1221. //添加与一元二次方程相关两个结构体
  1222. //保存根数据的结构体
  1223.     typedef struct Root
  1224. {
  1225. float r1;
  1226. float r2;
  1227. } Root;
  1228. //保存方程系数数据的结构体
  1229.     typedef struct Equation
  1230. {
  1231.   float a;
  1232. float b;
  1233. float c;
  1234. } Equation;
  1235. STDMETHODIMP CMyEquation::solve(Equation* equ,Root** roots)
  1236. {
  1237. float delta=(equ->b)*(equ->b)-4*equ->a*equ->c;
  1238. if(delta>=0)
  1239. {
  1240. *roots=(Root*)::CoTaskMemAlloc(sizeof(Root));
  1241. float temp1=sqrt(delta);
  1242. (*roots)->r1=0.5*(0-equ->b+temp1)/equ->a;
  1243. (*roots)->r1=0.5*(0-equ->b-temp1)/equ->a;
  1244. return S_OK;
  1245. }
  1246. else
  1247. {
  1248. this->Error(::SysAllocString(L"no root"));
  1249. return S_FALSE;
  1250. }
  1251. }
  1252.   
  1254.   2.2项目EquationDemo03再建一个test项目并添加一个按钮：
  1256. #include "../EquationDemo.h"
  1257. #include "../EquationDemo_i.c"
  1258. #include <atlbase.h>
  1260. void CTestDlg::OnButton1() 
  1261. {
  1262. // TODO: Add your control notification handler code here
  1263. ::CoInitialize(NULL);
  1264. CComPtr<IMyEquation> mytools;
  1265. mytools.CoCreateInstance(CLSID_MyEquation);
  1266. Equation t;
  1267. t.a=1;
  1268. t.b=2;
  1269. t.c=1;
  1270. Root* roots=NULL;
  1271. HRESULT hr=mytools->solve(&t,&roots);
  1272. if(hr!=0)
  1273. {
  1274. ISupportErrorInfo* pSp=NULL;
  1275. mytools->QueryInterface(IID_ISupportErrorInfo,(void **)&pSp);
  1276. if(pSp!=NULL)
  1277. {
  1278. HRESULT hrok=pSp->InterfaceSupportsErrorInfo(IID_IMyEquation);
  1279. if(hrok==S_OK)
  1280. {
  1281. IErrorInfo* pError=NULL;
  1282. ::GetErrorInfo(0,&pError);
  1283. BSTR bMsg;
  1284. pError->GetDescription(&bMsg);
  1285. CString str(bMsg);
  1286. MessageBox(str);
  1287. }
  1288. }
  1289. }
  1290. else
  1291. {
  1292. CString strall;
  1293. strall.Format("root1:%f,root2:%f",roots->r1,roots->r2);
  1294. MessageBox(strall);
  1295. }
  1296. }
  1299. 3.项目TestAdo为ADO(数据库COM)操作：
  1300.   3.1项目TestAdo02为建一个单文档项目，在标准头文件StdAfx.h中添加
  1301. #import "C:\Program Files\Common Files\System\ado\msado15.dll" no_namespace rename("EOF","adoEOF")--C:Program FilesCommon FilesSystemadomsado15.dll为微软提供的数据库COM相关接口msado15.dll文件--->然后添加三个按钮：
  1302. 测试时hr=0表返回成功
  1303. void CTestAdoDlg::OnButton1() 
  1304. {
  1305. ::CoInitialize(NULL);
  1306. _ConnectionPtr myconn;  //CComPtr<IConnection>智能指针
  1307. myconn.CreateInstance(__uuidof(Connection));//生成实例
  1308. _bstr_t sql("Provider=OraOLEDB.Oracle.1;User Id=scott;Data Source=tarena;");//样式
  1309. HRESULT hr=myconn->Open(sql,"scott","tiger",-1);//建立数据源连接--conection的方法
  1310. myconn->Close();//释放数据源连接--conection的方法
  1311. }
  1313. #include <atlbase.h>
  1314. void CTestAdoDlg::OnButton2() 
  1315. {
  1316. // TODO: Add your control notification handler code here
  1317.     ::CoInitialize(NULL);//初始化环境
  1318. CComPtr<_Connection> mytools;//和OnButton1的声明意义一样
  1319. mytools.CoCreateInstance(__uuidof(Connection));//生成实例
  1320. _bstr_t sql("Provider=OraOLEDB.Oracle.1;User Id=scott;Data Source=tarena;");
  1321. HRESULT hr=mytools->Open(sql,"scott","tiger",-1);//建立数据源连接
  1322. mytools->Close();//释放数据源连接
  1323. }
  1325. void CTestAdoDlg::OnButton3() 
  1326. {
  1327. // TODO: Add your control notification handler code here
  1328.     ::CoInitialize(NULL);//初始化环境
  1329. _Connection* mytools=NULL;
  1330. CoCreateInstance(__uuidof(Connection),
  1331. NULL,
  1332. CLSCTX_INPROC_SERVER,
  1333. __uuidof(_Connection),
  1334. (void **)&mytools);//生成实例
  1335. _bstr_t sql("Provider=OraOLEDB.Oracle.1;User Id=scott;Data Source=tarena;");
  1336. HRESULT hr=mytools->Open(sql,"scott","tiger",-1);//建立数据源连接
  1337. mytools->Close();//释放数据源连接
  1338. }
  1341.   3.2项目TestAdo03在02的button1中添加查询数据库代码：
  1343. void CTestAdoDlg::OnButton1() 
  1344. {
  1345. ::CoInitialize(NULL);
  1346. _ConnectionPtr myconn; //连接智能指针 
  1347. myconn.CreateInstance(__uuidof(Connection));//生成实例
  1348. _bstr_t sql("Provider=OraOLEDB.Oracle.1;User Id=scott;Data Source=tarena;");
  1349. HRESULT hr=myconn->Open(sql,"scott","tiger",-1);
  1351. //定义一个sql语句对象；
  1352.     _CommandPtr mysql1; //命令智能指针
  1353. mysql1.CreateInstance(__uuidof(Command));//生成实例
  1354. _bstr_t sql1("select * from ocyBooks");
  1355. mysql1->CommandText=sql1;//指定命令文本
  1356. mysql1->CommandType=adCmdText;//指定命令类型
  1357. //以下是新增的代码：
  1358. //制定SQL所查询的数据库；
  1359. mysql1->ActiveConnection=myconn;
  1360. //查询并返回存放在表中的结果集
  1361. _RecordsetPtr mydata=mysql1->Execute(NULL,NULL,adCmdText);//数据操作
  1363. while(!mydata->adoEOF)//列表指针
  1364. {
  1365. _variant_t myid=mydata->GetCollect("BOOKISNB");//获取数据表对应属性名的数据
  1366. _variant_t myname=mydata->GetCollect("BOOKNAME");//获取数据表对应属性名的数据
  1367. _variant_t myauthor=mydata->GetCollect("BOOKAuthor");//获取数据表对应属性名的数据
  1368. CString strName((LPCTSTR)(_bstr_t)myname);//(_bstr_t)为带空字节头的UNicode码
  1369. CString strAuthor((LPCTSTR)(_bstr_t)myauthor);//(LPCTSTR)为不带空字节头的UNicode码
  1370. CString str;
  1371. str.Format("%d;%s;%s",(long)myid,strName,strAuthor);
  1372. MessageBox(str);
  1373. mydata->MoveNext();
  1374. }
  1375. mydata->Close();
  1376. myconn->Close();
  1377. }
  1379.   3.3项目TestAdo04新加一个按钮对Command的操作：
  1380. void CTestAdoDlg::OnButton4() 
  1381. {
  1382. // TODO: Add your control notification handler code here
  1383. ::CoInitialize(NULL);//初始化环境
  1384. //_bstr_t sql1("insert into ocyBooks (BookISNB, BookName, BookAuthor) values (123457,'COM','WANGWU')");
  1385. //_bstr_t sql1("delete from ocyBooks");
  1386. _bstr_t sql1("update ocyBooks set BookName='C++' where BookName='COM'");
  1387. _ConnectionPtr myconn;//连接智能指针 
  1388. myconn.CreateInstance(__uuidof(Connection));//生成实例
  1389. _bstr_t sql("Provider=OraOLEDB.Oracle.1;User Id=scott;Data Source=tarena;");
  1390. HRESULT hr=myconn->Open(sql,"scott","tiger",-1);//建立数据源连接
  1392. _CommandPtr cmdsql1;//命令智能指针
  1393. cmdsql1.CreateInstance(__uuidof(Command));//生成实例
  1394. cmdsql1->CommandType=adCmdText;//指定命令类型
  1395. cmdsql1->CommandText=sql1;//指定命令文本
  1397. //制定SQL所查询的数据库；
  1398. cmdsql1->ActiveConnection=myconn;
  1400. VARIANT iResult;
  1401. iResult.vt=VT_I4;//数字类型
  1402. cmdsql1->Execute(&iResult,NULL,adCmdText);//功能和Recordset的一样
  1403. }
  1408. ---03.02---------------------day15---------------------------------
  1410. 1.项目DempParameter添加文本框，输入数据，导入数据库(不是COM方式)
  1411.   1.1基本对话项目DempParameter02添加一个window事件：WM_DESTROY，在自动生成的OnDestroy() 方法中添加::CoUninitialize();//释放环境；
  1412. 在OnInitDialog()方法中添加::CoInitialize(NULL);//初始化环境
  1413. 在头文件中声明一个方法：//链接单独用一个函数有利于扩展通用性：
  1414. _ConnectionPtr GetDataConnection(CString datasource, CString uid, CString pwd);
  1415. 然后添加3个文本框(在类向导中绑定3个变量)和1个按钮：
  1416. _ConnectionPtr CDempParameterDlg::GetDataConnection(CString datasource, CString uid, CString pwd)
  1417. {
  1418. CString strFormat="Provider=OraOLEDB.Oracle.1;User Id=%s;Data Source=%s";
  1419. CString str;
  1420. str.Format(strFormat,uid,datasource);
  1421. _ConnectionPtr mytools;
  1422. mytools.CreateInstance(__uuidof(Connection));
  1423. mytools->Open(_bstr_t(str),"",_bstr_t(pwd),-1);
  1424. return mytools;
  1425. }
  1427. void CDempParameterDlg::OnButton1() 
  1428. {
  1429. // TODO: Add your control notification handler code here
  1430. _ConnectionPtr myconn=this->GetDataConnection("tarena","scott","tiger");
  1431. this->UpdateData(TRUE);//更新数据
  1432. CString sqlFormat="insert into ocyBooks(BookIsnb,BookName,BookAuthor) values (%s,'%s','%s')";
  1433. CString sql;
  1434. sql.Format(sqlFormat,this->m_ibsn,this->m_bookname,this->m_author);
  1436. _CommandPtr sqlobj;
  1437. sqlobj.CreateInstance(__uuidof(Command));
  1438. sqlobj->CommandText=_bstr_t(sql);//命令文本
  1439. sqlobj->CommandType=adCmdText;//命令类型
  1440. //制定SQL所查询的数据库；
  1441. sqlobj->ActiveConnection=myconn;
  1443. VARIANT vResult;
  1444. vResult.vt=VT_I4;//转整形
  1445. try{
  1446. sqlobj->Execute(&vResult,NULL,adCmdText);//执行查询
  1447. }
  1448. catch(_com_error ex)
  1449. {
  1450. int i=10;
  1451. i=i+1;
  1452. }
  1453. }
  1456.   1.2单文档项目DempParameter03再添加一个按钮，功能一样：
  1458. void CDempParameterDlg::OnButton2() 
  1459. {
  1460. // TODO: Add your control notification handler code here
  1461. this->UpdateData(TRUE);
  1462. _ConnectionPtr myconn=this->GetDataConnection("tarena","scott","tiger");
  1463. //和1的不同点
  1464. _bstr_t sql("insert into ocyBooks(BookIsnb,BookName,BookAuthor) values (?,?,?)");
  1465. _CommandPtr sqlobj;
  1466. sqlobj.CreateInstance(__uuidof(Command));
  1468. sqlobj->CommandType=adCmdText;//命令类型
  1469. sqlobj->CommandText=sql;//命令文本，和1的不同点
  1470. //parameter对象在command对象中用于指定参数化查询或者存储过程的参数
  1472. _ParameterPtr para1=sqlobj->CreateParameter("id",adInteger,adParamInput,4);
  1473. _ParameterPtr para2=sqlobj->CreateParameter("name",adVarChar,adParamInput,20);
  1474. _ParameterPtr para3=sqlobj->CreateParameter("author",adVarChar,adParamInput,20);
  1475. int id=atoi(this->m_ibsn);//字符转整形
  1476.     _variant_t vid((long)id);
  1477. para1->Value=vid;
  1478.     para2->Value=(_variant_t)(_bstr_t)(this->m_bookname);
  1479. para3->Value=(_variant_t)(_bstr_t)(this->m_author);
  1481. sqlobj->Parameters->Append(para1);//追加
  1482. sqlobj->Parameters->Append(para2);//追加
  1483. sqlobj->Parameters->Append(para3);//追加
  1485. sqlobj->ActiveConnection=myconn;
  1486. VARIANT myvt;
  1487. myvt.vt=VT_I4;
  1488. sqlobj->Execute(&myvt,NULL,adCmdText);
  1489. }
  1492. 2.项目BooksDAL用接口(COM)方式操作数据库：
  1493.   2.1建一个支持异常的COM组件项目BooksDAL01，添加5个方法：
  1494. 在idl文件头添加一个结构体：
  1495.     typedef struct DTOBook
  1496. {
  1497.    UINT BookIsnb;
  1498.    BSTR BookName;
  1499.    BSTR BookAuthor;
  1500. }DTOBook;
  1502. STDMETHODIMP CDALMyBools::GetBookByIsbn(UINT bookisbn, DTOBook **mybook)
  1503. {
  1504. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  1506. // TODO: Add your implementation code here
  1508. return S_OK;
  1509. }
  1511. STDMETHODIMP CDALMyBools::QueryAllBook(DTOBook **allBook)
  1512. {
  1513. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  1515. // TODO: Add your implementation code here
  1517. return S_OK;
  1518. }
  1520. STDMETHODIMP CDALMyBools::SaveBook(DTOBook *bookdata, UINT *pResult)
  1521. {
  1522. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  1524. // TODO: Add your implementation code here
  1526. return S_OK;
  1527. }
  1529. STDMETHODIMP CDALMyBools::DeleteBookById(UINT id, UINT *iResult)
  1530. {
  1531. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  1533. // TODO: Add your implementation code here
  1535. return S_OK;
  1536. }
  1538. STDMETHODIMP CDALMyBools::Update(DTOBook *Book, UINT *iResult)
  1539. {
  1540. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  1542. // TODO: Add your implementation code here
  1544. return S_OK;
  1545. }
  1547.   2.1项目BooksDAL02在01的基础上声明8个私有成员变量及1个私有成员方法：
  1548. 在头文件中添加：
  1549. #import "C:\Program Files\Common Files\System\ado\msado15.dll" no_namespace rename("EOF","adEOF")
  1550. private:
  1551. _ConnectionPtr GetMyConn();
  1552. CString m_sqlQueryById;//通过ID查询
  1553. CString m_sqlQueryAll;//查询所有
  1554. CString m_sqlUpdate;//通过ID更新bookname、bookauthor
  1555. CString m_sqlSave;
  1556. CString m_sqlDelete;
  1557. CString m_UID;//用户名:scott
  1558. CString m_PWD;//密码:tiger
  1559. CString m_DataSource;//数据源:tarena
  1560. 然后在构造方法中初始化：
  1561. CDALMyBools()
  1562. {
  1563. this->m_sqlQueryById="select * from mybooks where bookisnb=?";
  1564. this->m_sqlQueryAll="select * from mybooks";
  1565. this->m_sqlUpdate="update mybooks set bookname=?,bookauthor=? where bookisnb=?";
  1566. //CString m_sqlSave;
  1567. //CString m_sqlDelete;
  1568. }
  1569. 私有成员方法的实现：//通用性
  1570. _ConnectionPtr CDALMyBools::GetMyConn()
  1571. {
  1572. CString strFormat="Provider=OraOLEDB.Oracle.1;User Id=%s;Data Source=%s";
  1573. CString str;
  1574. str.Format(strFormat,this->m_UID,this->m_DataSource);
  1575. _ConnectionPtr mytools;
  1576. mytools.CreateInstance(__uuidof(Connection));
  1577. mytools->Open(_bstr_t(str),"",_bstr_t(this->m_PWD),-1);
  1578. return mytools;
  1579. }
  1580. 并在其他方法中调用：
  1581. STDMETHODIMP CDALMyBools::GetBookByIsbn(UINT bookisbn, DTOBook **mybook)
  1582. {
  1583. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  1585. // TODO: Add your implementation code here
  1586. _ConnectionPtr conn=this->GetMyConn();
  1588. return S_OK;
  1589. }
  1591. 然后添加3个属性(自动生成6个方法)：
  1592. STDMETHOD(get_DataSource)(/*[out, retval]*/ BSTR *pVal);
  1593. STDMETHOD(put_DataSource)(/*[in]*/ BSTR newVal);
  1594. STDMETHOD(get_PWD)(/*[out, retval]*/ BSTR *pVal);
  1595. STDMETHOD(put_PWD)(/*[in]*/ BSTR newVal);
  1596. STDMETHOD(get_UID)(/*[out, retval]*/ BSTR *pVal);
  1597. STDMETHOD(put_UID)(/*[in]*/ BSTR newVal);
  1598. 并实现：
  1599. STDMETHODIMP CDALMyBools::get_UID(BSTR *pVal)
  1600. {
  1601. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  1603. // TODO: Add your implementation code here
  1605. return S_OK;
  1606. }
  1607. //有改动
  1608. STDMETHODIMP CDALMyBools::put_UID(BSTR newVal)
  1609. {
  1610. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  1612. // TODO: Add your implementation code here
  1613. this->m_UID=CString(newVal);
  1614. ::SysFreeString(newVal);
  1615. return S_OK;
  1616. }
  1618. STDMETHODIMP CDALMyBools::get_PWD(BSTR *pVal)
  1619. {
  1620. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  1622. // TODO: Add your implementation code here
  1624. return S_OK;
  1625. }
  1626. //有改动
  1627. STDMETHODIMP CDALMyBools::put_PWD(BSTR newVal)
  1628. {
  1629. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  1631. // TODO: Add your implementation code here
  1632. this->m_PWD=CString(newVal);
  1633. ::SysFreeString(newVal);
  1635. return S_OK;
  1636. }
  1638. STDMETHODIMP CDALMyBools::get_DataSource(BSTR *pVal)
  1639. {
  1640. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  1642. // TODO: Add your implementation code here
  1644. return S_OK;
  1645. }
  1646. //有改动
  1647. STDMETHODIMP CDALMyBools::put_DataSource(BSTR newVal)
  1648. {
  1649. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  1651. // TODO: Add your implementation code here
  1652. this->m_DataSource=CString(newVal);
  1653. ::SysFreeString(newVal);
  1654. return S_OK;
  1655. }
  1659.   2.2项目BooksDAL03在02的基础上补充方法GetBookByIsbn()：
  1660. STDMETHODIMP CDALMyBools::GetBookByIsbn(UINT bookisbn, DTOBook **mybook)
  1661. {
  1662. AFX_MANAGE_STATE(AfxGetStaticModuleState())
  1663. // TODO: Add your implementation code here
  1664. _ConnectionPtr conn=this->GetMyConn();
  1665. *mybook=(DTOBook*)::CoTaskMemAlloc(sizeof(DTOBook));//开辟空间
  1666. _CommandPtr sqlobj;
  1667. sqlobj.CreateInstance(__uuidof(Command));//生成实例
  1668. sqlobj->CommandText=(_bstr_t)this->m_sqlQueryById;//命令类型
  1669. sqlobj->CommandType=adCmdText;//命令文本
  1670. //制定SQL所查询的数据库；
  1671. sqlobj->ActiveConnection=conn;
  1672. //指定参数化查询
  1673. _ParameterPtr para1=sqlobj->CreateParameter("id",adInteger,adParamInput,4);
  1674. para1->Value=_variant_t((long)bookisbn);
  1675. sqlobj->Parameters->Append(para1);
  1676. _RecordsetPtr data=sqlobj->Execute(NULL,NULL,adCmdText);
  1677. if(!data->adEOF)
  1678. {
  1679. (*mybook)->BookIsnb=(UINT)(long)(data->GetCollect("bookisnb"));
  1680. _variant_t vtname=data->GetCollect("bookname");
  1681. (*mybook)->BookName=::SysAllocString(vtname.bstrVal);
  1682. _variant_t vtauthor=data->GetCollect("bookauthor");
  1683. (*mybook)->BookName=::SysAllocString(vtauthor.bstrVal);
  1684. }
  1685. return S_OK;
  1686. }
  1688. 在BooksDAL.h中添加一个结构体：
  1689. typedef struct  DTOBook
  1690.     {
  1691.     UINT BookIsnb;
  1692.     BSTR BookName;
  1693.     BSTR BookAuthor;
  1694.     } DTOBook;
  1695. 然后新建一个test项目并添加一个按钮测试：
  1696. #include "../BooksDAL.h"
  1697. #include "../BooksDAL_i.c"
  1698. #include <atlbase.h>
  1699. #include <comdef.h>
  1700. void CTESTDlg::OnButton1() 
  1701. {
  1702. // TODO: Add your control notification handler code here
  1703. ::CoInitialize(NULL);
  1704. CComPtr<IDALMyBools> mytools;
  1705. mytools.CoCreateInstance(CLSID_DALMyBools);
  1706. DTOBook* pData=NULL;
  1707. mytools->put_PWD(_bstr_t("tiger"));
  1708. mytools->put_UID(_bstr_t("scott"));
  1709. mytools->put_DataSource(_bstr_t("tarena"));
  1711. mytools->GetBookByIsbn(6,&pData);
  1712. }
  1715.   2.3项目BooksDAL04在03的基础上补充添加私有方法：
  1716. _ParameterPtr CDALMyBools::GetIdPara(UINT id,_CommandPtr sqlObj)
  1717. {
  1718. _ParameterPtr para1=sqlObj->CreateParameter("id",adInteger,adParamInput,4);
  1719. para1->Value=_variant_t((long)id);
  1720. return para1;
  1721. }
  1722. 改变按钮代码：
  1723. #include "../BooksDAL.h"
  1724. #include "../BooksDAL_i.c"
  1725. #include <atlbase.h>
  1726. #include <comdef.h>
  1727. void CTESTDlg::OnButton1() 
  1728. {
  1729. // TODO: Add your control notification handler code here
  1730. ::CoInitialize(NULL);
  1731. CComPtr<IDALMyBools> mytools;
  1732. mytools.CoCreateInstance(CLSID_DALMyBools);
  1733. DTOBook* pData=NULL;
  1734. mytools->put_PWD(_bstr_t("csd0910"));
  1735. mytools->put_UID(_bstr_t("csd0910"));
  1736. mytools->put_DataSource(_bstr_t("lisongtao"));
  1738. mytools->GetBookByIsbn(123457,&pData);
  1739. UINT iResult=0;
  1740. mytools->DeleteBookById(123457,&iResult);
  1741. }
  1743. ---03.05---------------------day16---------------------------------
  1745. 1.项目project为数据库连接(用day15的接口)及MFC界面操作实例：
  1746.   1.1项目project01建一个选定支持windows资源管理的单文档项目BookAdminApp，然后新建一个普通类BookEntity并让它继承CObject，且声明3个数据相关变量：
  1747. //要操作的数据成员，与接口的数据对应
  1748. UINT BookIsnb;
  1749. CString BookName;
  1750. CString BookAuthor;
  1751. --->在CBookAdminApp类的初始化方法InitInstance()中添加 ::CoInitialize(NULL);//环境初始化
  1752. --->用CBookAdminDoc类的方法OnNewDocument()读取数据到内存：
  1753. BOOL CBookAdminDoc::OnNewDocument()
  1754. {
  1755. if (!CDocument::OnNewDocument())
  1756. return FALSE;
  1758. // TODO: add reinitialization code here
  1759. // (SDI documents will reuse this document)
  1760. CComPtr<IDALMyBools> mytools;//组件接口指针
  1761. mytools.CoCreateInstance(CLSID_DALMyBools);//生成实例
  1762. DTOBook* pAllBooks=NULL;//数据的结构
  1763. UINT iSize=0;
  1764. //设置连接数据库条件
  1765. mytools->put_DataSource(::SysAllocString(L"tarena"));
  1766. mytools->put_UID(::SysAllocString(L"scott"));
  1767. mytools->put_PWD(::SysAllocString(L"tiger"));
  1768. mytools->QueryAllBook(&pAllBooks,&iSize);//查询数据库
  1769. for(int i=0;i<iSize;i++)
  1770. {
  1771. BookEntity* p1=new BookEntity;//
  1772. p1->BookIsnb=(pAllBooks+i)->BookIsnb;
  1773. p1->BookName=CString((pAllBooks+i)->BookName);
  1774. p1->BookAuthor=CString((pAllBooks+i)->BookAuthor);
  1775. //CString类型用完要释放掉
  1776. ::SysFreeString((pAllBooks+i)->BookName);
  1777. ::SysFreeString((pAllBooks+i)->BookAuthor);
  1778. //保存到内存上；
  1779. this->allBooks.AddTail(p1);
  1780. }
  1781. //释放栈中的结构体
  1782. ::CoTaskMemFree(pAllBooks);
  1784. return TRUE;
  1785. }
  1788.   1.2项目project02在01的CBookAdminView类的方法OnInitialUpdate()完成界面数据初始化：
  1789. //窗体中有数据出现
  1790. void CBookAdminView::OnInitialUpdate()
  1791. {
  1792. CListView::OnInitialUpdate();
  1794. //创建列；
  1795. this->GetListCtrl().InsertColumn(0,"BookName",LVCFMT_CENTER,200);
  1796. this->GetListCtrl().InsertColumn(1,"BookAuther",LVCFMT_CENTER,200);
  1797. //添加数据；
  1798. POSITION ps;
  1799. ps=this->GetDocument()->allBooks.GetHeadPosition();
  1800. while(ps!=NULL)
  1801. {
  1802. BookEntity* be=this->GetDocument()->allBooks.GetNext(ps);
  1803. this->GetListCtrl().InsertItem(0,be->BookName);
  1804. this->GetListCtrl().SetItemText(0,1,be->BookAuthor);
  1805. }
  1806. // TODO: You may populate your ListView with items by directly accessing
  1807. //  its list control through a call to GetListCtrl().
  1808. }
  1810.   1.3项目project03添加工具栏按钮实现添加功能：
  1811. -->添加一个对话框，再添加3个文本框，建一个基类为CDialog的MFC类DlgBookAdd并绑定文本框和3个变量再声明一个变量BOOL    m_bIsOk;
  1812. 及实现两个按钮功能(用对话框给的OK和cancel):
  1813. void DlgBookAdd::OnOK() 
  1814. {
  1815. // TODO: Add extra validation here
  1816. this->UpdateData(TRUE);//(更新后)把文本框数据送到内存中
  1817. m_bIsOk=TRUE;//与工具栏的功能相关
  1818. CDialog::OnOK();
  1819. }
  1821. void DlgBookAdd::OnCancel() 
  1822. {
  1823. // TODO: Add extra cleanup here
  1824. m_bIsOk=FALSE;
  1825. CDialog::OnCancel();
  1826. }
  1827. -->再实现工具栏的按钮功能：
  1828. //工具栏添加功能按钮
  1829. void CBookAdminDoc::OnButton32771() 
  1830. {
  1831. // TODO: Add your command handler code here
  1832. DlgBookAdd mydlg;//新设的类,绑定文本框和数据变量
  1833. mydlg.DoModal();//弹出对话框
  1834. if(mydlg.m_bIsOk)
  1835. { //对话框数据相关
  1836. UINT isbn=mydlg.m_bookisbn;
  1837. CString name=mydlg.m_bookname;
  1838. CString Author=mydlg.m_bookauthor;
  1840. CString CSisbn;
  1842. DTOBook* dto=new DTOBook;
  1843. dto->BookIsnb=isbn;
  1844. dto->BookName=name.AllocSysString();//转BSTR
  1845. dto->BookAuthor=Author.AllocSysString();
  1846. //将数据添加到数据库中；==>重复的代码
  1847. CComPtr<IDALMyBools> mytools;
  1848. mytools.CoCreateInstance(CLSID_DALMyBools);
  1849. DTOBook* pAllBooks=NULL;
  1850. UINT iSize=0;
  1851. mytools->put_DataSource(::SysAllocString(L"tarena"));
  1852. mytools->put_UID(::SysAllocString(L"scott"));
  1853. mytools->put_PWD(::SysAllocString(L"tiger"));
  1854. //保存数据
  1855. UINT iResult=0;
  1856. mytools->SaveBook(dto,&iResult);
  1857. //刷新界面上的数据==>显示到界面上；
  1858. POSITION ps=this->GetFirstViewPosition();
  1859. while(ps!=NULL)
  1860. {
  1861. CView* pview=this->GetNextView(ps);
  1862. if(pview->GetRuntimeClass()->m_lpszClassName=="CBookAdminView")
  1863. {
  1864. CListView* plist=(CListView*)pview;
  1866. plist->GetListCtrl().InsertItem(0,name);
  1867. plist->GetListCtrl().SetItemText(0,1,Author);
  1868. }
  1869. }
  1870. }
  1871. }
  1874.   1.4项目project04把03的--刷新界面上的数据的代码--及数据库连接相关变量数据归并到函数中去：
  1876. void CBookAdminDoc::OnButton32771() 
  1877. {
  1878. // TODO: Add your command handler code here
  1879. DlgBookAdd mydlg;
  1880. mydlg.DoModal();
  1881. if(mydlg.m_bIsOk)
  1882. {
  1883. UINT isbn=mydlg.m_bookisbn;
  1884. CString name=mydlg.m_bookname;
  1885. CString Author=mydlg.m_bookauthor;
  1886. DTOBook* dto=new DTOBook;
  1887. dto->BookIsnb=isbn;
  1888. dto->BookName=name.AllocSysString();
  1889. dto->BookAuthor=Author.AllocSysString();
  1890. //将数据添加到数据库中；
  1891. CComPtr<IDALMyBools> mytools=this->GetDbTools();
  1892. UINT iResult=0;
  1893. mytools->SaveBook(dto,&iResult);
  1894. //刷新界面上的数据；
  1895. CListView* plist=this->GetListView1();
  1896. plist->GetListCtrl().InsertItem(0,name);
  1897. plist->GetListCtrl().SetItemText(0,1,Author);
  1898. }
  1899. }
  1901. CComPtr<IDALMyBools> CBookAdminDoc::GetDbTools()
  1902. {
  1903. CComPtr<IDALMyBools> mytools;
  1904. mytools.CoCreateInstance(CLSID_DALMyBools);
  1905. DTOBook* pAllBooks=NULL;
  1906. UINT iSize=0;
  1907. mytools->put_DataSource(::SysAllocString(L"tarena"));
  1908. mytools->put_UID(::SysAllocString(L"scott"));
  1909. mytools->put_PWD(::SysAllocString(L"tiger"));
  1910. return mytools;
  1911. }
  1913. CListView* CBookAdminDoc::GetListView1()
  1914. {
  1915. CListView* plist=NULL;
  1916. POSITION ps=this->GetFirstViewPosition();
  1917. while(ps!=NULL)
  1918. {
  1919. CView* pview=this->GetNextView(ps);
  1920. if(pview->GetRuntimeClass()->m_lpszClassName=="CBookAdminView")
  1921. {
  1922. plist=(CListView*)pview;
  1923. break;
  1924. }
  1925. }
  1926. return plist;
  1927. }
  1930.   1.5项目project05添加工具栏删除功能按钮(绑定事件)：
  1931. void CBookAdminView::OnButton32772() 
  1932. {
  1933. // TODO: Add your command handler code here
  1934. //找到被删除的记录ID；
  1935. int index=this->GetListCtrl().GetNextItem(-1,LVNI_SELECTED|LVNI_ALL);
  1936. if(index==-1)
  1937. {
  1938. MessageBox("请首先选中一条记录！");
  1939. }
  1940. else
  1941. {
  1942. UINT iOk=MessageBox("你真的要删除吗？","删除确认",MB_YESNO);
  1943. //从当前的界面上删除；
  1944. if(iOk==6)
  1945. {
  1946. this->GetListCtrl().DeleteItem(index);
  1947. //
  1948. DWORD isbn=this->GetListCtrl().GetItemData(index);
  1949. UINT iResult=0;
  1950. this->GetDocument()->GetDbTools()->DeleteBookById((UINT)isbn,&iResult);
  1951. }
  1952. }
  1953. }
  1956.   1.6项目project06添加工具栏修改数据功能按钮(绑定事件)：
  1958. //修改数据
  1959. void CBookAdminView::OnButton32773() 
  1960. {
  1961. // TODO: Add your command handler code here
  1962. //1. 获得被编辑的记录id;
  1963. int index=this->GetListCtrl().GetNextItem(-1,LVNI_ALL|LVNI_SELECTED);
  1964. if(index==-1)
  1965. {
  1966. MessageBox("请首先选中一条记录");
  1967. return ;
  1968. }
  1969. //2. 显示被编辑的数据；
  1970. UINT id=(UINT)(this->GetListCtrl().GetItemData(index));
  1971. DTOBook* pCurrentData=NULL;
  1972. this->GetDocument()->GetDbTools()->GetBookByIsbn(id,&pCurrentData);
  1973. //3. 获得修改后的数据；
  1974. DlgBookAdd dlg;
  1975. dlg.m_bookisbn=id;
  1976. dlg.m_bookname=CString(pCurrentData->BookName);
  1977. dlg.m_bookauthor=CString(pCurrentData->BookAuthor);
  1978. ::SysFreeString(pCurrentData->BookName);
  1979. ::SysFreeString(pCurrentData->BookAuthor);
  1980. dlg.DoModal();
  1981. //4. 更新数据库；
  1983. //5. 更新界面；
  1984. }
  1986.   1.7项目project07添加工具栏修改数据功能按钮(绑定事件)：
  1987. void CBookAdminView::OnButton32773() 
  1988. {
  1989. // TODO: Add your command handler code here
  1990. //1. 获得被编辑的记录id;
  1991. int index=this->GetListCtrl().GetNextItem(-1,LVNI_ALL|LVNI_SELECTED);
  1992. if(index==-1)
  1993. {
  1994. MessageBox("请首先选中一条记录");
  1995. return ;
  1996. }
  1997. //2. 显示被编辑的数据；
  1998. UINT id=(UINT)(this->GetListCtrl().GetItemData(index));
  1999. DTOBook* pCurrentData=NULL;
  2000. this->GetDocument()->GetDbTools()->GetBookByIsbn(id,&pCurrentData);
  2001. //3. 获得修改后的数据；
  2002. DlgBookAdd dlg;
  2003. dlg.m_bookisbn=id;
  2004. dlg.m_bookname=CString(pCurrentData->BookName);
  2005. dlg.m_bookauthor=CString(pCurrentData->BookAuthor);
  2006. ::SysFreeString(pCurrentData->BookName);
  2007. ::SysFreeString(pCurrentData->BookAuthor);
  2008. dlg.DoModal();
  2009. //4. 更新数据库；
  2010. if(!dlg.m_bIsOk) return ;
  2012. pCurrentData->BookAuthor=dlg.m_bookauthor.AllocSysString();
  2013. pCurrentData->BookName=dlg.m_bookname.AllocSysString();
  2014. UINT iResult=0;
  2015. this->GetDocument()->GetDbTools()->Update(pCurrentData,&iResult);
  2016. if(iResult==0) return;
  2017. //5. 更新界面；
  2018. this->GetListCtrl().SetItemText(index,0,dlg.m_bookname) ;
  2019. this->GetListCtrl().SetItemText(index,1,dlg.m_bookauthor);
  2020. }
  2021. ---03.06---------------------day17---------------------------------
  2023. 1.对话框项目OffDemoTecordSet 的open()方法的用法，建3个文本框，N个按钮功能：
  2024.   1.1项目OffDemo01在方法COffDemoDlg::OnInitDialog()中添加初始化环境语句：
  2025. ::CoInitialize(NULL);//初始化环境
  2026. --->然后实现button1的导入数据功能：
  2027. void COffDemoDlg::OnButton1() 
  2028. {
  2030. // TODO: Add your control notification handler code here
  2031. _ConnectionPtr conn;
  2032. conn.CreateInstance(__uuidof(Connection));
  2033. conn->Open(_bstr_t("Provider=OraOLEDB.Oracle.1;User Id=csd0910;Data Source=lisongtao"),"",_bstr_t("csd0910"),-1);
  2035. _RecordsetPtr rs;
  2036. rs.CreateInstance(__uuidof(Recordset));
  2037. _bstr_t sqlobj("select * from mybooks");
  2038. rs->Open((_variant_t)sqlobj,
  2039. _variant_t((IDispatch *)conn,true),//这样写比较麻烦
  2040. adOpenStatic,
  2041. adLockOptimistic,//与UpdateBatch关联
  2042. -1);
  2043.     //显示第一条记录；
  2044. if(!rs->adEOF)
  2045. {
  2046. _variant_t isbn=rs->GetCollect("BOOKISNB");
  2048. }
  2050.   1.2项目OffDemo02改进01的open()方法的参数：
  2051. rs->Open((_variant_t)sqlobj,
  2052. conn.GetInterfacePtr(),//改进的参数
  2053. adOpenStatic,adLockOptimistic,-1);
  2055.   1.3项目OffDemo03在02的基础上把几个变量声明到头文件及添加三个按钮功能及一个方法(简化button1的代码)：
  2056. public:
  2057. void show();
  2058. _RecordsetPtr rs;
  2060. void COffDemoDlg::OnButton1() 
  2061. {
  2063. // TODO: Add your control notification handler code here
  2064. _ConnectionPtr conn;
  2065. conn.CreateInstance(__uuidof(Connection));
  2066. conn->Open(_bstr_t("Provider=OraOLEDB.Oracle.1;User Id=csd0910;Data Source=lisongtao"),"",_bstr_t("csd0910"),-1);
  2069. rs.CreateInstance(__uuidof(Recordset));
  2070. _bstr_t sqlobj("select * from mybooks");
  2071. rs->Open((_variant_t)sqlobj,conn.GetInterfacePtr(),adOpenStatic,adLockOptimistic,-1);
  2072.     //显示第一条记录；
  2073. this->show();
  2074. }
  2075. //显示数据，默认为第一条
  2076. void COffDemoDlg::show()
  2077. {
  2078. if(!rs->adEOF && !rs->BOF)
  2079. {
  2080. this->m_isbn=(UINT)(long)(rs->GetCollect("BOOKISNB"));
  2081. this->m_name=(CString)(LPCTSTR)(_bstr_t)(rs->GetCollect("BOOKNAME"));
  2082. this->UpdateData(FALSE);//(更新后)把数据送到文本框
  2083. }
  2084. }
  2085. //查看后一条数据
  2086. void COffDemoDlg::OnButton7() 
  2087. {
  2088. // TODO: Add your control notification handler code here
  2089. if(!rs->adEOF)
  2090. {
  2091. rs->MoveNext();
  2092. show();
  2093. }
  2094. else
  2095. {
  2096. MessageBox("End!!!");
  2097. }
  2098. }
  2099. //查看前一条数据
  2100. void COffDemoDlg::OnButton6() 
  2101. {
  2102. // TODO: Add your control notification handler code here
  2103. if(!rs->BOF)
  2104. {
  2105. rs->MovePrevious();
  2106. show();
  2107. }
  2108. else
  2109. {
  2110. MessageBox("Begin!!!");
  2111. }
  2112. }
  2113. //显示第一条数据
  2114. void COffDemoDlg::OnButton9() 
  2115. {
  2116. // TODO: Add your control notification handler code here
  2117. if(!rs->BOF)
  2118. {
  2119. rs->MoveFirst();
  2120. show();
  2121. }
  2122. else
  2123. {
  2124. MessageBox("Begin!!!");
  2125. }
  2126. }
  2129.   1.4项目OffDemo05增加两个按钮功能：
  2130. //新增记录时先清空文本框
  2131. void COffDemoDlg::OnButton3() 
  2132. {
  2133. // TODO: Add your control notification handler code here
  2134. this->m_isbn=0;
  2135. this->m_name="";
  2136. this->m_author="";
  2137. this->UpdateData(FALSE);//(更新后)把数据送到文本框
  2138. }
  2139. //更新数据库数据
  2140. void COffDemoDlg::OnButton2() 
  2141. {
  2142. // TODO: Add your control notification handler code here
  2143. this->UpdateData(TRUE);
  2144. this->rs->AddNew();
  2145. this->rs->GetFields()->GetItem("BookIsnb")->Value=_variant_t((long)(this->m_isbn));
  2146. this->rs->GetFields()->GetItem("BookName")->Value=_variant_t(this->m_name.AllocSysString());
  2147. this->rs->GetFields()->GetItem("BookIsnb")->Value=_variant_t(this->m_author.AllocSysString());
  2148. this->rs->Update();
  2149. this->rs->UpdateBatch(adAffectAll);
  2150. }
  2152.   1.5项目OffDemo06增加两个按钮功能：
  2153. //删除数据库数据
  2154. void COffDemoDlg::OnButton4() 
  2155. {
  2156. // TODO: Add your control notification handler code here
  2157. this->rs->Delete(adAffectCurrent);
  2158. this->rs->Update();
  2159. this->rs->UpdateBatch(adAffectAll);
  2160. }
  2161. //更改数据
  2162. void COffDemoDlg::OnButton5() 
  2163. {
  2164. // TODO: Add your control notification handler code here
  2165. this->UpdateData(TRUE);
  2166. this->rs->GetFields()->GetItem("BookIsnb")->Value=_variant_t((long)(this->m_isbn));
  2167. this->rs->GetFields()->GetItem("BookName")->Value=_variant_t(this->m_name.AllocSysString());
  2168. this->rs->GetFields()->GetItem("BookAuthor")->Value=_variant_t(this->m_author.AllocSysString());
  2169. this->rs->Update();
  2170. this->rs->UpdateBatch(adAffectAll);
  2172. }
  2176. 2.对话框项目SafeArrayDemo01添加一个按钮(函数与图片保存到数据库有关)：
  2177. void CSafeArrayDemoDlg::OnButton1() 
  2178. {
  2179. // TODO: Add your control notification handler code here
  2180. //安全数组定义
  2181. SAFEARRAYBOUND bound[1];
  2182. bound[0].lLbound=0;
  2183. bound[0].cElements=10;
  2184. SAFEARRAY* pArray=::SafeArrayCreate(VT_UI1,1,bound);
  2185. //安全数组赋值；
  2186. BYTE* pCommon=new BYTE[10];//连续的内存
  2187. for(int i=0;i<10;i++)
  2188. {
  2189. pCommon[i]=i;
  2190. }
  2191. for(long j=0;j<10;j++)
  2192. {
  2193. SafeArrayPutElement(pArray,&j,pCommon++);
  2194. }
  2195. //访问安全数组；
  2196. BYTE* pBuffer=NULL;
  2197. SafeArrayAccessData(pArray,(void **)&pBuffer);
  2198. for(int k=0;k<pArray->rgsabound->cElements;k++)
  2199. {
  2200. BYTE bTemp=pBuffer[k];
  2201. }
  2202. SafeArrayUnaccessData(pArray);
  2203. //释放安全数组；
  2204.     SafeArrayDestroy(pArray);
  2205. }
  2209. 3.对话框项目DemoBlobInsert01保存及读取图片的相关数据库操作按钮功能：
  2210. 先初始化环境：
  2211. ::CoInitialize(NULL);//初始化
  2212.   3.1项目DemoBlobInsert01为实现保存功能：
  2213. --->实现图片保存数据库按钮功能：
  2214. void CDemoBlobInsertDlg::OnButton1() 
  2215. {
  2216. // TODO: Add your control notification handler code here
  2217. CString strPath="c:\source.bmp";//图片路径
  2218. _ConnectionPtr conn;//连接智能指针
  2219. conn.CreateInstance(__uuidof(Connection));
  2220. //连接数据库源相关参数
  2221. conn->Open(_bstr_t("Provider=OraOLEDB.Oracle.1;User Id=scott;Data Source=tarena"),_bstr_t(""),_bstr_t("tiger"),-1);
  2222. _RecordsetPtr rs;//对应查询结果链表
  2223. rs.CreateInstance(__uuidof(Recordset));
  2224. //与前面项目相同的地方(离线数据库操作)
  2225. rs->Open(_variant_t("select * from ocyIMGBooks"),
  2226. conn.GetInterfacePtr(),
  2227. adOpenDynamic,
  2228. adLockPessimistic,
  2229. adCmdText);
  2230. rs->AddNew();//添加一个新节点
  2231. //首先插入非BLOB字段；
  2232. rs->Fields->GetItem(_variant_t("BookISNB"))->Value=_variant_t((long)123);
  2233. rs->Fields->GetItem(_variant_t("BookName"))->Value=_variant_t("adsf");
  2234. rs->Fields->GetItem(_variant_t("BookAuthor"))->Value=_variant_t("adsf");
  2235. //插入BLOB字段；
  2236. int iBufferSize=1024*200;//图片大小
  2237. BYTE* pBuffer=new BYTE[iBufferSize];
  2238. SAFEARRAYBOUND bd[1];
  2239. bd[0].cElements=iBufferSize;
  2240. bd[0].lLbound=0;
  2241. SAFEARRAY* pArray=SafeArrayCreate(VT_UI1,1,bd);
  2242. //打开文件
  2243.  CFile fsource;
  2244.  CFileException ex;
  2245.  fsource.Open(strPath,CFile::modeRead,&ex);
  2246.  int iReaded=0;
  2247.  do 
  2248.  {
  2249. BYTE* pTemp=pBuffer;
  2250. iReaded=fsource.Read(pBuffer,iBufferSize);//读取二进制文件
  2251. for(long i=0;i<iReaded;i++)
  2252. {
  2253. SafeArrayPutElement(pArray,&i,pTemp++);//复制二进制文件
  2254. }
  2255. VARIANT mydata;
  2256. mydata.vt=VT_ARRAY|VT_UI1;
  2257. mydata.parray=pArray;//复制二进制文件
  2258. rs->Fields->GetItem("BookImage")->AppendChunk(mydata);//添加二进制文件
  2259.  } while (iReaded==iBufferSize);
  2260.  rs->Update();
  2261.  rs->Close();
  2262.  conn->Close();
  2263.  MessageBox("ok");
  2264. }
  2267.   3.2项目DemoBlobInsert02为实现读取功能：
  2269. void CDemoBlobInsertDlg::OnButton2() 
  2270. {
  2271. // TODO: Add your control notification handler code here
  2272. CString strPath="c:\source_bak.bmp";
  2273. _ConnectionPtr conn;
  2274. conn.CreateInstance(__uuidof(Connection));
  2275. conn->Open(_bstr_t("Provider=OraOLEDB.Oracle.1;User Id=scott;Data Source=tarena"),_bstr_t(""),_bstr_t("tiger"),-1);
  2276. _RecordsetPtr rs;
  2277. rs.CreateInstance(__uuidof(Recordset));
  2278. //查询指定数据操作相关
  2279. rs->Open(_variant_t("select * from ocyIMGBooks where Bookisnb=123"),
  2280. conn.GetInterfacePtr(),
  2281. adOpenDynamic,
  2282. adLockPessimistic,
  2283. adCmdText);
  2284. //打开文件
  2285. CFile fTarget;
  2286. CFileException ex;
  2287. fTarget.Open(strPath,CFile::modeCreate|CFile::modeWrite,&ex);
  2289. int iBufferSize=1024*100;
  2290. _variant_t vt;//不能是VARIANT类型
  2291. int iReaded=0;
  2292. //读数据
  2293. if(!rs->adEOF)
  2294. {
  2295. long iAllSize=rs->GetFields()->GetItem("BookImage")->ActualSize;
  2296. int iReadedAll=0;
  2297.   do{
  2298.   BYTE* pBuf=NULL;
  2299.   vt=rs->Fields->GetItem("BookImage")->GetChunk(1024*100);
  2300.   iReaded=vt.parray->rgsabound->cElements;
  2301.   SafeArrayAccessData(vt.parray,(void **)&pBuf);//安全数组指针指向一般指针
  2302.   fTarget.Write(pBuf,iReaded);
  2303.   fTarget.Flush();
  2304.   SafeArrayUnaccessData(vt.parray);//关闭安全数组
  2305. iReadedAll+=iReaded;
  2306.   }while(iReadedAll<iAllSize);
  2307. }
  2308. rs->Close();
  2309. conn->Close();
  2310. fTarget.Close();
  2311. MessageBox("ok!");
  2312. }
  2315. ---03.07---------------------day18---------------------------------
  2317. 1.项目DemoBlobInsert01修改day17中把图片读入数据库出现的一个BUG：
  2318. void CDemoBlobInsertDlg::OnButton1() 
  2319. {
  2320. // TODO: Add your control notification handler code here
  2321. CString strPath="c:\source.bmp";//读取图片路径
  2322. _ConnectionPtr conn;//连接数据库智能指针
  2323. conn.CreateInstance(__uuidof(Connection));//生成连接实例
  2324. //打开的数据源
  2325. conn->Open(_bstr_t("Provider=OraOLEDB.Oracle.1;User Id=scott;Data Source=abc"),_bstr_t(""),_bstr_t("tiger"),-1);
  2326. _RecordsetPtr rs;//对应查询结果的链表
  2327. rs.CreateInstance(__uuidof(Recordset));//生成查询实例
  2328. //查询字句及打开方式
  2329. rs->Open(_variant_t("select * from MyIMGBooks"),
  2330. conn.GetInterfacePtr(),
  2331. adOpenDynamic,
  2332. adLockPessimistic,
  2333. adCmdText);
  2334. rs->AddNew();
  2335. //首先插入非BLOB字段；
  2336. rs->Fields->GetItem(_variant_t("BookISNB"))->Value=_variant_t((long)123);
  2337. rs->Fields->GetItem(_variant_t("BookName"))->Value=_variant_t("adsf");
  2338. rs->Fields->GetItem(_variant_t("BookAuthor"))->Value=_variant_t("adsf");
  2339. //插入BLOB字段；
  2340. int iBufferSize=1024*200;//一次读取内存200K个字节
  2341. BYTE* pBuffer=new BYTE[iBufferSize];//连续的字节内存空间
  2342. SAFEARRAYBOUND bd[1];//设定安全数组边界
  2343. bd[0].cElements=iBufferSize;//安全数组最大下标200K
  2344. bd[0].lLbound=0;
  2345. //创建字节、1维、指定边界的安全数组
  2346. SAFEARRAY* pArray=SafeArrayCreate(VT_UI1,1,bd);
  2347. //打开文件
  2348.  CFile fsource;
  2349.  CFileException ex;//异常保存
  2350.  fsource.Open(strPath,CFile::modeRead,&ex);
  2351.  int iReaded=0;
  2352.  do 
  2353.  {//获取连续字节内存的首地址
  2354. BYTE* pTemp=pBuffer;
  2355. //以指定大小200K读取图片到连续内存中，iReaded为读到数据的实际大小(最后一次不一定是200K)
  2356. iReaded=fsource.Read(pBuffer,iBufferSize);
  2357. //修改BUG；如果iReaded最后一次不是200K就要出现指定符合iReaded大小边界的安全数组
  2358. if(iReaded!=iBufferSize)
  2359. {
  2360. SafeArrayDestroy(pArray);//清空之前的安全数组
  2361. pArray=NULL;
  2362. SAFEARRAYBOUND bd1[1];
  2363. bd1[0].cElements=iReaded;//指定符合iReaded大小边界的安全数组
  2364. bd1[0].lLbound=0;
  2365. pArray=SafeArrayCreate(VT_UI1,1,bd1);
  2366. }
  2367. for(long i=0;i<iReaded;i++)
  2368. {//把连续内存中的二进制数据复制到安全数组中去
  2369. SafeArrayPutElement(pArray,&i,pTemp++);
  2370. }
  2371. VARIANT mydata;//智能型数据
  2372. mydata.vt=VT_ARRAY|VT_UI1;//数组及字节类型
  2373. mydata.parray=pArray;//获取(保存图片二进制数据)安全数组入口
  2374. //根据属性名索引把mydata中的图片二进制数据上传(追加)到数据库
  2375. rs->Fields->GetItem("BookImage")->AppendChunk(mydata);
  2376.  } while (iReaded==iBufferSize);
  2377. //更新数据库
  2378.  rs->Update();
  2379.  rs->Close();
  2380.  conn->Close();
  2381.  MessageBox("ok");
  2382. }
  2384. 2.项目AddressAdmin做一个包含(连接数据库)包含数据、图片、(各种功能)按钮的简易的人事管理系统：
  2385.   2.1项目AddressAdmin01只做了对话框界面。
  2387.   2.2项目AddressAdmin02~04图片显示按钮功能初级代码：
  2388. 在标准头文件中添加#include <afxdlgs.h>//CFileDialog的头文件
  2389. 在头文件中声明一个方法和一个变量(在构造函数中初始化)：
  2390. public:
  2391. HBITMAP ShowImage();
  2392. LPSTR  pBuffer;
  2393. void CAddressAdminDlg::OnButton8() 
  2394. {
  2395. // TODO: Add your control notification handler code here
  2396. CFileDialog dlg(TRUE);//打开一个浏览框(选择图片)
  2397. dlg.DoModal();//弹出对话框有效
  2398. CString strFilePath=dlg.GetPathName();//获取该图片的路径(空则为0)
  2399. if(strFilePath.GetLength()>0) //地址有效的时候
  2400. {
  2401. CFile fsource;
  2402. CFileException fex;
  2403. fsource.Open(strFilePath,CFile::modeRead,&fex);//读取的方式打开
  2404. int iSize=fsource.GetLength();//获取图片大小
  2405. if(this->pBuffer!=NULL)//pBuffer在头文件中已定义并在构造函数中初始化了
  2406. {
  2407. delete this->pBuffer;
  2408. this->pBuffer=NULL;
  2409. }
  2410. this->pBuffer=new CHAR[iSize];//连续的字符内存空间
  2411. fsource.Read(this->pBuffer,iSize);//读到缓冲区
  2412. }
  2413. //显示图片；
  2414. this->ShowImage();
  2415. }
  2416. HBITMAP CAddressAdminDlg::ShowImage()
  2417. {
  2418. LPSTR pTempBuffer=this->pBuffer;//由上面的步骤，pBuffer已获取图片二进制数据
  2419. BITMAPFILEHEADER bf;//要过滤的文件头
  2420. int leng=sizeof(bf);//获取要过滤的文件头的长度
  2421. LPSTR pInfor=pTempBuffer+leng;//指针移动指定的长度即把文件头给过滤掉了
  2423. BITMAPINFOHEADER& pInfHeader=*(LPBITMAPINFOHEADER)(pInfor);//强转成bmp格式类型
  2424. BITMAPINFO&       pInfo     =*(LPBITMAPINFO)(pInfor);//再转
  2425. LPVOID            pRGBData  =(LPVOID)(pInfo.bmiColors);//void类型指针
  2427. CClientDC dc(this);//用于在窗口客户区画图
  2428. HBITMAP hResult=CreateDIBitmap(dc.m_hDC,&pInfHeader,CBM_INIT,pRGBData,&pInfo,DIB_RGB_COLORS);
  2429. return hResult;
  2430. //BITMAPFILEHEADER;  //*.bmp文件头；
  2431. //BITMAPINFOHEADER;  //*.bmp格式的信息头；
  2432. //BITMAPINFO;        //*.bmp格式主体；
  2433. //RGBQUAD            //*.bmp像素格式；
  2434. }
  2436. //在OnPaint()中调用，真正的显示图片到Cstatic中
  2437. void CAddressAdminDlg::show()
  2438. {
  2439. if(this->p_CurrentImag!=NULL)//获取图片信息无误
  2440. {
  2441. CStatic* pStc=(CStatic*)this->GetDlgItem(IDC_STATICimg);
  2442. CPaintDC dc(pStc);
  2443. RECT rt;//定义矩形的左上角坐标和右下角坐标
  2444. pStc->GetClientRect(&rt);
  2445. CDC MemDc;
  2446. //用于在向实际的兼容设备表面发送图象之前在内存中作好准备
  2447. MemDc.CreateCompatibleDC(&dc);//该函数仅用于创建与支持光栅操作的设备上下文
  2448. HBITMAP pTemp=(HBITMAP)MemDc.SelectObject(this->p_CurrentImag);
  2450. dc.BitBlt(0,//指定目标矩形左上角的逻辑横坐标
  2451.                0,//指定目标矩形左上角的逻辑纵坐标
  2452. rt.right,//指定目标矩形和源位图的宽度
  2453. rt.bottom,//指定目标矩形和源位图的高度
  2454. &MemDc,//指向CDC对象的指针，标识待拷贝位图的设备上下文
  2455. 0,//指定源位图左上角的逻辑横坐标
  2456. 0,//指定源位图左上角的逻辑纵坐标
  2457. SRCCOPY);//指定要执行的光栅操作
  2458. MemDc.SelectObject(pTemp);//返回被替代的对象的指针
  2459. }
  2460. }
  2462.   2.3项目AddressAdmin05~06实现按钮update上传数据到数据库功能：
  2463. 在OnInitDialog()中添加 ::CoInitialize(NULL);//数据库环境初始化
  2464. //update上传数据到服务器数据库
  2465. void CAddressAdminDlg::OnButton6() 
  2466. {
  2467. // TODO: Add your control notification handler code here
  2468. this->UpdateData(TRUE);//获取文本框数据
  2469. _ConnectionPtr conn;
  2470. conn.CreateInstance(__uuidof(Connection));
  2471. conn->Open(_bstr_t("Provider=OraOLEDB.Oracle.1;User Id=scott;Data Source=tarena"),_bstr_t(""),_bstr_t("tiger"),-1);
  2472. _RecordsetPtr rs;
  2473. rs.CreateInstance(__uuidof(Recordset));
  2474. rs->Open(_variant_t("select * from MyAddress_ocy"),conn.GetInterfacePtr(),adOpenDynamic,adLockPessimistic,adCmdText);
  2475. rs->AddNew();//添加一个新节点
  2476. //添加非B数据
  2477. rs->GetFields()->GetItem(_variant_t("addr_name"))->Value=_variant_t(this->m_name.AllocSysString());
  2478. rs->GetFields()->GetItem(_variant_t("addr_sex"))->Value=_variant_t(this->m_sex.AllocSysString());
  2479. rs->GetFields()->GetItem(_variant_t("addr_address"))->Value=_variant_t(this->m_address.AllocSysString());
  2480. rs->GetFields()->GetItem(_variant_t("addr_age"))->Value=_variant_t(this->m_age);
  2481. //写b字段；
  2482. SAFEARRAYBOUND bd[1];
  2483. bd[0].lLbound=0;
  2484. bd[0].cElements=this->iSize;//安全数组大小声明为long类型
  2485. SAFEARRAY* pArray=SafeArrayCreate(VT_UI1,1,bd);//初级安全数组
  2486. char* pTemp=(char*)(this->pBuffer);//指向含有图片数据的缓冲区
  2487. for(long i=0;i<iSize;i++)
  2488. {
  2489. SafeArrayPutElement(pArray,&i,pTemp++);//拷贝给安全数组
  2490. }
  2491. VARIANT abc;
  2492. abc.vt=VT_ARRAY | VT_UI1;
  2493. abc.parray=pArray;
  2494. try{
  2495. FieldPtr fld=rs->Fields->GetItem("addr_Picture");
  2496. fld->AppendChunk(abc);//安全数组的数据添加到服务器
  2497. }
  2498. catch(_com_error ex)
  2499. {
  2500. int i=0;
  2501. i++;
  2502. }
  2504. rs->Update();
  2505. rs->Close();
  2506. conn->Close();
  2507. }
  2510.   2.4项目AddressAdmin07打开对话框时即可看到第一条数据信息：
  2511. 在初始化函数OnInitDialog()中添加可实现该功能：
  2513. //连接数据库，把button6 连接数据库的句子搬到这来
  2514. conn.CreateInstance(__uuidof(Connection));
  2515. conn->Open(_bstr_t("Provider=OraOLEDB.Oracle.1;User Id=scott;Data Source=tarena"),_bstr_t(""),_bstr_t("tiger"),-1);
  2517. rs.CreateInstance(__uuidof(Recordset));
  2518. rs->Open(_variant_t("select * from MyAddress_ocy"),conn.GetInterfacePtr(),adOpenDynamic,adLockPessimistic,adCmdText);
  2520.     //提取第一条记录；=====>以下在项目AddressAdmin09中该为ShowData()代码用this->ShowData();取代
  2521. if(!rs->adEOF)//判断是否有数据
  2522. {//根据属性名赋值
  2523. _variant_t vtname=rs->Fields->GetItem("addr_name")->Value;
  2524. _variant_t vtage=rs->Fields->GetItem("addr_age")->Value;
  2525. _variant_t vtsex=rs->Fields->GetItem("addr_sex")->Value;
  2526. _variant_t vtaddress=rs->Fields->GetItem("addr_address")->Value;
  2527. //万能型转成所需的内存数据类型
  2528. this->m_age=vtage.lVal;
  2529. this->m_name=CString(vtname.bstrVal);
  2530. this->m_sex=CString(vtsex.bstrVal);
  2531. this->m_address=CString(vtaddress.bstrVal);
  2532. this->UpdateData(FALSE);//上传内存数据到对话框
  2533. this->iSize=rs->Fields->GetItem("addr_picture")->ActualSize;//获取图片大小
  2534. if(this->pBuffer!=NULL)//目的是在下一步前确保>pBuffer为空
  2535. {
  2536. delete this->pBuffer;
  2537. this->pBuffer=NULL;
  2538. }
  2539. this->pBuffer=new CHAR[this->iSize];//开辟和图片大小一致的内存
  2540. //复制图片二进制数据到万能指针中
  2541. _variant_t vtdata=rs->Fields->GetItem("addr_picture")->GetChunk(this->iSize);
  2542. BYTE* pTemp=NULL;
  2543. //万能指针类型转成一般类型
  2544. SafeArrayAccessData(vtdata.parray,(void **)&pTemp);
  2545. //内存复制
  2546. memcpy(this->pBuffer,pTemp,this->iSize);
  2547. //解开安全数组的锁
  2548. SafeArrayUnaccessData(vtdata.parray);
  2549. //显示图片；
  2550. this->p_CurrentImag=this->ShowImage();
  2551. //刷新屏幕；关联静态控件
  2552. CStatic* pDc=(CStatic*)(this->GetDlgItem(IDC_STATICimg));
  2553. pDc->Invalidate();
  2555.   2.5项目AddressAdmin09添加两个按钮功能及数据刷新：
  2556. void CAddressAdminDlg::ShowData()
  2557. {
  2558.     //提取第一条记录；
  2559. if(!rs->adEOF && !rs->BOF)
  2560. {
  2561. _variant_t vtname=rs->Fields->GetItem("addr_name")->Value;
  2562. _variant_t vtage=rs->Fields->GetItem("addr_age")->Value;
  2563. _variant_t vtsex=rs->Fields->GetItem("addr_sex")->Value;
  2564. _variant_t vtaddress=rs->Fields->GetItem("addr_address")->Value;
  2565. this->m_age=vtage.lVal;
  2566. this->m_name=CString(vtname.bstrVal);
  2567. this->m_sex=CString(vtsex.bstrVal);
  2568. this->m_address=CString(vtaddress.bstrVal);
  2569. this->UpdateData(FALSE);
  2570. this->iSize=rs->Fields->GetItem("addr_picture")->ActualSize;
  2571. if(this->pBuffer!=NULL)
  2572. {
  2573. delete this->pBuffer;
  2574. this->pBuffer=NULL;
  2575. }
  2576. this->pBuffer=new CHAR[this->iSize];
  2577. _variant_t vtdata=rs->Fields->GetItem("addr_picture")->GetChunk(this->iSize);
  2578. BYTE* pTemp=NULL;
  2579. SafeArrayAccessData(vtdata.parray,(void **)&pTemp);
  2580. memcpy(this->pBuffer,pTemp,this->iSize);
  2581. SafeArrayUnaccessData(vtdata.parray);
  2582. //显示图片；
  2583. this->p_CurrentImag=this->ShowImage();
  2584. //刷新屏幕；
  2585. CStatic* pDc=(CStatic*)(this->GetDlgItem(IDC_STATICimg));
  2586. pDc->Invalidate();
  2587. this->Invalidate(FALSE);
  2588. }
  2589. }
  2590. //显示下一条数据信息
  2591. void CAddressAdminDlg::OnButton3() 
  2592. {
  2593. // TODO: Add your control notification handler code here
  2594. if(!this->rs->adEOF)
  2595. {
  2596. this->rs->MoveNext();//往下移
  2597. this->ShowData();
  2598. }
  2599. }
  2600. //显示上一条数据信息
  2601. void CAddressAdminDlg::OnButton2() 
  2602. {
  2603. // TODO: Add your control notification handler code here
  2604. if(!this->rs->BOF)
  2605. {
  2606. this->rs->MovePrevious();//往上移
  2607. this->ShowData();
  2608. }
  2609. }
  2612.   2.6项目AddressAdmin10添加删除、更该功能按钮功能：
  2613. //删除数据
  2614. void CAddressAdminDlg::OnButton7() 
  2615. {
  2616. // TODO: Add your control notification handler code here
  2617. if(!this->rs->adEOF && !this->rs->BOF)
  2618. {
  2619. this->rs->Delete(adAffectCurrent);
  2620. this->rs->Update();
  2621. this->rs->MoveNext();
  2622. this->ShowData();
  2623. }
  2624. }
  2625. //更改数据
  2626. void CAddressAdminDlg::OnButton9() 
  2627. {
  2628. // TODO: Add your control notification handler code here
  2629. this->UpdateData();
  2630. rs->GetFields()->GetItem(_variant_t("addr_name"))->Value=_variant_t(this->m_name.AllocSysString());
  2631. rs->GetFields()->GetItem(_variant_t("addr_sex"))->Value=_variant_t(this->m_sex.AllocSysString());
  2632. rs->GetFields()->GetItem(_variant_t("addr_address"))->Value=_variant_t(this->m_address.AllocSysString());
  2633. rs->GetFields()->GetItem(_variant_t("addr_age"))->Value=_variant_t(this->m_age);
  2634. rs->Update();
  2635. }