[AccessD] Open a database

Yes.  That was what I needed.  I misunderstood what the original code was doing.  

Thank you.


Gary J. Giever, M.A.
Applications Developer
ACCMHS



 --- On Wed 11/15, Heenan, Lambert < Lambert.Heenan at aig.com > wrote:
From: Heenan, Lambert [mailto: Lambert.Heenan at aig.com]
To: accessd at databaseadvisors.com
Date: Wed, 15 Nov 2006 10:58:09 -0500
Subject: Re: [AccessD] Open a database

What your code does is create an object (dbMyDB) to point to the externalmdb file. You would then be able to manipulate the tables, queries etc. inthat file via code.It sounds like you want to actually start up the other database. For thatthere are various ways. For example...Sub OpenAnotherDb()Dim strDBName As StringDim dbl_D As DoubleDim strCommandLine As String        strDBName = "C:\My Documents\ClientMasterUpdate.mdb"        strCommandLine = Quote(SysCmd(acSysCmdAccessDir) & _            "MSACCESS.EXE") & " " & Quote(strDBName )        dbl_D = Shell(strCommandLine, vbNormalFocus)        Application.Quit acQuitSaveNone ' closes the *current* databaseEnd SubFunction Quote(aString) As String    Quote = """" & aString & """"End FunctionHTHLambert-----Original Message-----From: accessd-bounces at databaseadvisors.com[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gary J. GieverSent: Wednesday, November 15, 2006 10:41 AMTo: accessd at databaseadvisors.comSubject: 
[AccessD] Open a databaseThis is frustrating.  All I want to do is open another database from thecurrently open database.  The code is like the help examples:Dim dbMyDB As DatabaseDim strDBName As StringstrDBName = "C:\My Documents\ClientMasterUpdate.mdb"Set dbMyDB = DBEngine.Workspaces(0).OpenDatabase(strDBName)But nothing happens.  What am I missing?Gary J. Giever, M.A.Applications DeveloperACCMHS_______________________________________________No banners. No pop-ups. No kidding.Make My Way  your home on the Web - http://www.myway.com-- AccessD mailing listAccessD at databaseadvisors.comhttp://databaseadvisors.com/mailman/listinfo/accessdWebsite: http://www.databaseadvisors.com-- AccessD mailing listAccessD at databaseadvisors.comhttp://databaseadvisors.com/mailman/listinfo/accessdWebsite: http://www.databaseadvisors.com

_______________________________________________
No banners. No pop-ups. No kidding.
Make My Way  your home on the Web - http://www.myway.com