• Познакомьтесь с пентестом веб-приложений на практике в нашем новом бесплатном курсе

    «Анализ защищенности веб-приложений»

    🔥 Записаться бесплатно!

  • CTF с учебными материалами Codeby Games

    Обучение кибербезопасности в игровой форме. Более 200 заданий по Active Directory, OSINT, PWN, Веб, Стеганографии, Реверс-инжинирингу, Форензике и Криптографии. Школа CTF с бесплатными курсами по всем категориям.

Иногда не запускается агент

  • Автор темы PavelT100
  • Дата начала
P

PavelT100

LN 7.0. Написал агент и запускаю его на сервере с помощью кнопки - примерно так :
[codebox]Sub Click(Source As Button)
Dim s As New NotesSession
Dim db As NotesDatabase
Dim agent As NotesAgent
Set db = s.CurrentDatabase
Set agent = db.GetAgent("Synchronisation Convertions ALF & Lotus")
If agent.RunOnServer = 0 Then
Messagebox "OK",, "Succès"
Else
Messagebox "ERROR...",, "Erreur"
End If
End Sub[/codebox]
При нажатии на кнопку появляются песочные часы, он работает несколько минут, что хорошо и заканчивается все messagebox "OK".
Но достаточно часто при нажатии на кнопку сообщение messagebox "OK" появляется мгновенно, а агент так и не начинает работать.
Надо иногода нажимать на кнопку 3-4 раза, а иногда и 20, чтобы добится того чтобы агент запустился и начал работать. Сообщение Messagebox "ERROR..." ни разу не возникало . Что бы это могло быть и как с этим бороться, хотя бы знать как программно определить - выполнился агент или нет ?
 
O

Omh

Так может агент по какому-нибудь условию выходит мгновенно.
Это уже агента смотреть надо....
 
S

Sandr

agent.RunOnServer не равен нулю тока если агента такого нет.. или прав на запуск нет... Если в агенте ошибка, всеравно 0 будет...
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!