|
|
TableFieldHasUniqueIndexTableFieldHasUniqueIndex
Diese Funktion ist in folgenden Access-Versionen verfügbar: 2000, 2002, 2003, 2007, 2010
Prüft, ob eine Spalte in einer Tabelle einen eindeutigen Index hat.
Function TableFieldHasUniqueIndex(Table As String, Columns As String) As Boolean
True, wenn die Spalte in der Tabelle einen eindeutigen Index hat.
'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
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.
|
02.10.2020: 06.11.2019: 06.05.2017: 27.03.2016: 23.05.2014: |
|
|