Sonarse todos los registros de una Tabla de Un Soplo en "Access"

[lic_dahool]

Seguramente ya lo has resuelto, pero sino, probaste con esto:

Código:

Option Explicit

Dim cnn As New Connection
Dim rst As New Recordset

Private Sub Form_Load()

   Dim sBase As String
   sBase = App.Path & "\otMadermac.mdb"

   cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & sBase
   cnn.Execute "DELETE * From OTEXPOR"

end sub

Saludos.