problemas al insertar registro

[dark_night]

hola a todos
tengo el siguiente codigo para insertar un registro en una bd acces

Código:

Dim sCon As String = "Provider=Microsoft.jet.OLEDB.4.0;Data Source=base.mdb"
        Dim sSql As String = "INSERT INTO DATOS (CD, AUTOR, TITULO, PORTADA) VALUES(" & TxtNewCD.Text & ",'" & TxtNewAutor.Text & "','" & TxtNewTitulo.Text & "','" & TxtNewPortada.Text & "')"
        Dim oConn As OleDbConnection
        Dim cmd As OleDbCommand
        Dim filas As Integer = 0

        oConn = New OleDb.OleDbConnection(sCon)
        oConn.Open()        
        cmd = New OleDbCommand()
        cmd.Connection = oConn
        cmd.CommandType = CommandType.Text
        cmd.CommandText = sSql
        LblError.Text = sCon
        filas = cmd.ExecuteNonQuery()
        If (filas <> 0) Then
            LblError.Text = "Registro credo con exito"
        Else
            LblError.Text = "se a producido un error, intente denuevo"
        End If

        TxtNewCD.Text = ""
        TxtNewPortada.Text = ""
        TxtNewAutor.Text = ""
        TxtNewTitulo.Text = ""

        oConn.Close()

el txtportada lo lleno con un openfiledialog, y al intentar insertar dice que la bd no existe en la ruta,y la busca en la misma ruta que se selecciono con el openfiledialog..nose si se entiende
si lleno los text a mano la inserccion se hace sin ningun problema
esop
gracias