• Добро пожаловать на Форум пользователей ПО АСКОН. Пожалуйста, авторизуйтесь.
 

Уважаемые пользователи,

Хотим проинформировать вас о режиме работы регистрации на нашем сайте.

Зарегистрироваться возможно в рабочие дни, с 8:00 до 20:00 (мск).

Если у вас возникнут вопросы или потребуется дополнительная информация, не стесняйтесь обращаться к нашей службе поддержки. Вы можете связаться с нами по указанным контактным данным на нашем сайте.

Благодарим вас за понимание и сотрудничество. Мы ценим ваше терпение и стремимся предоставить вам лучший опыт использования нашего сервиса.

С уважением,
Команда Ascon

Обработчики серверных событий

Автор Frick, 24.05.12, 11:33:47

« назад - далее »

0 Пользователи и 1 гость просматривают эту тему.

Frick

Здравствуйте. В принципе, я понял теорию, понял, где располагать код собственно обработки если писать на WSC. С API лоцмана тоже работал при разработке отчётов. Но нет ни одного примера реального обработчика на WSC, и это не даёт сдвинуться с мёртвой точки в написании своих обработчиков. Не может ли кто нибудь, кто имел опыт в написании обработчиков, выложить простейший пример, который использовал бы передачу параметров от события и делал бы что-нибудь простое типа изменения значения атрибута например. Что есть основное, что следует учесть при написании обработчиков на WSC? Можно ли писать обработчик в wsc не только на VBScript, а например, на pascal script или JScript?  Реально очень необходим работающий пример для уяснения основных моментов и сути. Спасибо.

LDL

Вот такой вот пример.

KogolSV

Здравствуйте! Можно ли создать обработчик, который будет выполняться от имени администратора!? Например удаляет атрибут, который доступен только администратору, а обработчик будет выполнятся от пользователя.

Chaa

В обработчике можно создать отдельное подключение к СП от имени пользователя с необходимыми правами.

KogolSV

Пробовал метод ConnectToDBEx, ничего не получилось, не могли бы Вы скинуть пример!?

Chaa

var
    rc, em: OleVariant;
    LConnection: TDCOMConnection;
begin
    LConnection := TDCOMConnection.Create(nil);
    try
        LConnection.ServerGUID := '{392BA982-A82F-44AB-BA8A-69BE25199F73}';
        LConnection.ComputerName := 'localhost';
        LConnection.Connected := True;
        LConnection.AppServer.ConnectToDBEx('База', 'Пользователь', 'Пароль', rc, em);
        CheckRetCode(rc, em);
        ...
    finally
        LConnection.Free();
    end;
end;