CodeStore. Коды Примеры Шаблоны

1. How to configure SSO with LTPA for IBM Lotus Connections 2.0

This article explains how to configure single sign-on (SSO) with Lightweight Third-Party Authentication (LTPA) for IBM® Lotus® Connections 2.0. Learn the basics of SSO and LTPA and the detailed steps for configuring SSO in a stand-alone environment.

2. LotusScript accesses clipboard to view copied Notes documents

Find out how to access copied Lotus Notes documents on your clipboard with this downloadable LotusScript code. This tip is helpful when using queryPaste events to determine what content is being pasted into a Lotus Notes database.

3. Open database listed in an email ( like GSX errors )

Sub Initialize
' posted to http://www.openntf.org/projects/codebin/codebin.nsf/CodeByDate/BB07663266C769D2862574F60054154B
' written by Mike Mortin, 20070830 Dim ws As New NotesUIWorkspace
Dim uiDoc As NotesUIDocument
Dim nServer As NotesName
Dim tempStr As String, fileList As String, server As String
Dim tempVar As Variant
Dim index As Integer
Const kDelim = " " ' get email content
Set uiDoc = ws.CurrentDocument
tempStr = uiDoc.FieldGetText("body") ' split and join to remove unwanted characters
tempVar = Split(tempStr, Chr(13)) ' new line characters
tempVar = Join(tempVar, kDelim)
tempVar = Split(tempVar, "'") ' single quotes
tempVar = Join(tempVar, kDelim) ' lastly, split into words
tempVar = Split(tempVar, kDelim) ' spaces ' server name is the next entry
Set nServer = New notesName(tempVar(3))
server = nServer.Common ' then parse through remaining entries to get all mailfiles listed
For index = Lbound(tempVar) To Ubound(tempVar)
Print tempVar(index)
If Instr( tempVar(index), ".nsf" ) > 0 Then
' add it to the list
tempStr = Left( tempVar(index), Instr( tempVar(index), "nsf") +2 )
fileList = fileList & tempStr & ","
End If
Next index ' now, did we find any mail files? If Len(fileList) > 0 Then
' make the list and tighen it up
tempVar = Split( fileList, "," )
tempVar = Arrayunique(tempVar)
tempVar = Fulltrim(tempVar) ' present and open the db
tempStr = ws.Prompt(4, "Select the database on " & server & " that you want to open.", "Click 'Cancel' to exit.", "", Split( fileList, "," ))
If tempStr <> "" Then Call ws.OpenDatabase(server, tempStr)
Else
Msgbox "No mailfiles detected"
End If
End Sub

4. Modify or Remove any field in the current view

