Programmatisch erstellen ODBC-Verbindung und Link-Tabellen in MS Access

Question

Wir verwenden MS Access als Reporting-Front-End für Oracle. Auf die Daten wird über eine ODBC-Verbindung zugegriffen, und in Access to Oracle gibt es zwei verknüpfte Tabellen, bei denen es sich um die Rohdatentabellen handelt. Ich möchte in der Lage sein, die Verbindung einzurichten und die Tabellen innerhalb der Access-Datei zu verknüpfen. Auf diese Weise müssen sich die Benutzer keine Gedanken über die Einrichtung eines DSN für die ODBC-Verbindung machen (die meisten von ihnen sind keine sehr technischen Benutzer und müssen von Hand gehalten werden), auf die die Access-Datei verweisen kann verschiedene Testumgebungen und generieren Sie Berichte.

Ist es möglich, dass die Datenbankverbindung dynamisch erstellt wird, wenn die Datei geöffnet wird, und kann ich dynamisch ändern, wo meine verknüpften Tabellen verlinken?

Answer 1

Sie möchten eine DSN-lose verknüpfte Tabellenverbindung von Access. Es ist möglich und ich habe es getan, aber ich habe den Code nicht bei mir. Ich denke, es war etwas wie das unten (das verwendet eine SQL Server-Quelle, aber Oracle würde nur eine etwas andere Verbindungszeichenfolge haben). Um die Tabelle (n) beim Start erstellen zu lassen, müssen Sie vor dem Versuch, sie erneut zu erstellen, nach dem Vorhandensein jedes Tabledefs suchen und eine Subroutine wie die folgende auf Access-Datenbank öffnen aufrufen.

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

ich meine Programmierung auf einer Workstation mit einem DSN definiert, und dann vor für den produktiven Einsatz zu verteilen, eine Variante von Doug Steele's code to convert all the DSN-based connect strings to be DSN-less laufen.