Lotus Designer
Sakkie_lu
这个作者很懒,什么都没留下…
展开
-
LotusScript上传Excel附件并显示内容
Sub uploadFileDim ws As New NotesUIWorkspaceDim uidoc As NotesUIDocumentSet uidoc = ws.CurrentDocumentCall uidoc.SaveDim doc As NotesDocumentSet doc = uidoc.DocumentDim session As New No原创 2012-12-14 17:35:57 · 970 阅读 · 0 评论 -
判断RTF域中的内容是否为空
判断RTF域是否有值(文本或附件):On Error Goto label1 Dim ws As New notesuiworkspace Dim uidoc As notesuidocument Set uidoc=ws.currentdocument Call uidoc.gotofield("richTextField") ‘将光标放在指定的域转载 2012-12-14 17:52:38 · 858 阅读 · 0 评论 -
保存并重新打开文档(用以实现部分计算域的更新)
call doc.save(True,True)call uidoc.close(True)call ws.EditDocument(True,doc)原创 2013-04-18 14:06:01 · 553 阅读 · 0 评论