用job批量导入导出用户组权限(export import user group permission by job script)

最新推荐文章于 2024-08-12 10:58:42 发布

再启动

最新推荐文章于 2024-08-12 10:58:42 发布

阅读量1.4k

点赞数

分类专栏： Dynamics AX 开发文章标签： import user winapi integer domain path

Dynamics AX 开发专栏收录该内容

100 篇文章

订阅专栏

本文介绍了一种使用Job脚本批量处理用户组权限的方法，包括如何将所有用户组权限导出到文件以及如何从指定文件夹中导入用户组权限。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

转自：秋毫

原作者：Andy

用job批量导入导出用户组权限(export import user group permission by job script)

导出：

static void ExportAllUserGroupsToFiles(Args _args)
{

    SysSecurityUserGroup sysSecurity;
    UserGroupInfo userGroupInfo;
    userGroupId userGroupId , tmpUserGroupId;
    domainId domainId , tmpDomainId;
    domainInfo domainInfo;

    FilePath filepath;
    FileNameSave fileName, fileNameExport;
    BinaryIo file;
    Filename path, onlyName, ext;
    int hwnd;
    ;
    filePath = winApi::browseForPath(hwnd);

    if (filePath)
    {
        sysSecurity = SysSecurityUserGroup::construct();

        while select domainInfo
        {
            domainId = domainInfo.id;

            while select userGroupInfo
            {
            userGroupId = userGroupInfo.id;
            if (userGroupId != 'Admin')
            {
                fileNameExport = domainId + '#' + userGroupId;
                fileName = filePath + '//' + fileNameExport;

tmpUserGroupId = sysSecurity.parmUserGroupId();
tmpDomainId = sysSecurity.parmDomainId();

                sysSecurity.save();
                sysSecurity.parmDomainId( domainId );
                sysSecurity.parmUserGroupId( userGroupId );
                sysSecurity.load();
                sysSecurity.export( fileName );
                }
            }
        }
    }
}

导入：

static void ImportUserGroupRightsFromFolder(Args _args)
{
    integer hdl, pos;
    FileName fileName;
    DomainId domainId;
    UserGroupId userGroupId;
    FilePath filePath = "C://temp_security//";
    int hwnd;
    #File
    ;
    filePath = winApi::browseForPath(hwnd);

    if (filePath)
    {
    filePath += '//';
    [hdl, fileName] = WinAPI::findFirstFile(filePath + #AllFilesName +
    #AllFilesExt);
    setPrefix('Start');
    while (fileName)
    {
        pos = StrFind(filename,"#",1,strlen(fileName));
        if (pos > 0)
        {
            setprefix(filePath + filename);
            domainId = substr(fileName,1,pos-1);
            userGroupId = strreplace(substr(fileName,pos+1,strlen(fileName)),'.asg','');
            info(strfmt('Domain: %1, Group: %2',domainId,userGroupId));
            //info(userGroupId);
            sysSecurityUserGroup::importRights(userGroupId,domainId,filePath + fileName);
        }
        fileName = WinAPI::findNextFile(hdl);
        }
        WinAPI::findClose(hdl);
    }
}