说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

用VB实现关闭所有数据库对象

HTML文档下载 WORD文档下载 PDF文档下载
用VB实现关闭所有数据库对象
作者:李广
如果你在程序中使用了任何数据库对象(DAO, RDO, 或者 ADO), 在退出程序之前,你必须确认已经关闭掉了所有已经打开的记录、数据库和数据工作台(recordsets, databases, and workspaces)。虽然退出程序时这些对象的指针都被自动施放了,但是如果你自己又不能确认是否真正地释放了打开的数据库对象,那么就有可能数据库连接没有马上被释放掉,从而被这些对象所占用的内存就再也不能被操作系统再次分配。
---- 下面有一段放在Form_Unload 事件(或者其他退出模块中)中的一小段代码例子,它演示了关闭所有打开的DAO 工作台、数据库和记录并释放了被这些对象占用的内存。当你退出FORM时,不论在有一个、100个甚至没有数据库连接时都可以使用下面代码。

Private Sub Form_Unload(Cancel As Integer)

' 关闭数据库对象并且释放内存

On Error Resume Next

Dim ws As Workspace
Dim db As Database
Dim rs As Recordset

For Each ws In Workspaces
For Each db In ws.Databases
For Each rs In db.Recordsets
rs.Close
Set rs = Nothing
Next
db.Close
Set db = Nothing
Next
ws.Close
Set ws = Nothing
Next
End Sub

