Are you sure
qry_MakeTrustTable_Adhoc exists as a Visual Basic macro within that database? If yes, try this
Code:Dim strDatabasePath As String Dim appAccess As Access.Application strDatabasePath = "C:\Users\zachk\Desktop\Strats 2011.01.accdb" Set appAccess = New Access.Application With appAccess .OpenCurrentDatabase strDatabasePath .Run "qry_MakeTrustTable_Adhoc" .Quit End With Set appAccess = Nothing




Reply With Quote
Bookmarks