15 апреля стартует «Курс «SQL-injection Master» ©» от команды The Codeby
За 3 месяца вы пройдете путь от начальных навыков работы с SQL-запросами к базам данных до продвинутых техник. Научитесь находить уязвимости связанные с базами данных, и внедрять произвольный SQL-код в уязвимые приложения.
На последнюю неделю приходится экзамен, где нужно будет показать свои навыки, взломав ряд уязвимых учебных сайтов, и добыть флаги. Успешно сдавшие экзамен получат сертификат.
Запись на курс до 25 апреля. Получить промодоступ ...
Dim s As New NotesSession
Dim db As NotesDatabase
Dim dc As NotesDocumentCollection
Dim doc As NotesDocument
Set db = s.CurrentDatabase
Set dc = db.UnprocessedDocuments
If dc.Count <> 0 Then
Set doc = dc.GetFirstDocument
While Not doc Is Nothing
Call doc.ReplaceItemValue ("ДАТА_РЕГИСТРАЦИИ " , Cdat (doc.GetItemValue ("ДАТА_РЕГИСТРАЦИИ ")(0)))
Call doc.Save (True , False)
Set doc = dc.GetNextDocument (doc)
Wend
End If
удали и создай новое
мой вам совет - держаться подальше от этого методаесть метод appendItemValue(itemName$,value)
Видимо, имелось ввиду следующее:to ToxaRat что вы имели ввиду "перед реплейсем именно удалить итем"?
Call doc.RemoveItem("ItemName")
Call doc.ReplaceItemValue("ItemName", ItemValue)
Обучение наступательной кибербезопасности в игровой форме. Начать игру!