You use the following code in your application. When you test it,appears that nothing happens the current record in the record set (which you've called rs). Why?

Sub cmdDelete_Click()
rs.Delete
End Sub