Darren DICK
darrend at nimblesystems.com.au
Wed Dec 14 16:43:10 CST 2005
Excellent Thanks Shamil I'll try it later this morning Darren --------------------------------------- NIMBLE T: 0424 696 433 -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Shamil Salakhetdinov Sent: Thursday, 15 December 2005 2:22 AM To: Access Developers discussion and problem solving Subject: Re: [AccessD] A2003:Importing/Linking SQL Tables (and data) Darren, This code works well here: Public Sub Import() Dim strCnn As String strCnn = "ODBC;DRIVER=SQL Server;" & _ "SERVER={1};" & _ "DATABASE={2};" & _ "Trusted_Connection=Yes;" strCnn = Replace(strCnn, "{1}", "(local)") ' server strCnn = Replace(strCnn, "{2}", "pubs") ' database DoCmd.TransferDatabase _ acImport, _ "ODBC", _ strCnn, _ acTable, _ "authors", _ "authors" End Sub Public Sub Link() Dim strCnn As String strCnn = "ODBC;DRIVER=SQL Server;" & _ "SERVER={1};" & _ "DATABASE={2};" & _ "Trusted_Connection=Yes;" strCnn = Replace(strCnn, "{1}", "(local)") ' server strCnn = Replace(strCnn, "{2}", "pubs") ' database DoCmd.TransferDatabase _ acLink, _ "ODBC", _ strCnn, _ acTable, _ "authors", _ "linked_authors" End Sub Hope it will work for you too. Shamil ----- Original Message ----- From: "Darren DICK" <darrend at nimblesystems.com.au> To: <accessd at databaseadvisors.com> Sent: Wednesday, December 14, 2005 3:54 PM Subject: [AccessD] A2003:Importing/Linking SQL Tables (and data) > > Hello all > When I use something like > DoCmd.TransferDatabase acImport, "ODBC", "PhoneCentral", acTable, > "SQLTABLENAME", "MDBTABLENAME", False > To import some SQL tables I expected to see the Standard ODBC password login > stuff > Instead I get an error message > Run Time Error 3170 > Could not fin installable ISAM > > Does anyone have some code where I can loop through a recordset of > tablenames > And import them from SQL into an AccessdB > And the same for linking as well? > > Many thanks > > Darren > > > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com