Conectar a una base de datos access desde visual basic

[fernando28481]

hola yo tambien estoy haciendo una aplicacion con visual pero no logro conectarla con access o mejor no le puedo ingresar informacion a esa tabla el codigo que estoy utilisando es este

Dim obj As cls_contacto = New cls_contacto
Dim numero As Integer
Dim coneccion As New OleDb.OleDbConnection
Dim comando As New OleDb.OleDbCommand
Dim adaptador As New OleDb.OleDbDataAdapter
Dim dataset As New DataSet
Dim DS As New DataSet
Dim tabla1 = New DataTable

Sub setconeccion()
coneccion.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source= C:\contacto.mdb"
coneccion.Open()
comando.CommandText = "select * from tabla1"
comando.Connection = coneccion
adaptador.SelectCommand = comando
adaptador.Fill(DS, "tabla1")
End Sub
y en la coneccion es
comando.CommandText = "insert into tabla1 (nombre,apellido,direccion,telefono,movil,mail,not as) values ('" & obj.getnombre & "','" & obj.getapellido & "','" & obj.getdireccion & "','" & obj.gettelefono & "','" & obj.getmovil & "','" & obj.getmail & "','" & obj.getnotas & "')"
adaptador.Fill(DS, "tabla1")