How to close database opened by adodc

Posted on 2004-08-28
Last Modified: 2013-12-25
Dear all,

I used adodc to navigate through a database but when I close the program , the lock file which is created at the time of opening database won't be deleted and it would remain as the connection to database isn't closed. I tested different codes to close the database but it wasn't successful such as adodc1.recordset.close.

Thank you,
Question by:aa_azadeh

Expert Comment

ID: 11919933
Would be good to get code for opening your db. Something is different to normal. I never got that problem.

You can unload adodc1 object and set to nothing, who about that?

Accepted Solution

jags_77 earned 250 total points
ID: 11921414
When accessing and navigating a DB the best option is via code only. My suggestion is this:

1.- Connect to your DB as you normally do with ADODC.
2.- Copy the connectionstring generated
3.- Set project-references-MS ActiveX data objects 2.0 ( minimum )
4.- Set the instances in general declarations:

dim cn as adodb.connection
dim rs as adodb.recordset

5.- Use 'em:

set cn=new adodb.connection [ connection string generated on ADODC, sorrounded in double quotes ]

set rs=new adodb.recordset [ desired query, such as " select * from books" ],cn

6.- Set bound controls:

Set text1.datasource=rs

7.- Destroy instances when not in use:
set cn=nothing
set rs=nothing

8.- enjoy the no-more-problems-with-objects DB connection....

Hope this can be useful.....


Expert Comment

ID: 11950658

I see the code above and I would like to add a single piece of code...
In any connection you have a option of close

Dim con as new ADODB.connection

similarly we have
' The line below closes the connection explicility and right way to do


'Than set to Nothing if you want to free resources
set con=nothing


Featured Post

Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Introduction While answering a recent question about filtering a custom class collection, I realized that this could be accomplished with very little code by using the ScriptControl (SC) library.  This article will introduce you to the SC library a…
Since upgrading to Office 2013 or higher installing the Smart Indenter addin will fail. This article will explain how to install it so it will work regardless of the Office version installed.
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…

820 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question