August 15, 2003
@ 01:50 AM

The function below returns the appliction path for an appliction in the Compact Framework.

Shared Function GetAppPath() As String
Dim mstrPath As String
mstrPath = _
   System.IO.Path.GetDirectoryName
   (System.Reflection.Assembly.GetExecutingAssembly().GetModules
   (0).FullyQualifiedName)
If Right(mstrPath, 1) <> "\" Then
mstrPath += "\"
End If
Return mstrPath
End Function

Tip Submitted By: David McCarter & Marquis Howard


 
Comments are closed.