lotus开发经验小要点

如何在页面上建立一个热点,让它打开一个文档?

在页面上写热点文字,然后选上文字,然后点菜单”创建” –热点--操作热点

然后选LotusScript ,举个例子,比如打开ID 为x的文档:

Sub Click(Source As Button)

Dim uiworkspace As New notesuiworkspace

Dim curdatabase As notesuidatabase

Dim database As notesdatabase

Dim doc As notesdocument

Set curdatabase = uiworkspace.currentdatabase

Set database = curdatabase.database

Set doc = database.getdocumentbyid("x ")

Call uiworkspace.EditDocument(True,doc,False )

End Sub