请问怎么判断一个DAO对象有没有被关闭? 可以用错误处理功能On Error Goto www adocon.Close msgbox "说明是正常关闭的" Exit Subwww: msgbox "不正常关闭(数据库没有打开)" 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 对不起你说的问题是DAO的而我回答的是ADO的。但是原理是一样的。 If mRs.State = adStateOpen Then mRs.Close 是RecordSet對象的屬性嗎﹖我怎麼試了沒有這個屬性呀﹖﹖﹖ 村长哪,他们说的是ADO,而你古董的非用DAO. 不是我古董,是头要求用dao呀!苦命! 干脆不用关闭了,程序退出就数据库对象自然就关闭了。我原来应用DAO的时候就是没有关闭DAO而是从程序一开始就一直开着,程序退出就完了! if rs.state = 1 then rs.closeend if 我的RecordSet没有state属性呀!而且再说如果rs到时候已经关闭了的话。那这个方法也访问不到了呀而我的目的是判断rs/db关没关掉,可能这种方法不太适合吧btw:我用err.number捕获了一个91错,不知道他准不准确,能不能用来判断?程序例: intTemp = recRecordset.RecordCount If Err.Number = 0 Then recRecordset.Close Set recRecordset = Nothing End If就是说访问Recordcount属性的时候,如果err.number=0,就说明recrecordset没有被关闭,这去关闭它;而如果访问recordcount属性的时候recRecordset出错了,则说明recRecordset已经被关闭, err.number就会不是0(是91),就什么都不做!!不知道这种方法可靠不可靠 怎样横向打印? 怎样实现打印Picture框里的图形 EXCEL错误问题 点击webbrowser控件中网页的链接时,新网页会在ie中打开,如何使新网页在webbrowser控件中打开呢? 如何在WIN98和WIN2000中屏蔽CTRL-ALT-DELETE呢? 请教大虾,如何在vb程序中捕获因文件名相同系统产生的信息?急!!在线等 请问各位,怎样将控件打包成.CAB文件???急急! 如何在VB中把Excel单元格设置成文字 关于字段更新的问题??? 那位高手前来打救我阿~~~关于调用dll的问题 关于复制,粘贴的问题(高分求助) 如何做程序的注销功能?
但是原理是一样的。
我怎麼試了沒有這個屬性呀﹖﹖﹖
我原来应用DAO的时候就是没有关闭DAO而是从程序一开始就一直开着,程序退出就完了!
rs.close
end if
而且再说如果rs到时候已经关闭了的话。那这个方法也访问不到了呀而我的目的是判断rs/db关没关掉,可能这种方法不太适合吧btw:我用err.number捕获了一个91错,不知道他准不准确,能不能用来判断?
程序例:
intTemp = recRecordset.RecordCount
If Err.Number = 0 Then
recRecordset.Close
Set recRecordset = Nothing
End If
就是说访问Recordcount属性的时候,如果err.number=0,就说明recrecordset没有被关闭,这去关闭它;而如果访问recordcount属性的时候recRecordset出错了,则说明recRecordset已经被关闭, err.number就会不是0(是91),就什么都不做!!不知道这种方法可靠不可靠