Visual Basic - Una facilita de ado

Hola amigos, hace mucho que no programo con vb, y me encuentro con un problemita.

uso esta propiedad

cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\materiales\materiales.mdb;Persist Security Info=False;"

el caso es que el campo sourc es ESTATICO... siempre igual a d:\materiales\materiales.mdb

cuando yo haga el instalador la base de datos y el software van a estar en la misma CARPETA.

por tanto lo que yo necesito es OBTENER LA direccion de la carpeta ACTUAL.

seria algo asi pero no recuerdo la funcion, me ayudan?

cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & RUTAACTUAL & ";Persist Security Info=False;"

ES urgente.

Gracias.

Fijate con:

cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\materiales.mdb" & ";Persist Security Info=False;"

Gracias, eso era lo que buscaba

:)