не надо никаких ДЛЛ, делается очень просто...
Set pNoteRS = pNoteLayer.SearchExpression("FeatureID = 1")
If Not pNoteRS Is Nothing Then
If Not pNoteRS.EOF Then
If pNoteRS.Updatable Then
pNoteRS.Edit
pNoteRS("Name") = "NoteName"
pNoteRS("Note") = "NoteNote"
pNoteRS.Update
End If
End If
End If