Мне казалось, я сие уже делал. Или только собирался, но не сделал?!

T16bit WINAPI EnCryptFile (char *file_in,
char *file_out,
T16bit node_From,
P16bit node_To,
char *ser);
Функция имеет параметры:
(i) file_in — указатель на строку полного пути к незашифрованному файлу;
(i) file_out — указатель на строку полного пути к зашифрованному файлу;
(i) node_From — номер ключа шифрования отправителя (XXXX), представленный в виде числа типа unsigned short;
(i) node_To — список номеров ключей получателей, который представляется строкой элементов, имеющих тип unsigned short, и оканчивается нулем (0);
(i) ser — указатель на строку длиной 6 символов с номером серии (SSSSSS) открытых ключей шифрования получателей. Если в качестве значения этого параметра указать последовательность из шести нулевых символов (\0\0\0\0\0\0), т. е. зашифрованный файл предназначен для пользователей с тем же номером серии, что и у отправителя, то номер серии берется из драйвера хранения ключевой информации.
Пример вызова функции зашифрования:
char ser_To[7] = “000005”;
node_To[0] = 2;
node_To[1] = 3;
node_To[2] = 0;
node_From = 1;
error_code = EnCryptFile("C:\\AUTOEXEC.BAT", "C:\\TEST.TST",
node_From, node_To , ser_To);

пытаюсь
Set UserWrap = CreateObject("DynamicWrapperX")
UserWrap.Register "wbotho.dll", "EnCryptFile", "i=sstss", "r=t"
res = UserWrap.EnCryptFile("C:\\AUTOEXEC.BAT", "C:\\TEST.TST",1,array(2,3,0),"000005")

Получаю
Ошибка выполнения Microsoft VBScript: Несоответствие типа: 'UserWrap.EnCryptFile'

Как передать в виде аргумента строку элементов, имеющих тип unsigned short, и оканчивающийся нулем ?

А так всё сразу станет ясно — другой номер версии + ещё один разработчик приложил руку.

Согласен. Исправил.

Я думаю, пусть пока пройдет тестирование, потом изменим.

Неправильные файлы разойдутся. Скрипт, работающий с одним, не будет работать с другим, и будет непонятно, в чём дело. Как я уже говорил, Семёрка некоторые поля в свойствах не показывает, а глянуть в ResHacker'е надо ещё как-то додуматься. А так всё сразу станет ясно — другой номер версии + ещё один разработчик приложил руку.

Или такая идея: измените номер версии и добавьте себя в копирайт. Чтобы не вставлять куда-то длинных описаний.

Я думаю, пусть пока пройдет тестирование, потом изменим. 

Честно, я не вижу в этом никакого практического смысла.

Ещё такой вопрос приходил мне в голову: если объекту добавляются новые методы, не положено ли вообще менять CLSID? Ведь по сути это уже не тот объект, что был, а CLSID должен идентифицировать объект однозначно. Вроде бы. Не дошли руки выяснить этот вопрос, да и не очень пока представляю, где искать ответ.

chessman
Зря не пометили в ресурсах DLL, что версия другая.

Как не пометил? В "Варианте" написал.

http://forum.script-coding.com/viewtopi … 547#p48547

Сегодня попробовал на боевой базе, на Win 7, все взлетело.