Lotus Notes的教程- Lotus Notes和Domino企業教育

我的LotusScript庫函數和示例代碼，我發現有用的，在這個項目中使用。 一些簡單的和一些不。 或很少研究和工作之前，我來上班。 在這篇文章中，作為例子。 簽署過的LotusScript電子郵件。

存在的問題。
當從後端的LotusScript記錄，​​然後顯示用戶的前端/類的用戶界面，用戶的電子郵件簽名。 （如果啟用）將代表北低的期望為文本文件的頂部插入。

解決方案：
禁用簽名和開放。 工作在下面的示例代碼所示。

限制。
這僅僅是一個例子。 禁用用戶的電子郵件簽名。 要插入到底。 您的電子郵件的內容。 （在這個例子中的“Hello World！”），您可以編輯的例子和閱讀簽名的 Lotus Notes 文檔簡介，然後插入

預 - 先決條件：
這已經在Lotus Notes 6.5.3的測試，但應在早期的版本，如R5和以後 ND7釋放，工作。
如果你有這樣的核查工作，撰寫評論。 （或工作），其他車型。

下面是一個示例代碼。
1）創建學校紀錄後端的LotusScript。
2）禁用用戶的電子郵件簽名。
3）記錄顯示，用戶前端的LotusScript學習和
4）重新啟用用戶的電子郵件簽名。

請注意。 NotesRichTextItem。 在這個例子中的改進中ND6。

' ------------------------------------------------

昏暗的工作區，新NotesUIWorkspace
DIM dbMail作為 NotesDatabase
由於使用NotesDocument DIM docMail
DIM rtitem作為 NotesRichTextItem

由於使用NotesDocument DIM docProfile
作為字符串昏暗的strProfileEnableSignature

“打開用戶的郵件數據庫
dbMail =新NotesDatabase（“”，“）
呼叫dbMail.OpenMail
如果沒有 dbMail.IsOpen然後
呼叫的MessageBox（“無法打開郵件數據庫。”48，“錯誤”）
退出小組
結束如果

“創建新的備忘錄，從後端
設置 docMail = dbMail.CreateDocument
docMail.Form =“備忘錄”
docMail.Subject =“你好”
rtitem =新NotesRichTextItem（docMail，“身體”）
呼叫rtitem.AppendText（“世界您好！”）
CALL rtitem.AddNewline（1）
呼叫rtitem.Update“更新的方法是在ND6

“禁用用戶的郵件配置文件中的簽名
設置 docProfile = dbMail.GetProfileDocument（“CalendarProfile”）
strProfileEnableSignature = docProfile.EnableSignature（0）
如果strProfileEnableSignature =“1”，然後
docProfile.EnableSignature =“”
致電 docProfile.Save（真，假）
結束如果

“UI /前端顯示備忘錄
設置 uidoc = workspace.EditDocument（誠然，docMail，，真，真）

“重新啟用簽名用戶的郵件配置文件
如果strProfileEnableSignature =“1”，然後
docProfile.EnableSignature =“1”
致電 docProfile.Save（真，假）
結束如果

4206觀眾觀看了13358次

指出，它

隱藏網站