I've finally gotten everything working great the textboxes ,the comboboxes , the database etc I am using ADO code but was has me stuck is this....I can view my data but when I make changes and press my update button my message box pops up, I go to the next record but when I comeback, no changes were saved. I changed to adlockOptimistic. This is the code I'm using to udate changes to a record.

Private Sub cmdUpdate_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

rs.Update
MsgBox "Student information updated.", vbExclamation

End Sub

What am I doing wrong??