Visual Basic - definir ruta en informes de crystal

hola a todos.

me gustaría que me pudierais ayudar con lo siguiente.
tengo un informe realizado en crystal, pero me obliga a situar la base de datos en una ubicación fija, pero yo quiero que al instalar la aplicación no tenga que hacerlo en un sitio definido.
como puedo hacer con crystal para que la ubicación sea en cualquier carpeta de instalación.

en visual lo hago con apath pero aquí no sé.
gracias.

Si estás utilizando el control de Crystal puedes hacer:

With CrystalReport1
.Connect = "DRIVER=Microsoft Access Driver (*.mdb);DefaultDir=" & App.Path & ";DBQ=" & App.Path & "\Prueba.mdb"

.DataFiles(0) = "Prueba"
.ReportFileName = App.Path & "\Prueba.Rpt"
.SQLQuery = "Select * From Prueba Where Codigo>'Codigo1' " & vbCrLf & " Order by Descripcion"

.Destination = crptToWindow
.PrintReport
End With