Sub TestLinkTransferDatabase() DoCmd.TransferDatabase acLink, "ODBC Database", _ "ODBC;DSN=DataSourceName;UID=username;PWD=pwd;LANGUAGE=us_english;" _ & "DATABASE=yourDatabase", acTable, "Sales", "dboSales" End Sub