Extracting Table Index SQL

[paulkeys]

Hi,

I am upgrading a few access tables into SQL 2000, and wondered if anyone knew an easy way of extracting the index creation sql for each of the tables within the database.

Any guidance most appreciated.

Thanks

 

[Remou]

I thought that the upsize wizard created the indexes? Do you wish to obtain a list of indexes in the Access database?

Dim db As Database
Dim idx As Index
Dim tdf As TableDef

Set db = CurrentDb
For Each tdf In db.TableDefs
    For Each idx In tdf.Indexes
        Debug.Print tdf.Name; "  "; idx.Name; "  "; idx.Fields
    Next
Next