Ibm-Domino

有沒有辦法在 LotusNotes 中為所有使用者添加額外的日曆?

  • September 11, 2015

我們有一個使用者日曆,其中包含我們希望預設情況下可供所有其他使用者閱讀的特定時間表。使用者可以輕鬆地手動添加上述日曆,但事實證明,要讓一些使用者理解如何做有點困難。我們使用的 Lotus Notes 和伺服器都是 9.0.1 版本。

有沒有辦法將此特定設置部署到所有使用者,以便所有現有使用者和新使用者預設情況下都可以在他們的工作區中使用此日曆?

據我所知,沒有任何政策或類似的東西可以做到這一點。但是如果您知道資訊的儲存位置,那麼您可以編寫 LotusScript 程式碼來向使用者提供這個日曆。

該資訊儲存在使用者郵件文件中呼叫的項目CalURLs中。CalendarProfile

自動填充它的程式碼可能如下所示:

Dim docProfile as NotesDocument
Dim db as NotesDatabase
Dim itemUrl as NotesItem
Dim strNewEntry as String

'you get the correct entry by inspecting the CalendarProfile 
'of a user where you manually added the calendar
' or by checking http://www-01.ibm.com/support/docview.wss?uid=swg21636496
strNewEntry = "some text" 
Set db = New NotesDatabase( MailServerOfUser, MailFilePath )
Set docProfile = db.GetProfileDocument( "CalendarProfile" )
Set itemUrl = docProfile.GetFirstItem( "CalURLs" )
If isnull arraygetindex( itemUrLs.values, strNewEntry ) then
 Call itemUrl.AppendToTextList( strNewEntry )
 Call docProfile.Save( True, true, true )
end If

此程式碼完全未經測試,可能包含拼寫錯誤。它不包含任何錯誤處理。

要獲得 CalURL-Entries 的正確語法,請使用此 url

日曆配置文件的一個問題是:它一直被許多使用者互動保存。在沒有使用者互動的情況下“在後端”編寫它很可能會失去新的值。

但是如果使用者在他的客戶端中執行此操作(使用一個按鈕或數據庫的 PostOpenScript),那麼他需要關閉他的郵件數據庫的所有視窗才能看到新條目。

引用自:https://serverfault.com/questions/720825