TableFieldHasUniqueIndex

TableFieldHasUniqueIndex

Access-Versionen

Diese Funktion ist in folgenden Access-Versionen verfügbar: 2000, 2002, 2003, 2007, 2010

Funktion

Prüft, ob eine Spalte in einer Tabelle einen eindeutigen Index hat.

Deklaration

Function TableFieldHasUniqueIndex(Table As String, Columns As String) As Boolean

Argumente

Table   Name der Tabelle
Columns   Name der Spalte bzw. des Feldes

Rückgabewert

True, wenn die Spalte in der Tabelle einen eindeutigen Index hat.
False, wenn die Spalte in der Tabelle keinen eindeutigen Index hat.

Code-Beispiel

'Variablen deklarieren
Dim strTabelle As String
Dim strFeld As String

'Werte übernehmen
strTabelle = "Tabellenname"
strFeld = "Feldname"

WizHook.Key = 51488399
If WizHook.TableFieldHasUniqueIndex(strTabelle, strFeld) = True Then
  MsgBox "Eindeutiger Index vorhanden."
Else
  MsgBox "Kein eindeutiger Index vorhanden."
End If

Hinweise

Wenn die Tabelle nicht vorhanden ist, gibt die Funktion "False" zurück. Wenn das Feld nicht vorhanden ist, gibt die Funktion ebenfalls "False" zurück".

Das zu übergebende Argument lautet "Columns", also Spalten. Es ist mir jedoch nicht gelungen, diese Funktion mit mehreren Spalten, die zusammen einen gemeinsamen eindeutigen Index bilden, anzuwenden.

Nach oben

 

Downloads: Beispieldatenbank / Hilfedatei / Doku als PDF-Datei