گرفتن لیست Primary Key های یک جدول

[امید امرایی]

با سلام

کسی از اساتید عزیز میدونه چطور می شه لیست Primary Key های یک جدول رو گرفت ؟

[دانش پژو]

با سلام
شايد منظورتان اين باشد tools>analyze>documentr-tables

[amirzazadeh]

با سلام

کسی از اساتید عزیز میدونه چطور می شه لیست Primary Key های یک جدول رو گرفت ؟
با كدهاي vba ميتونين از اين فانكشن استفاده كنين:

Public Function fncPrimaryKey(pstrTable As String) As String
Dim idx As DAO.Indexes
Dim lngLoop As Long
Dim strResult As String

On Error GoTo PK_Error
With CurrentDb
Set idx = .TableDefs(pstrTable).Indexes
For lngLoop = 1 To idx.Count
If idx(lngLoop - 1).Primary Then
strResult = Replace(idx(lngLoop - 1).Fields, "+", "")
Exit For
End If
Next
End With

PK_Exit:
fncPrimaryKey = strResult
Exit Function

PK_Error:
strResult = "<error>"
GoTo PK_Exit
End Function
...............................
موفق باشيد