Hai everyone, I am doing a project on Attendance

Hai everyone, I am doing a project on Attendance Monitoring. I have two tables one master table called student and another table called att to store students daily attendance. I have four comboboxes in my form, by selecting the city,area,centre and batch the respective students satisfying this condition has to be displayed in the grid apart from that i have to display another column to mark attendance. I am using datagrid and mark P for present and A for absent. When i finished marking the whole data has to be stored in att table with the current date. The next day again the same class may be selected with the next date and has to be stored again. The problem is i am not able to store each person attendance. Please help me in this regard.

The att table contains fields like
Code:
Student_ID,Date,Attendance
The student table contains fields like
Code:
Student_ID,City,Area,Centre,Batch,Name etc
The code that i have written is like this


Code:
Public ac As New ADODB.Connection
Public ar As New ADODB.RecordSet

Private Sub Command1_Click()

Set ar = ac.Execute("select student.Student_ID,att.Attendance from student,att where City = '" & Combo1.Text _
& "' AND Area = '" & Combo2.Text & "' AND Centre = '" & Combo3.Text & "' AND Batch = " & Combo4.Text & "")
Dim count As Integer
count = ar.RecordCount
MsgBox count
Set DataGrid1.DataSource = ar

End Sub

Private Sub Form_Load()

ac.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:v-tablesStudent.mdb;Persist Security Info=False"
ac.CursorLocation = adUseClient

Combo1.AddItem ("CHENNAI")
Combo1.AddItem ("BANGALORE")
Combo2.AddItem ("GILL NAGAR")
Combo2.AddItem ("CHOOLAIMEDU")
Combo2.AddItem ("EGMORE")
Combo2.AddItem ("SOWCARPET")
Combo2.AddItem ("KOTTIVAKKAM")
Combo2.AddItem ("KILPAUK")
Combo2.AddItem ("MOGAPAIR")
Combo3.AddItem ("RANGA NURSERY")
Combo3.AddItem ("V-KIDS")
Combo4.AddItem ("1")
Combo4.AddItem ("2")

End Sub