Select check box for all records not marked archived

[tagteam]

I would like to have a button (or check box that uses the after update event) that will allow me to select all records that have not been marked archived and then select them.

I know how to select all of the records and mark them

SelectAll "myTable", Me.SelectAllChk (SelectAllChk is the checkbox control name)

What I cant figure out is how to add a where clause to that

SelectAll "myTable" Where Archive = "True", Me.SelectAllChk does not work.

Any ideas?

[ssanfu]

I don't know what "SelectAll" is or does, but the SQL to select all records in table "myTable" that have not been marked archived would be

SELECT * FROM myTable WHERE [Archive] = False

IF
[Archive] = True means record was/is archived
[Archive] = False means record was not /is not archived...

[tagteam]

I was not able to use SelectAll so I had to iterate the records using RecordsetClone
Dim rst As Recordset, i As Integer


Set rst = Me.RecordsetClone
i = 0
rst.MoveFirst
Do While Not rst.EOF
i = i + 1
rst.Edit
If Archived = False And rst![Select] Then
rst![Select] = False
Else
rst![Select] = True
End If
rst.Update
rst.MoveNext
Loop
MsgBox i & " Records Marked."


rst.Close
Set rst = Nothing