Getting Physical Path Of File In Project Directory?

I am using Environment.CurrentDirectory to get the current directory, i.e. "D:ChuttuProjectsLICinDebug"

But, I want to remove "inDebug"

How can I do that? Or is there any way so that I can get the directory up to "LIC"?

Actually this is my connection string:

Data Source=.SQLEXPRESS;AttachDbFilename=|DataDirectory|LIC.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True

But when I use this and try to insert data into the DB, the data is not inserted. When I use the connection string with a physical path it starts working:

Data Source=.SQLEXPRESS;AttachDbFilename=D:Chuttu VBProjectsLICLIC.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True

I am trying to get the physical path of the mdf file and use it in the connection string.

EDIT:

This piece of code works fine:
Private Sub save()
Dim con As New SqlClient.SqlConnection("Data Source=.SQLEXPRESS;AttachDbFilename=D:Chuttu VBProjectsLICLIC.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True")

[Code].....