Public Function DbTableIndexExists (
IndexName As String,
TableName As String,
Optional dbs As DAO.Database = Nothing
) As Boolean
Does the index of the table exist in the database ?
The name of the table index
The name of the database table
Look in this database (default to the current database)
Dim b As Boolean
b = xf.Interact.DbTableIndexExists(IndexName, TableName)
b = xf.Interact.DbTableIndexExists(IndexName, TableName, dbs)
DbTableIndexExists("tblClinicVisit", "IX_tblClinicVisit_VisitDate")