调整iNotes邮箱显示的组件（WEB）

.../<邮箱名>/inotes/mail/?OpenDocument&ui=portal

除了邮件(mail)还可以使用下面这些：

要显示	关键字
邮箱	mail
日历	calendar
待办	todo
通讯录	contacts
记事本	notebook

ui参数还有
dwa_lite iNotes lite 模式（8.5+）
dwa_ulite iNotes ultra lite 模式（8.5+）

通过设置PresetFields参数选择打开的视图，比如打开发件箱：

也可以在notes.ini里配置iNotes_WA_Areas

配置格式 iNotes_WA_Areas = ABCDEF
A = 欢迎（取0不显示，取1不显示）
B = 邮件
C = 日历
D = 待办事宜
E = 联系人
F = 记事本
比如只显示邮件和通讯录:
iNotes_WA_Areas = 010010

其他一些iNotes可选参数：

开启iNotes RSS订阅功能：.../<邮箱名>/iNotes/Proxy/?OpenDocument&Form=s_RSS&NKA

具体配置见：Enabling RSS feeds for Lotus iNotes

iNotes 8.0（Forms*.ntf）修改

iNotes简洁版（ultra-light）

http://server.domain/mailfile path/?OpenDatabase&ui=inotes_ulite

禁用ultra-light：Notes_WA_Ultralight=0

隐藏注销按钮：
http://server.domain/mailfile path/inotes/mail/?OpenDocument&ui=mail&layout=LO!H
启用设置-安全中的修改Internet密码打开配置设置Lotus iNotes - 要求 SSL 以访问安全邮件功能 设置为无Lotus iNotes - 修改 Internet 口令 设置为启用
文档删除后马上更新限额显示（8.5+）：事务记录-限额限制 选择“添加注释时检查文件中使用的空间”

附件类型安全控制白名单（8.5.3+）

在 Lotus iNotes 8.5.3 之前的版本，当用户双击邮件里的附件时，对于某些类型的附件，例如 .jpg，.txt，.html，iNotes 会直接在浏览器中将其打开。若附件中含有危害浏览器客户端的不安全代码，直接将其打开会运行这些不安全代码，从而威胁系统安全。为了提高 Lotus iNotes 的安全性，从 Lotus iNotes 8.5.3 开始，我们在代码中增加附件类型标识字段，用于引导浏览器将附件保存到本地之后，再通过相关联的应用程序打开。用户可通过如下 Notes.ini 参数来设置该功能

iNotes_WA_Sec_AttachCDHeader (0 or 1)

此 Notes.ini 用于打开 / 关闭附件类型标识字段的功能，当值为 1 时，除白名单中所列附件类型外，其它所有类型附件都受附件类型标识字段控制，当值为 0 时，关闭附件类型标识字段的控制，默认值为 1。

iNotes_WA_Sec_AttachCDWhiteList

此 Notes.ini 用于指定哪些类型的附件可不受附件类型标识字段的控制，即该类型附件可以直接在浏览器里面打开，而不是下载到本地之后再打开，各附件类型用逗号隔开

例如 :iNotes_WA_Sec_AttachCDWhiteList=jpg,pdf,gif

邮件策略设置

tell adminp pro mail policy

去掉导入ID标识

Dim s as new notessession
Dim db as notesdatabase
Dim doc as notesdocument
Set db=s.currentdatabase
Set doc = db.GetProfileDocument("iNotesProfile")
Call doc.Remove(True)
Set doc = db.GetProfileDocument("$Shimmerid")
Call doc.Remove(True)
Msgbox "profiles deleted"

邮件撤回 需要开启SSL并引入ID http://www-01.ibm.com/support/docview.wss?uid=swg21617623

获得所有iNotes简要表信息

Dim s As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Set db=s.currentdatabase
Set doc = db.GetProfileDocument("iNotesProfile")
'Set doc = db.GetProfileDocument("Archive Profile")
ForAll item In doc.Items
Print item.Name + |:| + item.Text+ Chr(10) + Chr(13)
End ForAll

批量设置未读标记为红色

批量开启全文索引

导出邮件为eml格式