ユーザー ID (NBK) でテーブルを更新する必要があります。NBK を含むテーブルにもユーザー ステータス (0 - 1) があり、一度に 1 人のユーザーのみが 1 を持つことになります。課題は、#1 アクティブなユーザーをキャプチャすることです #2 ユーザー NBK で他のテーブルを更新します。以下のコードに、見つけられない単純な構文エラーがあることを願っていますか?
Dim nb As String
Dim NBK As String
nb = [Employees]![NBK] & "' WHERE "
nb = nb & " " & [Employees]![Status] = '1'
NBK = " Update tbl_DateTracking SET NBK = "
NBK = NBK & "'" & nb & "' WHERE "
NBK = NBK & "CaseId = '" & CaseId & "' AND OCC_Scenario = '" & OCC_Scenario & "' ;"
DoCmd.RunSQL nb
DoCmd.RunSQL NBK