Sub Initialize
' from the current view, removes a field or modifies a field in every document
' posted to http://www.openntf.org/Projects/codebin/codebin.nsf/CodeBySubCategory/A37FAED4F7480160862574F10071BAAA
' written by Mike Mortin 20081029
On Error Goto ErrorHandler
Dim s As NotesSession
Dim ws As New NotesUIWorkspace
Dim currentDb As NotesDatabase
Dim uiView As NotesUIView
Dim view As NotesView
Dim coll As notesViewEntryCollection
Dim entry As NotesViewEntry
Dim doc As NotesDocument
Dim field As String, newValue As String, msg As String, action As String
Dim items As Variant
Const kActionRemove = "remove"
Const kActionReplace = "replace"
Const kActionNone = ""
Const kMsgNoActionDone = "No changes made." ' setup
Set uiView = ws.CurrentView
Set view = uiView.View
Set coll = view.AllEntries ' get a list of all items
Set doc = coll.GetFirstEntry.Document
Forall item In coll.GetFirstEntry.Document.items
items = items & item.name & ","
End Forall ' tighten up the list
items = Split(items, ",")
items = Fulltrim(items)
items = Arrayunique(items) ' find out what action we are doing
If Msgbox("Click 'No' to replace values or to exit.", MB_YESNO, "Are you going to REMOVE a field?") = IDYES Then
action = kActionRemove
Elseif Msgbox("Click 'No' to exit.", MB_YESNO, "Then you must be REPLACING data in a field?") = IDYES Then
action = kActionReplace
Else
action = kActionNone
End If ' prompt for the item to change
If action <> kActionNone Then field = ws.Prompt(PROMPT_OKCANCELEDITCOMBO, "Please select the field you wish to " & action, "or enter a field manually.", "", items) Select Case action
Case kActionRemove
' verify the action
If Msgbox("Click 'No' to cancel.", MB_YESNO, "Are you sure you want to REMOVE " & field & " from all document in this view?") = IDYES Then
' loop through all docs in view and remove the item in question
Set entry = coll.GetFirstEntry
While Not entry Is Nothing
Set doc = entry.Document
' Call doc.RemoveItem(field)
' Call doc.Save(True,False)
Set entry = coll.GetNextEntry(entry)
Wend
msg = "Finished removing '" & field & "' from all documents at " & Time()
Else
msg = kMsgNoActionDone
End If
Case kActionReplace
If Msgbox("This might take a few minutes as each document will be examined.", MB_YESNO, "Do you want see all the current values or type one in manually?") = IDYES Then
' grab all current entries
items = ""
Set entry = coll.GetFirstEntry
While Not entry Is Nothing
Set doc = entry.Document
items = items & doc.GetItemValue(field)(0) & ","
Set entry = coll.GetNextEntry(entry)
Wend ' tighten up the list
items = Split(items, ",")
items = Fulltrim(items)
items = Arrayunique(items) ' prompt for a new value
newValue = ws.Prompt(PROMPT_OKCANCELEDITCOMBO, "Please select the value you want to use", "or enter a value manually.", "", items)
Else
' prompt for a new value
newValue = Inputbox("Please enter the new value for '" & field & "")
End If ' verify the action
If Msgbox("Currently setting '" & field & "' = '" & newValue &"'.", MB_YESNO, "Are you sure you want to set " & field & " = " & newValue & " for all documents in this view?") = IDYES Then
' Call coll.StampAll(field, newValue)
msg = "Finished stamping all documents with " & field & " = " & newValue & " at " & Time()
Else
msg = kMsgNoActionDone
End If
Case kActionNone
msg = kMsgNoActionDone
End Select ' fall through to print a message
ErrorHandler: If msg = "" Then msg = "Your action did not complete successfully. Please investigate. (" & Now() & ")" Msgbox msg
Exit Sub ' gets around "No Resume" error
End Sub

5. Get Your Enterprise NAB from the current database ( shorten your code )

Function GetEnterpriseNAB( default As String ) As NotesDatabase
' returns the NAB from the server the current Db is on
' posted to http://www.openntf.org/projects/codebin/codebin.nsf/CodeBySubCategory/808CDC4680D8BF37862574EF006EDD01
' written by Mike Mortin
Dim s As New NotesSession
Dim db As NotesDatabase
Dim server As String
Dim nname As NotesName ' set the default
If default = "" Then default = "Admin01/Operations/CA" ' get our parent server to get the NAB
Set db = s.CurrentDatabase
Set nname = New NotesName(db.Server)
server = nname.Common ' now, use default server if we are local
If server = "" Then server = default ' finally, grab names.nsf from that server
Set GetEnterpriseNAB = New NotesDatabase(server, "names.nsf")
End Function

Форумы о Lotus Notes/Domino:

Форумы Lotus

Lotus -- подфорумы

Форум системных администраторов > /MISC > Lotus

IBM Lotus

Lotus Sandbox

Список форумов ИнтерТраст

Notes/Domino 6 and 7 Forum

Notes/Domino 8 Forum

"IBM Lotus Notes/Domino - практическое использование"

Fidonet RU.NOTES

Lotus Notes/Domino - обмен опытом

Прикладное программирование >> Lotus Notes/Domino

Интенет эфир о Lotus Notes. Блоги и форумы

1. Foreign SMTP Domain

Здравствуйте!
Вопрос такой:
4 сервера Lotus, один домен. Нужно сделать так, чтобы 3 сервера отправляли почту во "внешку" с одного.
Foreign SMTP Domain - занимается этим. Я никак не могу найти, где его настроить или добавить. Читал, что надо делать в адресной книге, но такого названия я там не увидел.

2. Exploring New Features in IBM Lotus Notes 8 web seminar

The Exploring New Features in IBM Lotus Notes 8 web seminar is a versatile seminar that quickly shows current Notes users how to use the new Notes 8 client to be more productive, highlighting changes

3. Moving from Microsoft Outlook® 2003 to IBM Lotus Notes 8 web seminar

The Moving from Microsoft Outlook 2003 to IBM Lotus Notes 8 web seminar is a brief, versatile seminar that quickly shows current Microsoft Outlook 2003 users how to use the Lotus Notes 8 client to be

4. Using IBM Lotus Notes 8: Productivity Series web seminar

