We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
Dim EESQL As String Dim db As Database Dim rs As DAO.Recordset EESQL = "SELECT Max(os_claims.EmployeeID) AS MaxOfEmployeeID " & _ "FROM os_claims " & _ "WHERE (((os_claims.DateClosed) Is Null) AND ((os_claims.ArchivedRecord)=False) AND ((os_claims.EmployeeID)=[forms]![frmEmployees]![id]));" Set db = CurrentDb Set rs = db.OpenRecordset(EESQL) Me.selectedEEFound.Value = rs.Fields("MaxOfEmployeeID").Value Set rs = Nothing Set db = Nothing
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.