Adding a Single-Field Index to an Existing Table with SQL command : Table Create « Access « VBA / Excel / Access / Word






Adding a Single-Field Index to an Existing Table with SQL command

 
Sub SingleField_Index2() 
    Dim conn As ADODB.Connection 
    Dim strTable As String 

    On Error GoTo ErrorHandler 

    Set conn = CurrentProject.Connection 
        strTable = "myTable" 
    conn.Execute "CREATE INDEX idxCity ON " & strTable & "(SCity) ;" 
ExitHere: 
    conn.Close 
    Set conn = Nothing 
    Exit Sub 
ErrorHandler: 
    MsgBox Err.Number & ":" & Err.Description 
    Resume ExitHere 
End Sub 

 








Related examples in the same category

1.Create a table with validation rule
2.Creating a Table (ADOX data types vs. Microsoft Access data types)
3.Creating a Table in the Current Database with SQL statement
4.Creating a Table in a New Database with AUTOINCREMENT column
5.Creating a Table with a Single-Field Index with SQL command
6.Creating an Index Based on Two Fields with SQL command
7.Default Column value
8.Creating Check Constraints:add business rules for a table