доступ к атрибутивной таблице через VBA

[Шаки]

Здравствуйте,подскажите пожалуйста.
Есть шейп, у него есть атрибутивная таблица. Как мне к ней подступиться,через какой интерфейс? Грубо говоря надо в свою форму из таблицы брать название полей и записи выделенного объекта.

[anvg]

Вот пример доступа к shape из справки

Код: Выделить всё

ShapefileWorkspaceFactory Example
' This example opens a shapefile using a property set. 

Dim pPropset As IPropertySet 
Set pPropset = New PropertySet 

Dim pFact As IWorkspaceFactory 
Dim pWorkspace As IWorkspace 

pPropset.SetProperty "DATABASE", "d:\\data\\shapedata" 

Set pFact = New ShapefileWorkspaceFactory 
Set pWorkspace = pFact.Open(pPropset, Me.hWnd) 

Dim pFeatureWorkspace As IFeatureWorkspace 
Set pFeatureWorkspace = pWorkspace 

Dim pFeatureClass As IFeatureClass 
Set pFeatureClass = pFeatureWorkspace.OpenFeatureClass("parcels") 

далее посмотрите в справке IFeatureClass, IFeatureCursor, IFeature (если нужны только данные, то ITable, ICursor, IRow)

[Шаки]

спасибо