2013年终盘点:10款最精巧的硬件开发板 SquareWear:可替代Lilypad Arduino的开发板 开放数据:2014年最热门的竞争领域 IE11虚拟机免费面向广大开发者 九城搭建的一个以Hadoop为基础的大数据平台 Windows 8复杂性的代价到底有多大? 在发布前,第一代iPhone其实并不完善 市场占有率调查:iOS 7秒杀Android 4.4 AWS会赢、OpenStack会消亡、Connected Cars可防僵尸攻击 谷歌以32亿美金收购iPod之父的创业公司Nest 物联网时代来临 微软2014,有你期待的吗? 映趣科技发布inWatch Z/inWatch X 后者采用全彩透明柔性屏 程序员没有天才:暴风影音首席架构师鲍金龙访谈 开放式创新改变世界——OpenStack生态系统将重新洗牌 Java 8最终发布日期敲定,即使有bug也要发布 Meteor PK Django,谁更适合开发实时Web应用? 学编程就像选家具:去宜家还是从种树开始? 前车之鉴 十二个年度最差设计网站汇集 冷暖交替,2014年编程兴衰趋势预测 诺基亚出Android手机,微软或将受惠 苹果不收购Nest的大猜想 Netflix开源S3一致性提升利器S3mper Fi 《近匠》第06期:UCloud——目标!完整云服务 小三上位:Windows Phone不容忽视的契机 “详解Visual Studio 2013”全国巡讲北京站:无忧开发iOS及Android应用 Chrome最新版:快速静音及在Win8中建Chrome OS系统 雅虎COO Henrique de Castro因业绩不佳被解雇 分析比特币背后的数据算法,抢占背后巨大市场先机 美食菜谱将会成创业风口的两大理由 Windows XP杀毒软件更新 将被延至2015年7月 小心,商家已经盯上你了 有没有办法禁止类似用CCPROXY的非法代理? CSS的使用问题 怎样适用odbc连接远程access? DelPhi的错误! 如何通过共享Model上网? 用FileSystemObject 写多行txt,如何实现换行写入??? 你的邮箱已经被别人使用,请使用一个DOMINO服务器,如何解决? 清空文本文件 我编写了一个dos批处理文件bat,要在bat文件运行后自动关闭dos窗口怎么办? 急救:机器出问题了,大家帮忙看看 谁能谈谈XP的激活问题!? 有问题的问题1 有问题的问题 安装visual studio.net 2003 的问题? 急件!请教了,如何在一个字符串中提取第n次出现的字符? weblogic及EJB属于中间层的吗? 到水园第一件事就是看看斑竹有没有换,嘻嘻,还有谁也是这样的? win2000装好后,设了本地连接的属性,和别的机器一样的设,可就是PING 不通网关 哪有“VB.NET高级编程”和“ADO.NET高级编程”下载?? 请各位帮忙找一个用asp.net写的日历,急用 小弟是菜鸟,请问一下svrmgrl是什么,9I中有吗? 文章分页,而且文章中有大小不等的图片,该如何去做 求《三国霸业2》简体版下载地址? 诸位高手,我碰到一个很棘手ASPNETMENU的问题!急需解决!!(100分)献上! vfw下的视频采集和图象截取的问题请教! 求 《家园-惊世浩劫》简体版 关于浏览器的问题 pb如何调用word文挡? 在使用mfc时选择不同语言,怎么最后编译执行时有??符号(在菜单中) 网络共享安全问题!!!!!!!!!!!!! 我是第一次尝试做网站,碰到了问题,能帮帮我吗? 电话号码的正确性问题? 求教c#中datagrid表格设置 高分求远程开机源代码 希望大家给出: 时间的各种单位(包括汉字名称和英文缩写)及它们的进率关系; 专家近来看一下,很有针对性! 对《c# Primer Plus中文版》书的批判!!!!! 谁能提供teechart在pb中的使用帮助 是否有记录传真机传真的资料(包括传真号码,传真时间,内容) 是否有记录传真机传真的资料(包括传真号码,传真时间,内容) 急救:如何回复fdisk删除的分区 请各位帮忙找一个用asp.net写的日历,急用 我想了解‘Bug 列表‘是怎么回事,最好有例子 各位大哥请帮帮我,如何将下面的vbs转换到c#,不胜感激! 如何控制DataList显示的记录数 请教做过基于snmp方式的入侵检测系统的哥们 !!!!!!! 架构模式知多少? 请教做过基于snmp方式的入侵检测系统的哥们 !!!!!!! 请教各位大侠一个问题?? 请教做过基于snmp方式的入侵检测系统的哥们 !!!!!!! 一个初学者的麻烦! 1.若关于x的方程ax²+2(a-b)x+(b-a)=0(a≠0)有两个相等的实数根,则a:b等于 ( )A.-1或2 B1或1/2 C-1/2或1 D-2或12.已知方程x²+bx+a=0有一个根是-a(a≠0)则下列代数式的值恒为常数的是( 【数学】初三关于一元二次方程的选择题若关于x的方程x^2+mx+2=0与x^2+(m+1)x+m=0有一个相同实数根,则m的值为( )A.3B.2C.4D.-3回答时注明过程或理由 除你武器用英语怎么读 武器用英文怎么说是在句子中 武器怎么说 糯米网酒店卷过期怎么退款 糯米网团购卷怎么退款 I am not asking you to make up your mind on spot_____think about it over your lunch period.A:on spotBon the spot Is unhappy,is also not warm,may also move that Daoguang. 科学选择题~帮忙吖!1.某地地理坐标为北纬40度、东经116度,它属于( )A.南半球、西半球、中纬度 B.北半球、东半球、中纬度C.南半球、东半球、低纬度 D.北半球、西半球、低纬度2.某人发现 数学选择题吖〜谢谢各位拉吖〜 急.. 17世纪中国与西欧出现对君主专制批判,有何不同? 印尼官员警告人口暴增危险 吁政府推家eBay卖二战纳粹大屠杀时期遗物获利斯诺登:揭发情报机构监控丑闻有利于社朴槿惠时隔39年访法 会晤奥朗德磋商罗姆尼:奥巴马医保网站问题频出 有损菅义伟:处理福岛核电站事故应加强政府新书称奥巴马曾向幕僚吹嘘:我擅长杀人印度北部村落遭武装分子袭击 造成7死埃及前总统穆尔西到达受审地点 将接受法两名记者在马里遇害 遗体遍布弹孔俄总统普京将访问越南 适逢俄越潜艇交“世界杯I组”国足2 0胜马其顿17.99亿 恒大“迎娶”曹家巷假如让科比踢足球夏季紫外线强烈暴晒易患白癜风守住2055点是关键蓝光年中再发力成都楼市将再现购房热潮阆中沼气坑里现“神兽”原来是狗獾用报纸记录10多年的闺蜜情“擎天柱”带了一堆“中国脸”来抢世界打新首日冻结超1270亿今日申购依顿I组球迷,世界杯好伴侣烽城制霸异界仙石记大剑主星魂图硝烟下的远征意定乾坤遥想公瑾当年厚脸皮天使雷罚之力英雄无双牌坊街旅游开元寺旅游新街口旅游八达岭温泉度假村旅游西峰旅游南峰旅游东峰旅游北峰旅游东关街旅游巩乃斯旅游岜沙苗寨旅游
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