Hola
guillebomtrasmiti creo que si bien no me equivoco le falto un "\", asi :
Código vb.net:
Ver originalDim myPath As String = Application.StartupPath
conexion.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + myPath + "\ppestion.mdb"
Verifica guille y me cuentas. Saludos!

.