Ayuda con vb.net

[underflip]

hola bueenas !, necesito ayuda con un problemilla,

necesito extraer la parte de la ruta fija.. ya que el proyecto al cambiar de

ubicacion puede traer dramas para ejecutarse

ej: C:\Documents and Settings\Usuario\Escritorio\VmWare 7

resto = vmware 7 -- esta es la parte que necesito.. si alguien pudiera ayudarme

de antemano gracias !!

Function Extraer() As String

Dim resto As String

If Caracter = "OCC" And InStr(Path, Caracter) = 0 Then Return Nothing

resto = Right(Path, Len(Path) - InStrRev(Path,Caracter))

Extraer = resti

Return Extraer

 

[bombero_7]

te servira esto ??

 

System.AppDomain.CurrentDomain.BaseDirectory()