using VB to export information

I am testing out VB trying to get it to export the contents of text boxes out to a Access 2000 database. I have code to view the records but I can’t seem to get the save button to save a record change or save a newly added record. Here is the codeI am using.
Private Sub cmdsave_Click()
With rsproducts
If baddnew Then .AddNew
rsproducts!firstname = Text1.Text
rsproducts!lastname = Text2.Text
rsproducts!city = Text3.Text
rsproducts.Update
End With
End Sub
I have established an open connection and can see information but can’t seem to save any changes. I have the ADO 2.5 library and
microsoft access 9 library as well

any suggestions??