Giúp đoạn code VBA (1 người xem)

[huyhoang_mmyeht]

Do mình không dành về VBE nên muốn nhờ các bạn giúp hộ mình với
Mình có đoạn code của một bạn cho nhưng nó chỉ Xóa được 1 dòng trong Access nhưng mình muốn xóa toàn bộ dự liệu trong table đó nhưng loay hoay mãi không biết làm vậy nhờ các bạn giúp mình với!

Cảm ơn các bạn!

[/COLOR][COLOR=#000000]Sub TEST()On Error GoTo loi[/COLOR]


    Dim Dbs  As Object, Rs As Object, db As Object, r As Long, lsSQL As String
    Set Dbs = CreateObject("DAO.DBEngine.120")
    Set db = Dbs.OpenDatabase(ThisWorkbook.Path & "\Database.accdb")
    Set Rs = db.OpenRecordset("Details")
            Rs.Delete
    Set Dbs = Nothing
    Rs.Close: Set Rs = Nothing
    db.Close: Set db = Nothing
    Exit Sub
loi:
    MsgBox "Khong thu hien duoc" [COLOR=#000000]End Sub[/COLOR][COLOR=#000000]