Public Function GetParentFolderName( _
   ByVal Path As String _
) As String