I'm getting a Type Mismatch error. Any help is appreciated.
I want to find records matching a criteria so I can change LoggedIn status to "No"
______________
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("tblLoggedIn")
If rs.RecordCount <> 0 Then
'there are records
End If
With rs
.FindFirst "ComputerName = " & [fOSMachineName] And "Module = " & [Audits and Tasks Module]
If Not .NoMatch Then
[LoggedIn] = "0"
End If
rs.Close
Set rs = Nothing
End With
I want to find records matching a criteria so I can change LoggedIn status to "No"
______________
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("tblLoggedIn")
If rs.RecordCount <> 0 Then
'there are records
End If
With rs
.FindFirst "ComputerName = " & [fOSMachineName] And "Module = " & [Audits and Tasks Module]
If Not .NoMatch Then
[LoggedIn] = "0"
End If
rs.Close
Set rs = Nothing
End With