I have created an Access 2000 form connecting to MAS90 tables. I created ODBC User and System DSN configurations named SOTAMAS90_VB. On my Open Form code I attempted to open the ODBC connection to avoid the Sign On window. The code is as follows:
Dim DAOws As DAO.Workspace
Dim DAODB As DAO.Database
Dim DAOrs As DAO.Recordset
Set DAOws = CreateWorkspace("UDALinkWorkspace", "", "", dbUseODBC)
Set DAODB = Workspaces(0).OpenDatabase("", False, False, "ODBC;DSN=SOTAMAS90_VB;UID=PSI|ABC;PWD=KISS;"
(note: PSI = user, ABC = Company)
I am able to open and read the linked tables without encountering the sign on window. However, I have combo boxes that reference the tables. Whenever these combo boxes are referenced, I encounter the sign on window. (Sign On asks for Company, User Name and Password)
Example of referencing combo box below:
For Idx = 0 To cboCustomer.ListCount - 1
MsgBox (" reading cboCustomer - Idx= " & Idx)
Next Idx
Why can I open and read tables without the sign on window, but any combo box reference prompts the sign on?
Thanks!
Dim DAOws As DAO.Workspace
Dim DAODB As DAO.Database
Dim DAOrs As DAO.Recordset
Set DAOws = CreateWorkspace("UDALinkWorkspace", "", "", dbUseODBC)
Set DAODB = Workspaces(0).OpenDatabase("", False, False, "ODBC;DSN=SOTAMAS90_VB;UID=PSI|ABC;PWD=KISS;"
(note: PSI = user, ABC = Company)
I am able to open and read the linked tables without encountering the sign on window. However, I have combo boxes that reference the tables. Whenever these combo boxes are referenced, I encounter the sign on window. (Sign On asks for Company, User Name and Password)
Example of referencing combo box below:
For Idx = 0 To cboCustomer.ListCount - 1
MsgBox (" reading cboCustomer - Idx= " & Idx)
Next Idx
Why can I open and read tables without the sign on window, but any combo box reference prompts the sign on?
Thanks!