My code is below. It works on all other five computers. Some computers have runtime only while some have Office installed.
Public Function StartUp()
Dim Server As String, Login As String, DataName As String, Driver As String, str As String
Dim rs As DAO.Recordset
ap_SetNavigation...