Programemente cree conexiones ODBC y tablas de enlaces en MS Access

Question

Estamos utilizando MS Access como interfaz de informes para Oracle. Se accede a los datos a través de una conexión ODBC, y hay dos tablas vinculadas en Access to Oracle que son las tablas de datos sin formato. Me gustaría poder establecer la conexión y vincular las tablas desde el archivo de Access. De esta forma, los usuarios no tienen que preocuparse por configurar un DSN para la conexión ODBC (la mayoría de ellos no son usuarios muy técnicos, y será necesario mantenerlo de la mano para algo como esto), y finalmente podemos hacer que el archivo de Access apunte a diferentes entornos de prueba y generar informes.

¿Es posible hacer que la conexión de la base de datos se cree dinámicamente cuando se abre el archivo, y puedo cambiar dinámicamente a dónde se vinculan mis tablas vinculadas?

Answer 1

Desea una conexión de tabla vinculada sin DSN desde Access. Es posible y lo he hecho, pero no tengo el código conmigo. Creo que fue algo así como el siguiente (esto usa un servidor SQL pero Oracle simplemente tendría una cadena de conexión ligeramente diferente). Para tener las tablas creadas al inicio necesitará verificar la existencia de cada tabledef antes de intentar crearlas nuevamente y llamar a una subrutina como la siguiente en la base de datos de Access abierta.

Function LinkTables() 
    Dim DB As Database, tDef As TableDef 
    Set DB = CurrentDb 
    Set tDef = DB.CreateTableDef("YourAccessLinkedTableNameHere") 
    tDef.Connect = "ODBC;Driver={SQL Server};Server=srvname;Database=dbname;UID=sqluserid;PWD=sqlpwd" 
    tDef.SourceTableName = "dbo.YourSourceTableNameHere" 
    DB.TableDefs.Append tDef 
End Function 

Answer 2

hago mi programación en una estación de trabajo con un DSN definido, y luego antes de distribuir para uso en producción, corro una variante de Doug Steele's code to convert all the DSN-based connect strings to be DSN-less.