Current Record

[Neo]

I am trying to update a set of records using the folowing

Private Sub CmdUpdate_Click()

Dim strSQL As String
strSQL = "UPDATE Link SET Status = Forms!frmMain!SubfMarks.Form.status.Value WHERE Employee = Forms!frmMain!SubMarks.Form.Employee.Value"
DoCmd.SetWarnings False
DoCmd.RunSQL strSQL
Me.Refresh

End Sub

The problem is I have more than one record where where the Emploee is the same but there is diferent info.

e.g EmployeeSet Accounts

Have employee that started in the year 99 and some that started in 2000. How do I just update the current record

 

[llkhoutx]

Add the max of the startdate to your sql.

 

[mission2java_78]

Tighten up your SQL stmnt to update that RecordID.

Jon

 

[Mile-O]

And don't forget to add DoCmd.SetWarnings True before the End Sub.