I'm working with access 97 and vb6. In my vb6 program I have a commandbutton called cmddelete. The button was working fine until I imported data into the database which I'm working with. I click on the delete button and the information clears out in vb6, but not with in my database. Here's the code I'm using, maybe you guys can see what I'm doing wrong.

Set rsMachineInfo = New ADODB.Recordset
rsMachineInfo.Open "Select * From MachineInfo", cnn, adOpenDynamic, adLockOptimistic

With rsMachineInfo
.Delete
.MoveNext
If .BOF Then .MoveLast
End With

txtMachineno = ""
txtMachineDesc = ""
cmbDivision = ""

Thanks!