Экспорт лицензии AX 4.0 и AX 2009 в файл

Запись от Kabardian размещена 28.05.2012 в 15:31
Обновил(-а) Kabardian 03.06.2012 в 11:53

Для экспорта лицензии из какой-либо инсталляции AX 4.0 или AX 2009 в файл достаточно:

разобраться со структурой файла лицензии
экспортировать данные из системной таблицы SysConfig в текстовый файл с учетом структуры файла лицензии

После экспорта файл лицензии можно использовать по назначению :-).
-------------------------------------
Джоб, который экспортирует лицензию в текстовый файл (проверялся на AX 2009, но должен также работать на AX 4.0):

X++:

static void ASB_ExportLicenceFile(Args _args)
{
    SysConfig   sysConfig;
    AsciiIO file = new AsciiIO("c:\\license.txt", "W"); //TODO: указать путь
    ;

    file.read();

    file.write("LicenseVersion 2");
    file.write("");

    select sysConfig
    where sysConfig.configType == ConfigType::LicenseName;  //TODO: изменить значение для версий: AX4.0 - ConfigType::LicensName, AX 2009 - ConfigType::LicenseName
    file.write(strFmt("License #%1", sysConfig.value));

    file.write(" Properties");
    select sysConfig
    where sysConfig.configType == ConfigType::SerialNo;
    file.write(strFmt("  Serial #%1", sysConfig.value));
    file.write(" EndProperties");
    file.write("");
    file.write(" Codes");
    file.write("");

    while select sysConfig
    order by id
    where sysConfig.configType == ConfigType::AccessCodes &&
          sysConfig.value != ""
    {
        file.write(strFmt("  CodeLine #%1", sysConfig.id + 1)); //TODO: проверить зачем к номеру ID прибавляется единица
        file.write(strFmt("    Value #%1", sysConfig.value));
        file.write("  EndCodeLine");
        file.write("");
    }

    file.write(" EndCodes");
    file.write("");
    file.write("EndLicense");

    box::info("Конец!");
}

Размещено в Бложик

Просмотров 47528 Комментарии 2

« Предыдущее Главная страница Следующее »

Всего комментариев 2

Архив
< Декабрь 2024
Вс	Пн	Вт	Ср	Чт	Пт	Сб
24	25	26	27	28	29	30
1	2	3	4	5	6	7
8	9	10	11	12	13	14
15	16	17	18	19	20	21
22	23	24	25	26	27	28
29	30	31	1	2	3	4

	Работает и в Ах 3.0, лишь ConfigType::LicensName
	Запись от Player1 размещена 27.10.2012 в 08:57

	Работает и в DAX 2012 R3
	Запись от dmitrybarynov размещена 10.02.2020 в 14:19

Сообщение форума

Отменить изменения