i cannot seem to get this to work! can anyone help? i found it from a question by nod31
dim SQL as String
datEmployees.RecordSource = SQL
SQL = ("Select * from Employees where Admin = true")
If SQL.RecordCount > 1 Then
MsgBox "You can delete the user!"
MsgBox "cannot delete last administrator"
datEmployees.RecordSource = "Employees"