VBA ODBC Link Function

I need to have a function that will allow me to use lists of tables and ODBC entries to allow VBA driven linking of tables. The ODBC entries will be created before the code is executed.

I have a table with a list of Oracle tables

Table_Names
      "Name_Prefix"
      "Status_Codes"
      "Priorities"

ODBC_Data_Sources               UID               PWD
      "S1_Development"              U1                P1
      "S2_QA"                             U2                P2
      "S3_Production"                 U3                P3

And now I want to loop through the returned rows...

For loop1 = first_table to Last Table
    For loop2 = FIrst_Data_Source to Last_Data_Source
                Create a ODBC link between the Table_Name and Source

                       Create Links

                next loop2

               'Run tests on connected tables (I will do this...)

         For loop2 = FIrst_Data_Source to Last_Data_Source

                Unlink ODBC link

          next loop2

     next loop1

Thanks!Start Free Trial