Search results

I have a central DB that is used to open other DB's. I have the code to open up access but I can not figure out how to by pass the login so the DB will fully open. The user name in WHOAKSU with no password.

Dave Thanks for all your help I now have another little problem but that is a new post. Rich

Dave I now have this but the button does not work. Private Sub cmdOpenDB_Click() On Error GoTo Err_cmdOpenDB_Click Dim stAppName As String stAppName = ("C:\Program Files\Microsoft Office\Office\MSACCESS.EXE") And ("P:\Distribution\Address\Address.mdb") Call Shell(stAppName, 1) DoCmd.Quit...

Dave This is the code I ended up with I am now getting Duplicate Option statement Private Sub Command1_Click() Private Sub cmdOpenDB_Click() On Error GoTo Err_cmdOpenDB_Click Dim stAppName As String stAppName = "C:\Program Files\Microsoft Office\Office\msaccess.exe " &...

I have several DB that I would like to open from one central DB. I have looked @ OpenDataBase but I think I may be missing something. Some Examples of names are ShiftReport, Address, and utilities.

The tab should move when the last record is updated.

I have a have a form that needs to tab from the detail to the footer on lost focus. Is there something wrong with my code? Private Sub QA_Count_LostFocus() Dim dbs As Database, rst As Recordset Set dbs = CurrentDb Set rst = dbs.OpenRecordset("QA_Count") If CurrentRecord = rst.RecordCount Then...