Ссылка на поле в моем выражении - PullRequest
0 голосов
/ 22 мая 2018

Когда я запускаю свой код, программа не может найти ссылку на мое поле.Как я могу это исправить?Поле, на которое нет ссылки: «Я! [SetupMenuID].»

    Dim con As Object
    Dim rs As Object
    Dim stSql As String

On Error GoTo SetupButtonClick_Err

    ' Find the item in the Switchboard Items table
    ' that corresponds to the button that was clicked.
    Set con = Application.CurrentProject.Connection
    Set rs = CreateObject("ADODB.Recordset")
    stSql = "SELECT * FROM [Setup Sheet Items] "
    stSql = stSql & "WHERE [SetupMenuID]=" & Me![SetupMenuID] & " AND [SetupItemNumber]=" & numBtn
    rs.Open stSql, con, 1   ' 1 = adOpenKeyset
...