The Using IBM Lotus Notes 8: Productivity Series web seninar is a versatile set of seminar materials that quickly shows new Notes users how to use the Notes 8 client to be more productive in their job

5. Customization: How to tell if the mode is Full or Lite

If you're adding some customization code and need to be able to tell if you're in full or lite mode, you can do it like this: In 8.0.x: Check the value of window.AAA. In lite mode, it should poin

6. How to configure SSO with LTPA for IBM Lotus Connections 2.0

This article explains how to configure single sign-on (SSO) with Lightweight Third-Party Authentication (LTPA) for IBM® Lotus® Connections 2.0. Learn the basics of SSO and LTPA and the detailed steps for configuring SSO in a stand-alone environment.

7. Secure your IBM Lotus Forms-based application with digital signatures

In this article, learn how to use digital signature technology to prevent tampering during transmission. Follow the example provided in this article to design the form, sign the form, and verify the signature.

8. Requesting your list of 6.5.x - 8.0 app upgrade issues

For those of you who've been doing server updates and having to deal with any resulting application issues, I'm seeking to compile a document to help developers and admins size this task and know what ...

9. засада с профилем

В общем прохожусь по колекции профайлов
нахожу нужный
удаляю
НО
в последствии взяв профайл по имени я попадаю на удаленный со всеми итемсами .isDeleted = True
и флаг при f = Doc.Remove(True) возвращает всё время False
как же удалить профайл и не попадать на удаленный?

10. Sametime 7.5 под Ubuntu

Я - новичок в Ubuntu... Пытаюсь проинсталить Sametime 7.5 под Linux (ну очень нужно).
...

11. Lotus Notes и Intellimirror (windows)

Добрый вечер или день!!!
У меня возник вопрос, на который я надеюсь получить ответ - Как сделать так, что-бы при инсталяции клиентской части Lotus Notes "для всех пользователей компьютера" даные пользователя (*\lotus\notes\data) ложились не в C:\Documents and Settings\%USERNAME%\Local Settings\Application Data\Lotus\Notes\Data, а в C:\Documents and Settings\%USERNAME%\Application Data\Lotus\Notes\Data ? Где находиться файл настройки в котором прописано куда закидывать даные и настройки пользователя по умолчанию?

PS: Нужно найти файл (скорее всего находиться в C:\Program Files\lotus\notes), потому что клиетнская часть устанавливаеться, и создаеться папка откуда по умолчанию будут браться шаблоны C:\Documents and Settings\All Users\Application Data\Lotus\Notes\Data\Shared\ А уже потом, при первом запуске лотуса настраиваються свойства пользователя... и создаеться папка C:\Documents and Settings\%USERNAME%\Local Settings\Application Data\Lotus\Notes\Data, а надо чтобы создавалась в C:\Documents and Settings\%USERNAME%\Application Data\Lotus\Notes\Data...

Большое спасибо за помощь!!!!

12. Выпуск рассылки "Lotus Notes/Domino -- продукт и инструмент. Выпуск: 13" от 03 ...

Вышел новый выпуск рассылки "Lotus Notes/Domino -- продукт и инструмент.

13. Р"С"РїСгСГРє СѬР°СГСГС"Р"РєРё "Lotus Notes/Domino -- РїСѬРѭРґСгРєС" Рё РёРѬСГС ...

Р"С"СРѭР" РѬРѭРІС"Р№ РІС"РїСгСГРє СѬР°СГСГС"Р"РєРё "Lotus Notes/Domino -- РїСѬРѭРґСгРєС" Рё РёРѬСГС"СѬСгРѭРѭРѬС".

14. QueryClose annoyances

