Как выгрузить все проекты скопом в ax2009

[lvan]

Вот может пригодится кому
импорт напишите еще

static void ExportAllProjects(Args _args)
{
    #WinApi
    #AOTExport

    FilePath        path = WinAPI::getFolderPath(#CSIDL_Personal) + '\\';
    FileName        fileName;
    treeNode        treeNode;
    ;

    treeNode = infolog.projectRootNode();
    treeNode = treeNode.AOTfindChild("Shared");
    treeNode = treeNode.AOTfirstChildEx(true);

    while (treeNode)
    {
        if (treeNode.applObjectLayer() == CurrentAOLayer())
        {
            fileName = path + treeNode.AOTname() + ".xpo";

            treeNode.treeNodeExport(filename, #export | #expKeepIds | #expLayer | #expProjectOnly);

            info(strfmt("%1", treeNode.AOTname()));
        }

        treeNode = treeNode.AOTnextSibling();
    }

}