Conexión con ADO no guarda en el fichero access

[josemanuel31675]

Compañero buen dia bueno la verdad es que yo tengo el mismo problema aun no lo he resuelto al 100 pero encontre parte de mi duda.
el detalle esta en la ubicacion de la conexion a bdaccess aun no encuentro la forma que identifique que esta dentro de la carpeta del proyecto pero ya dandole la ubicacion total "C:\user\mydocument" etc etc ya se empieza guardar la informacion si alguien puede ayudarme y de paso ayudar aqui al compañero muy agradecido estaremos.

Anex codigo ejemplo

Dim conn As OleDb.OleDbConnection
Dim cmd As OleDb.OleDbCommand
Dim con As String = "Provider=Microsoft.JET.oledb.4.0;Data Source=C:\BD\BD_Access.mdb"

conn = New OleDb.OleDbConnection(con)
conn.Open()
cmd = New OleDb.OleDbCommand("insert into TuTabla(Dato1,Dato2) values(?,?)", conn)
cmd.Parameters.AddWithValue("?Dato1", Me.TxtDato1.Text)
cmd.Parameters.AddWithValue("?Dato2", Me.TxtDato1.Text)
cmd.ExecuteNonQuery()
conn.Close()