Versions 8.0 and later of Notes have a bug (SPR #AGUD7DSU3Q) where if there's a Queryclose event on a form, and the document is not "dirty," the Eclipse environment closes the document tab first, and ...

Блиц-опрос

Вакансии для специалистов

1. Jr Lotus Notes Administrator

Comtech LLC is an award winning, customer-oriented, full-service IT solutions provider serving the Federal Government, Department of Defense and other contractors.Job Title: Junior/Mid Level - Lotus N...

2. Lotus Notes Developer

Lotus Notes Developer, CT Job # 5983 Job Type: Full Time, regular direct position Local candidates Requirements; Four year college degree in IT related discipline 5 - 7 years experience in systems ana...

3. Lotus Notes Developer with PHP

--Description--Responsibilities: Kforce is seeking a Lotus Notes Developer for a direct hire position with a local Cincinnati client.This position will:Develop and implement software systems or enhanc...

4. Lotus Notes Domino Developer

--Description--Responsibilities: As a Lotus Notes/Domino Developer, you will be a key part of the group, working individually and as part of a team involved in the design and development of custom app...

5. Lotus Notes Support

--Description--Venturi Staffing is currently assisting their client Downtown Pittsburgh fulfill their need for a 6 month to 12 month temporary Lotus Notes Support Tech. Qualified candidate must have a...

6. Lotus Notes/Domino Developer

--Description--GO! Systems Inc, a Miami-based software firm is seeking experienced Lotus Notes/Domino Application Developers. GO! Systems is a premier services firm engaged in providing technology sol...

7. Lotus Notes Developer

Sr. and Mid-level Lotus Notes Developers needed for an upcoming project in downtown Sacramento. This is State Project and will begin in/around early December. Qualified candidates please apply, no thi...

8. Lotus Notes Developer

Domino 7 lotus notes application* DB2* RPG* AS400Project: They want someone to scope out and do the design and development. All work to be completed on-site in Tallahassee, Fl.

9. LOTUS NOTES DEVELOPER

Need Lotus Notes Developer with Web client Exp.Duration 6months plus Rate 45/hr IMMEDIATE INTERVIEW . PLEASE CALL IF YOU HAVE ANY QUESTIONS .Thanks.AhsanAhsan@sonsoftinc.com781-821-3678.

10. Lotus Notes Developer

One of the Major Financial Institutions in Phoenix,AZ is looking for a Lotus Notes Developer with following skills and experience:Will work in small motivated teams to analyze, design, code, test, and...

RTFM Читаем Справку (help.nsf)

1. Документ не содержит поля "SendTo". Воспользуйтесь командой "Переслать" меню "Действия". | Справка Lotus Notes 7

2. Документ был удален | Справка Lotus Notes 7

3. Добавьте почтовый файл &lt;имя файла базы данных&gt; в рабочую область | Справка Lotus Notes 7

4. Добавление, переименование и удаление изображений | Справка Lotus Notes 7

5. Добавление цвета в таблицу | Справка Lotus Notes 7

6. Данные, реплицируемые через сервер роуминг-пользователя | Справка Lotus Notes 7

7. Данные Notes | Справка Lotus Notes 7

8. Группы и роли | Справка Lotus Notes 7

9. Выход из службы экспресс-сообщений | Справка Lotus Notes 7

10. Вырезание и вставка данных в таблицах | Справка Lotus Notes 7

11. Включение режима автоматических оповещений | Справка Lotus Notes 7

12. Включение отладки Java | Справка Lotus Notes 7

13. Включение SwiftFile | Справка Lotus Notes 7

14. Включение Java-программ в среде Notes | Справка Lotus Notes 7

15. Пространство, отведенное в базе данных под представления, формы, агенты и общие поля, исчерпано. Удалите часть компонентов: &lt;имя базы данных&gt;. | Справка Lotus Notes 7

16. Просмотр файлов | Справка Lotus Notes 7

17. Просмотр списка агентов | Справка Lotus Notes 7

18. Просмотр сведений о документах | Справка Lotus Notes 7

19. Просмотр сведений о действиях пользователя и сервера | Справка Lotus Notes 7

20. Печать представления | Справка Lotus Notes 7

21. Печать наборов рамок | Справка Lotus Notes 7

22. Печать календаря | Справка Lotus Notes 7

23. Печать задач | Справка Lotus Notes 7

24. Печать документов | Справка Lotus Notes 7

25. Вы не можете удалить эту базу данных | Справка Lotus Notes 7

26. Вы не имеете права создавать базы данных на этом сервере &lt;имя сервера&gt; | Справка Lotus Notes 7

27. Вы не имеете права на доступ к этой базе данных | Справка Lotus Notes 7

28. Вы не имеете права на доступ к серверу | Справка Lotus Notes 7

Закладки о Lotus Notes

1. Lotus Notes/Domino 7 application performance: Part 1: Database properties and document collections

2. Lotus Notes/Domino 7 application performance: Part 2: Optimizing database views

3. http://www.templatekit.com/lotusnotes1.php

4. Badkey Corner | Lotus Notes 8 and NOMAD installation

5. IBM business email solution - Lotus Notes

6. developerWorks : Lotus updates, fixes, and utilities

7. IBM developerWorks : Lotus Notes on a Stick

8. Mein TiddlyWikiServer - in Probe !

9. Lotus Connections wiki