Duda visual con access 2000

[thecirujano]

Tengo el siguiento codigo para insertar desde visual a sql:

Public
Class libros
Public codigo As String
Public nombre As String
Public autor As String
Public Function ingresar(ByVal conn As SqlClient.SqlConnection)
conn.Open()
Dim sql As String = "Insert into libros values('" & codigo & "','" & nombre & "','" & autor & "')"
Dim mycommand As New SqlClient.SqlCommand (sql, conn)
mycommand.ExecuteNonQuery()
conn.Close()
Return (0)
End Function
End
Class
Public
Class Form1
Dim cadena As String = "data source=vld_lab1_06;initial catalog=II-4;integrated security=true"
Dim conn As New SqlClient.SqlConnection (cadena)
Dim objlibros As New libros
Private Sub TextBox3_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs ) Handles txtautor.TextChanged
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs ) Handles MyBase.Load
End Sub
Private Sub btningresar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs ) Handles btningresar.Click
objlibros.codigo = txtcodigo.Text
objlibros.nombre = txtnombre.Text
objlibros.autor = txtautor.Text
objlibros.ingresar(conn)
End Sub
End
Class

Ahora Quisiera traspasarlo para insertar a access2000, ¿alguien me puede ayudar?

[Hans el Topo]

el de access el connection string es algo asi xD

Código [Seleccionar] Expandir

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=basedatos.mdb;Mode=ReadWrite;Persist Security Info=False

[thecirujano]

el isert va igual? o no?

[Hans el Topo]

si, lo único que cambia a si a nivel general es alguna característica de la select