Insertar en Access

[jaullo]

Bueno.. creo q parte de lo que tienes mal es la definicion de la conexion a tu bd.

Un ejemplo de como realizarla seria:

'Declaras las variables
Public strConexion As String
Public cnnConex As OleDb.OleDbConnection
Public comand As OleDb.OleDbCommand

'abres la conexión
strConexion = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & ".\tubd.mdb"
cnnConex = New OleDb.OleDbConnection(strConexion)
cnnConex.Open()

'haces el insert
Dim strSQL As String = "INSERT INTO consecutivo (consecutivo)" & _
"VALUES (" & a.consecutivo & ")"
comand = New OleDb.OleDbCommand(strSQL, cnnConex)
comand.ExecuteNonQuery()


'cierras la conexion
cnnConex.Close()

espero haberte ayudado.

Saludos,