citef respondió:
Puedes hacerlo de la siguiente manera: Dim con As New ADODB.Connection con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\bd1.mdb;Persist Security Info=False" con.CursorLocation = adUseClient con.Open ' ' Insertar un registro...