How do I delete a table from a access database. I am using DAO.
I have a number of tables in the database, "Rev 0","Rev 1" etc.. I have tried the following code but it does'nt work
I get the message "No current record"Code:Dim db As Database Dim rs As Recordset Set db = OpenDatabase(App.path & "\Crr_data\" & ListView2.SelectedItem.text & "\valve.mdb") Set rs = db.OpenRecordset(ListView5.SelectedItem.text, dbOpenDynaset) rs.Delete ' goes wrong here db.Close
Any ideas?
Cheers




Reply With Quote