[AccessD] Database in Use

I'm trying to run some code in an AXP database and get the error:  "Could not use db1.mdb; file already in use."

I have the database opened exclusively.  I can run everything fine in A97.  Here's code attached to the command button:

Private Sub cmdSelect_Click()
On Error GoTo Err_cmdSelect_Click

DoCmd.SetWarnings (False)
DoCmd.OpenQuery "DelTbls"
DoCmd.SetWarnings (True)
ListAvailableTables ("U:\Suppliers\Pepsi\amerinet.mdb")
lstTableNames.Requery
MsgBox "Double Click on Table to Import."

Exit_cmdSelect_Click:
    Exit Sub

Err_cmdSelect_Click:
    MsgBox Err.Description
    Resume Exit_cmdSelect_Click
    
End Sub

ListAvailableTables is a module.  If someone needs to see that, I can send offline or post here.

Any ideas?  This AXP is driving me crazy - so many things I did OK in 97 I run into problems with in XP.

Thanks for any help.

Terri Jarus
Director, Contract Support Services
jarus at amerinet-gpo.com
314-542-1902

**********************************************************************


---------------------------------------------------------------------------
This email and any files transmitted with it are confidential and
intended solely for the use of the individuals or entities to whom they
are addressed. If you have received this email in error please return 
it to the sender, and erase any copies thereof.
Copyright 2003 AmeriNet 1nc.