Познакомьтесь с пентестом веб-приложений на практике в нашем новом бесплатном курсе
большое спасибо. Попробую глянуть в новом году. Сейчас не смогу ничего протестировать. С наступающим 2015 годом! <_<ага, понял.
names.nsf как правило должна быть всегда, даже на локале создается.
Когда пользователя регистрируют в лотусе, то там создается его карточка.
Посмотрите на сервере базу, лежит в корне.
По сути, когда используется @PickList(Name), то из этой базы и берутся значения, диалоговое окно только специфичное и не поменять его.
В этой базе уже есть куча представлений/view, в которых отображаются списки.
Их можно использовать.
dim curdoc as notesdocument
set curdoc = Source.document
dim curdoc as notesdocument
set curdoc = Source.document
Взаимно)Всех с праздниками!
В футере сайта размещена контактная информация, права и прочая текстовая информация. Есть идея сделать футер интерактивным))
Добавить функцию посдчета количества документов в базе и выводить ее в футер.
Пример: Сейчас в системе зарегистрировано "@формула" документов.
Страница сайта на которой футер - страница авторизации (domcfg.nsf).
Можно это реализовать собака формулой или это через скрипт возможно сделать только?
'обновить View, чтобы вылезли кнопки
Dim view As notesview
Dim db As NotesDatabase
Set db = curdoc.ParentDatabase
Set view = db.GetView("Структура")
Эт совсем ничего не обновляет.Код:'обновить View, чтобы вылезли кнопки Dim view As notesview Dim db As NotesDatabase Set db = curdoc.ParentDatabase Set view = db.GetView("Структура")
О, Великий Человек, спасибо за листинг! Заработало!Эт совсем ничего не обновляет.
Это обновляет:
Dim ws As New NotesUIWorkspace
Call ws.ViewRefresh
Хотя, сдаётся мне, дело в логике скрытия actions.
Каковы формулы скрытия?
curdoc.form = "Department"
Call curdoc.Save(True, True)
Set parentdoc = ws.CurrentDatabase.Database.GetDocumentByUNID(curdoc.ParentDocumentUNID)
Call curdoc.MakeResponse(parentdoc)
это не имеет смысла - curdoc ещё не имеет родителя. Потому и invalid UNID.Код:Set parentdoc = ws.CurrentDatabase.Database.GetDocumentByUNID(curdoc.ParentDocumentUNID)
Set curdoc = db.CreateDocument
curdoc.Form = "Department"
curdoc.OrgID = parentdoc.OrgID ' не пашет
Call curdoc.MakeResponse( parentdoc )
Call curdoc.Save( True, True )
curdoc.GetItemValue("OrgID")(0) = parentdoc.GetItemValue("OrgID")(0) ' не пашет
Call ws.ViewRefresh
Call ws.EditDocument(True, curdoc) ' не пашет
Обучение наступательной кибербезопасности в игровой форме. Начать игру!