Привязка формы к набору записей ADO

• 21.09.2018

Чтобы привязывать форму Access к набору записей, необходимо присвоить свойству Recordset формы открытый объект ADO Recordset . Форма должна соответствовать двум общим требованиям, чтобы обеспечить возможность обновления формы при ее привязке к набору записей ADO. Общие требования:

• Базовый набор записей ADO должен поддерживать обновление через ADO.
• Набор записей должен содержать одно или несколько полей с уникальным индексом, например первичный ключ таблицы.

VB

Private Sub Form_Open(Cancel As Integer)

    Dim cn                    As ADODB.Connection

    Dim rs                    As ADODB.Recordset

    'Use the ADO connection that Access uses

    Set cn = CurrentProject.AccessConnection

    'Create an instance of the ADO Recordset class,

    'and set its properties

    Set rs = New ADODB.Recordset

    With rs

        Set .ActiveConnection = cn

        .Source = "SELECT * FROM Customers"

        .LockType = adLockOptimistic

        .CursorType = adOpenKeyset

        .Open

    End With

    'Set the form's Recordset property to the ADO recordset

    Set Me.Recordset = rs

    Set rs = Nothing

    Set cn = Nothing

End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.