Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Initiate code with external database closes?? 1

Status
Not open for further replies.

xsnrg

Technical User
Jun 15, 2004
44
US
I have a timer code that does the following...
1. Sets a time value to now
2. Performs an action
3. Sets an end time value to now
4. Displays message box with elapsed time

Very simple...

However, I have some actions that take place in an external database.

I have code that opens an external database. Upon opening, that other database runs code and then closes. How can I set code in my front end database to run when the other database closes...
OR
How can I put a pause between steps 2 and 3 above and have my code wait until the other database has closed to resume?



McLean Jones
buddycenters.org
"Believing is Seeing
 
Check for the ldb file...

e.g.

Code:
Dim strYourDB as String
dim strCheckFile as String

strYourDB = "C:\Mydb.mdb"

        'Check if ldb file exists..
        strCheckFile = Dir(Left(strYourDB, Len(strYourDB) - 3) & "ldb")
        If strCheckFile > "" Then
            Do While strCheckFileNotLocked > ""
        strCheckFile = Dir(Left(strYourDB, Len(strYourDB) - 3) & "ldb")
            Loop
        End If


hth's

------------------------
Hit any User to continue
 
Sorry cocked up on one of the variables (comes from ripping my own DB to shreads :D)

Do While strCheckFile > ""
strCheckFile = Dir(Left(strYourDB, Len(strYourDB) - 3) & "ldb")
Loop

... :D

------------------------
Hit any User to continue
 
Fantastic help!
That works great. Didn't even think about looking for the ldb file. Great idea and very simple. :)

McLean Jones
buddycenters.org
"Believing is Seeing
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top