VC中ADO操作Access数据库的实现

计算机光盘软件与应用　软件设计开发　Ｃｏｍｐｕｔｅｒ　ＣＤ　Ｓｏｆｔｗａｒｅ　ａｎｄ　Ａｐｐｌ　ｉｃａｔｉｏｎｓ　２０１０年第１Ｏ期　ＶＣ中ＡＤＯ操作Ａｃｃｅｓｓ数据库的实现　陈祖义，陶忠刚　（空军第一航空学院，河南信阳４５４０００）　摘要：本文简要介绍了在ＶＣ６．０中使用ＡＤＯ操作Ａｃｃｅｓｓ数据库的基本步骤和程序代码的实现，并列举出了关键的　实例代码。　关键词：ＡＤＯ；ＶＣ６．０；Ａｃｃｅｓｓ；Ｒｅｃｏｒｄｓｅｔ　中图分类号：ＴＰ３１１．５６　文献标识码：Ａ　文章编号：１００７—９５９９（２０１０）１０—０１５０—０１　Ｔｈｅ　Ｉｍｐｌｅｍｅｎｔａｔｉｏｎ　ｏｆ　ＡＤＯ　Ｏｐｅｒａｔｅｓ　Ａｃｃｅｓｓ　Ｄａｔａｂａｓｅ　ｉｎ　ＶＣ　Ｃｈｅｎ　Ｚｕｙｉ，Ｔａｏ　Ｚｈｏｎｇｇａｎｇ　（Ｆｉｒｓｔ　Ａｖｉａｔｉｏｎ　Ｉｎｓｔｉｔｕｔｅ　ｏｆ　Ａｉｒ　Ｆｏｒｃｅ，Ｘｉｎｙａｎｇ　４６４０００，Ｃｈｉｎａ）　Ａｂｓｔｒａｃｔ：Ｔｈｉｓ　ｐａｐｅｒ　ｄｅｓｃｒｉｂｅｓ　ｔｈｅ　ｏｐｅｒａｔｉｏｎ　ｉｎ　ＶＣ６．０　Ａｃｃｅｓｓ　ｄａｔａｂａｓｅ　ｕｓｉｎｇ　ＡＤＯ　ａｎｄ　ｔｈｅ　ｂａｓｉｃ　ｓｔｅｐｓ　ｏｆ　ｈｔｅ　ｉｍｐｌｅｍｅｎｔａｔｉｏｎ　ｃｏｄｅ，ｐａｒａｌｌｅｌ　ｈｔｅ　ｋｅｙ　ｒｅａｌ—ｅｘａｍｐｌｅ　ｃｏｄｅ．　Ｋｅｙｗｏｒｄｓ：ＡＤＯ；ＶＣ６．０；Ａｃｃｅｓｓ；Ｒｅｃｏｒｄｓｅｔ　前不久在ＶＣ６．０环境下做了一个简单的“基金利润自动计算　ｍ￣ｒｅｃｏｒｄｓｅｔ一＞Ｏｐｅｎ　ｒ　ＳＥＬＥＣＴ　ＦＲＯＭ　ｆｕｎｄ　系统”，系统的主界面如图１所示。系统采用了ＡＤＯ操作　Ａｃｃｅｓｓ数据库，ＡＤＯ操作数据库的基本流程为：依据功能要求建　ｍ￣ｃｏｎｎｅｃｔｉｏｎ．ＧｅｔＩｎｔｅｒｆａｃｅＰｔｒ　０，　立数据库和数据表；引入ＡＤＯ库定义文件；初始化ＣＯＭ库；用　ａｄＯｐｅｎＤｙｎａｍｉ　Ｃ，　Ｃｏｎｎｅｃｔｉｏｎ对象连接数据库；通过Ｃｏｎｎｅｃｔｉｏｎ、Ｃｏｍｍａｎｄ对象执　ａｄＬｏｃｋ０ｐｔｉｍｉｓｔｉＣ　行ＳＱＬ命令，或利用Ｒｅｃｏｒｄｓｅｔ对象取得结果记录集进行查询、　ａｄＣｍｄＴｅｘｔ）：　处理；关闭数据库的连接并释放对象。　）　ｌ曩——■囊——●———●●●●●●■●口　；辫　；：　；　：篇　辫茹　　ｃａｔｃｈ（ｔｏｍ　ｅｒｒｏｒ　ｅ）　ｌ　｛　ＭｅｓｓａｇｅＢｏｘ（ｅ一＞ＥｒｒｏｒＭｅｓｓａｇｅ（））：　）　～　麓　…　｝　ｌ　～一　…　一　在对话框应用程序中添加“添加”按扭的事件处理函数　Ｉ一　Ｉ……　…　ＯｎＢｕｔｔｏｎＡｄｄ０，并在此函数中添加如下代码以实现添加记录的功　…　㈣，　“　一　Ｉ　０　一　黜＿　能，其中ｍ—ｎｏ、ｒｅ＿ｎａｍｅ，ｍ＿ｐａｓｔ为基金名称，基金代码和购买时　图１基金利润自动计算系统主界面　间对应的成员变量。　一建立数据库和数据表　ＯｎＢｕｔｔｏｎＡｄｄ（）　、在本例中建立了ｆｕｎｄ数据库，在数据库中建立了ｆｕｎｄ数据　表，表中共有ｆｕｎｄ　ｎｏ（基金代码）、ｆｕｎｄ—ｎａｎｌｅ（基金名称）、　ｆｕｎｄ　ｐａｓｔｄａｙ（基金购买时间）等ｌ２个字段。　ＵｐｄａｔｅＤａｔａ　０　二、引入ＡＤＯ库定义文件　Ｔｒｙ　引入ＡＤＯ库定义文件的方法是在ｓｔｄａｆｘ．ｈ头文件中使用预处　｛　理指令，代码如下：　ｍ　ｐｒｅｃｏｒｄｓｅｔ一＞ＡｄｄＮｅｗ　０：　￣ｉｍｐｏｒｔ　Ｃ：＼Ｐｒｏｇｒａｍ　Ｆｉｌｅｓ＼Ｃｏｍｍｏｎ　Ｆｉ１ｅｓ＼Ｓｙｓｔｅｍ＼ＡＤ０＼ｍｓ　ｍＡ￣ｒｅｃｏｒｄｓｅｔ一＞ＰｕｔＣｏｌｌｅｃｔ（　ｆｕｎｄｎｏ　，ｖａｒｉａｎｔｔ（ｍ＿ｎｏ））　ａｄｏｌ５．ｄｌ１　ｎｏｍ　ｐｒｅｃｏｒｄｓｅｔ一＞ＰｕｔＣｏｌｌｅｃｔ（　ｆｕｎｄ＿ｎａｍｅ　，ｖａｒｉａｎｔ　ｔ（ｍｎａｍｅ））　ｎａｍｅｓｐａｃｅ　ｒｅｎａｍｅ（　ＥＯＦ　，　ａｄｏＥＯＦ　）：　三、初始化ＣＯＭ库　ｍＡ￣ｒｅｃｏｒｄｓｅｔ一＞ＰｕｔＣｏｌ　ｌｅｃｔ（　ｆｕｎｄＡ￣ａｓｔ　，ｖａｒｉａｎｔｔ（ｍ　ｐａｓｔ））　在ＭＦＣ中可以用Ａｆｘ０１ｅＩｎｉｔ０方法，这种方法在结束时自动　ｍ￣ｒｅｃｏｒｄｓｅｔ一＞Ｕｐｄａｔｅ（）：　关闭ｔｏｍ库。　｝　四、用Ｃｏｎｎｅｃｔｉ０１３对象连接数据库　ｃａｔｃｈ（ｃｏｍｅｒｒｏｒ：Ｉ＝ｅ）　在ＡＤＯ库中包含ＣｏｎｎｅｃｔｉｏｎＰｔｒ、　ＣｏｍｍａｎｄＰｔｒ和　｛　ＲｅｃｏｒｄｓｅｔＰｔｒ三个智能指针。首先，在对话框类中添加智能指　ＭｅｓｓａｇｅＢｏｘ（ｅ一＞ＥｒｒｏｒＭｅｓｓａｇｅ（））：　针的对象变量，其次，在对话框类的初始化函数中打开数据库的　）　连接，在０ｎＩｎｉｔＤｉａｌｏｇ　０中添加如下代码：ｍ　ｐｃｏｎｎｅｃｔｉｏｎ．Ｃｒｅａｔ　ｒｅａｄ０：　ｅＩｎｓｔａｎｃｅ（ｕｕｉｄｏｆ（Ｃｏｎｎｅｃｔｉｏｎ））：　）　ｔｒｙ　添加“删除”按扭的事件处理函数ＯｎＢｕｔｔｏｎＤｅｌｅｔｅ　０，由于　｛　篇幅代码省略。　ｍｐｃｏｎｎｅｃｔｉｏｎ一＞Ｏｐｅｎ（　Ｐｒｏｖｉｄｅｒ＝Ｍｉｃｒｏｓｏｆｔ．Ｊｅｔ．ＯＬＥＤＢ．４　添加“修改”按扭的事件处理函数０ｎＢｕｔｔｏｎＭｏｄｉｆｙ（），并在　０：Ｄａｔａ　Ｓｏｕｒｃｅ＝ｆｕｎｄ．ｍｄｂ　，　，　，ａｄＭｏｄｅＵｎｋｎｏｗｎ）：　其中添加如下代码：　｝　ＯｎＢｕｔｔｏｎＭｏｄｉｆｙ（）　ｃａｔｃｈ（ｔｏｍ　ｅｒｒｏｒ　ｅ）　｛　ｆ　ＯｎＢｕｔｔｏｎＤｅｌｅｔｅ　０：　ＭｅｓｓａｇｅＢｏｘ（　数据库连接失败，确认数据库ｆｕｎｄ．ｍｄｂ是否　ＯｎＢｕｔｔｏｎＡｄｄ　０　在当前路径下！　）：　）　六、关闭数据库的连接并释放对象　）　在关闭应用程序的时候，要关闭数据库的连接并释放对象，　五、通过Ｒｅｃｏｒｄｓｅｔ对象取得结果记录集进行操作　本例实现方法是重写ＯｎＤｅｓｔｒｏｙ０虚函数，由于篇幅代码省略。　通过Ｒｅｃｏｒｄｓｅｔ对象对结果记录集进行操作，需要打开数据　参考文献：　库中的数据表。操作可以放在对话框的初始化函数　【１】郑阿奇．ＶＩＳＵＡＬ　ｃ＋＋教程．清华大学出版社，２００５，１　ＯｎＩｎｉｔＤｉａｌｏｇ０中完成，代码如下：　【２】李闽溟．ＶＩＳＵＡＬ　ｃ＋＋６．０数据库系统开发实例导航．人民邮电出　版社，２００２，１０　【３】赵辉．ＶＩＳＵＡＬｃ＋＋系统开发实例精粹．人民邮电出版社，２００５，８