Type Info:
DirectoryTool As DirectoryTool
Dim Tool As DirectoryTool Set Tool = Application.Tools.DirectoryTool MsgBox Tool.GetApplicationINIFile