Я создал форму истории запросов по конкретному userName, выбранному из поля со списком. Все это работает с кодом ниже.
UserName Ticket # Req # start_date - это поля моего столбца, которые я разместил в разделе сведений в моей форме. (Также я включил командную кнопку в подробности, чтобы я отображал командную кнопку для каждой моей записи, не соответствующей поиску)
Ticket # - мой первичный ключ.
Теперь вот проблема, я не имею ни малейшего представления начать здесь с логики vba. как моя командная кнопка считывает мой текущий источник записи Ticket #, чтобы я мог вызвать форму "fndEdit".
Пример:
Мой поиск "userA" показывает 10 записей в истории, как мне отредактировать 5-ю запись из текущей формы, чтобы вызвать мою форму редактирования "frmedit" для конкретной записи.
Option Compare Database
Option Explicit
'Set default record source of form
Const strsql = "SELECT Temp.userName,Temp.Recordcreated,Temp.[req#],Temp.[Ticket#],Temp.[start_date] FROM Temp"
Private Sub cbouser_Change()
Dim strFilterSQL As String
strFilterSQL = strsql & " Where [UserName] = '" & Me.cbouser & "' ORDER BY [Recordcreated] DESC;"
Me.RecordSource = strFilterSQL
'DoCmd.RunSQL strFilterSQL
End Sub