XP:


Return objFolder.GetDetailsOf(strFileName, 21).ToString


Vista:


Return objFolder.GetDetailsOf(strFileName, 36).ToString