我试着写了一个用ADO访问paradox和Acess的数据,但程序退出时,还有一些资源在内存里,再次运行时报系统已经运行。
所有的连接都关闭了。
If App.PrevInstance = True Then
MsgBox " 系统巳在运行中 !!! ", vbQuestion
End
End If
有什么方法可以跟踪有哪些东东没有释放了?
一般在退出程序时,要注意释放哪些东东?
...全文
2111打赏收藏
怎么没有人知道这个问题?
我试着写了一个用ADO访问paradox和Acess的数据,但程序退出时,还有一些资源在内存里,再次运行时报系统已经运行。 所有的连接都关闭了。 If App.PrevInstance = True Then MsgBox " 系统巳在运行中 !!! ", vbQuestion End End If 有什么方法可以跟踪有哪些东东没有释放了? 一般在退出程序时,要注意释放哪些东东?
关闭集合中的所有数据源,这是DAO的方法
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