Methode 1: Verwenden Sie die Methode createTableDEFEF
Die CreateTableDEFEF -Methode erstellt eine Link -Tabelle. Um diese Methode zu verwenden, erstellen Sie ein neues Modul und fügen Sie dann die folgende Anhang -Funktionsfunktion zum neuen Modul hinzu.
Die Codekopie lautet wie folgt:
'// Name: AttachdsnlessTable
'// Zweck: CreatealinkedTabletOSQLServerWithoutusingAdsn
'// Parameter
'// stlocalTableName: Name der thetablethatyourecreating in der Abzügungdatabase
'// StremotetableName: Name des THETABLE, dass Sie die SQL Server -Datenbank verknüpfen
'// StServer: Name des SQL -Servers, den Youarelinko
'// stDatabase: Name der SQL Server -Datenbank, auf die Sie verlinken
'// Stusername: Name des SQL -Server -Benutzers, der mit SQL Server eine Verbindung herstellt, LeaveBlank TouseatrustedConnection
'// stpassword: SQLServeruserPassword
FunctionAttachdsnlessTable (stlocalTableameAsString, StremotetableameAsString, StServerassstring, StDatabaseasString, OptionalStusernameAsString, optionalStPasswordAsstring)
OnErorgotoattachsNlessTable_err
DimtdastabledEf
DimstConnectassstring
ForeachTdincurrentDB.Tabledefs
Iftd.name = stlocalTablenAmethen
CurrentDB.TabledeFsfs.DeletStLocalTableName
Endif
Nächste
Iflen (stusername) = 0Then
'// USETTrusted AuthenticationIfStusernameIsnotsupplied.
STConnect = "ODBC; TRAVER = SQLSERVER; Server =" & StServer & "; Database =" & StDatabase & "; Trusted_Connection = Ja"
Anders
'// WARNUNG: Dies wird mit TheLinkedTable -Informationen den theusernamen und thepassword.