[转载]如何使用 LotusScript 来快速创建连接文档？

平台: PC

产品: Lotus Notes

软件版本：6.x, 5.x

　　您想在电子邮件中发送一个热点按钮给某个用户，使其可以在个人地址本中创建一个连接文档。用 　　LotusScript 如何实现该功能？

　　R5 客户端的一个很重要的功能是当您在打开数据库对话框中输入 Domino 服务器的 IP 地址时，客户端会自动创建一个连接文档。它将 Domino 服务器的层次结构名称写入“服务器名称”域，将其 IP 地址写入“目的服务器地址域”，将“*”写入“限以下场所”和“限以下用户”域。

　　所以，通过使用上面的功能，可以很方便的由系统直接创建连接文档.

　　同时,使用 LotusScript 您也可以很容易地在用户的个人地址本中创建连接文档。在下面的例子中，"x.x.x.x" 代表 IP 地址，用双引号括起来。

　　如果您想打开某个数据库，同时创建一个连接文档，则可以使用 OpenDatabase 方法 (属于 NotesUIWorkspace 类):

Dim ws As New NotesUIWorkspace
Call ws.OpenDatabase("x.x.x.x","dbname.nsf")

如果您想将某个数据库的图标添加到工作台上，同时创建一个连接文档，则可以使用 AddDatabase 方法( NotesUIWorkspace 类):

Dim ws As New NotesUIWorkspace
Call ws.adddatabase("x.x.x.x","dbname.nsf")

如果您只是想添加连接文档，则可以使用 New 方法 (属于 NotesDatabase 类):

Dim db As New NotesDatabase("x.x.x.x", "names")

如果使用按钮来邮寄该代码，则将该代码放在 Click 事件中。
欢迎访问：www.chinalotus.com