I have a form defined in which I prompt the user to select an ODBC data source using code similar to the following:
Dim wrkODBC As Workspace
Dim conPubs As Connection
' Create ODBCDirect Workspace object.
Set wrkODBC = CreateWorkspace("NewODBCWorkspace", "admin", "", dbUseODBC)
Set conPubs =...