S
Познакомьтесь с пентестом веб-приложений на практике в нашем новом бесплатном курсе
Set session = New NotesSession
Set db = session.CurrentDatabase
Set currSrv = New NotesName(db.Server)
Set evnt = New NotesDocument(db)
Set config = db.GetProfileDocument("Config")
evnt.ReplaceItemValue "Form","RawIN"
evnt.ReplaceItemValue "$ConflictAction","3"
Set item = evnt.ReplaceItemValue("InTime", evnt.Created)
item.IsProtected = True
evnt.ReplaceItemValue "EvntServer", currSrv.Canonical
evnt.ReplaceItemValue "$NoPurge", Cdat(evnt.InTime(0)+Cint(config.EvntLifeTime(0)))
Set item = evnt.ReplaceItemValue("UserName", session.UserName)
item.IsAuthors = True
item.IsProtected = True
????............
2. Записывать сумму в профайл и считывать/записывать из него. Тут ограничение на одновременное редактирование профайла сотрудниками.
...............
Мне так подумалось, потому, что ["О-па, а попробуй еще раз" в цикле] я подразумевал по дефолту (конечно, без месседжа)Никто про UI и не говорил, не придумывайте
Ага, понятно. Тогда, конечно. сервером.Shandrik
Лимит хранится в настройке.
На лету как? если я например из 20 документов вижу только 3 и сумма по этим трем не превышает лимит, а сумма уже по 10 превышает.
Не видя и не имея доступа к оставшимся 17 документам я не полулу корректных данных. Так уже работает, но именно из-за ограничения и есть проблемы.
Обучение наступательной кибербезопасности в игровой форме. Начать игру!