Microsoft KB Archive/210295

= ACC2000: How to Create a Customized "Attach ODBC Table" Form =

Article ID: 210295

Article Last Modified on 6/23/2005

-

APPLIES TO


 * Microsoft Access 2000 Standard Edition

-



This article was previously published under Q210295



Advanced: Requires expert coding, interoperability, and multiuser skills.

This article applies only to a Microsoft Access database (.mdb).



SUMMARY
This article describes how to create a form that uses the TransferDatabase command to attach tables from an Open Database Connectivity (ODBC) data source. Creating this form provides more control over the tables than the Link dialog box and is faster than modifying the AttachableObjects setting in the registry.



MORE INFORMATION
Microsoft provides programming examples for illustration only, without warranty either expressed or implied. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. This article assumes that you are familiar with the programming language that is being demonstrated and with the tools that are used to create and to debug procedures. Microsoft support engineers can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific requirements. To create a sample form to make linked ODBC tables, you must first create a table or query that contains the names of the tables on the server. Then you can create a form based on that query to create the links to the tables you select from a list.

Create the Query Containing the Table List
To create a query that lists the tables on a server, follow these steps:  Start Microsoft Access and open any database. In the Database window, click Queries, and then click New. Click Design View, and then click OK. Close the Show Tables dialog box without adding any tables. On the Query menu, point to SQL Specific, and then click Pass-Through. In the SQL Pass-Through Query window, type the following SQL statement to return a list of all user tables:

SELECT name FROM sysobjects WHERE type='U'

</li> On the View menu, click Properties.</li> In the ODBC Connect Str property, type the ODBC connect string for the SQL pass-through query. This example uses the Pubs database that is provided with Microsoft SQL Server 7.0. You can use the following line as a template and substitute the correct Data Source Name (DSN), User ID (UID), Password (PWD), and Database:

ODBC;DSN=MyServer;UID=MyUserId;PWD=MyPassword;LANGUAGE=us_english;DATABASE=pubs

</li> Run the query to make sure it returns the expected table names. Save this SQL pass-through query as Query1 .</li></ol>

Create the Form to Use to Attach Tables
To create a form that you can use to attach tables to your current database, follow these steps: <ol> Create a new unbound form and add an unbound list box and command button to the form, with the following properties:

Form: frmAttachTable

List Box

Name: Attach

Row Source: Query1

Command Button

Name: cmdAttachTable

Caption: Attach Table

Save the form as frmAttachTable .</li>  Set the On Click property of the cmdAttachTable command button to the following event procedure: Private Sub cmdAttachTable_Click

If MsgBox("Attach table " & Forms!frmAttachTable!Attach & "?") Then

'Substitute the correct ODBC connection parameters 'for the Pubs database.

DoCmd.TransferDatabase acLink, "ODBC", _ "ODBC;DSN=MyServer;UID=MyUserId;PWD=MyPassword;LANGUAGE=us_english; _   & "DATABASE = pubs", acTable, Forms!frmAttachTable!Attach, _    "Local" & _    Forms!frmAttachTable!Attach

End If End Sub </li> On the View menu, click Form View. Note that the list box lists the table names. You can select a table name in the list box and then click the Attach Table button to create the link to the table in your current database.</li></ol>

<div class="references_section">