配色: 字号:
06.RTF域完全掌握
2014-01-08 | 阅:  转:  |  分享 
  


??RTF域完全掌握

1、RTF域是Notes中最重要的域,由于它能够保存文本、声音、图片、动画、附件以及按钮操作、链接等多媒体信息资料,是Notes不同于普通关系型数据库的重要特征。

2、RTF域的存储容量仅受机器硬盘限制,可以任意大的文件和程序。

3、当存储各种类型的RTF域,改变域类型成为文本类型时,仅其中的文本字符能够保存,其他的图片、附件等不能保存在文本类型域中。

4、RTF域在编程中,是不能通过公式函数来计算处理的,只能通过LotusScript来对其进行复制操作。

5、以下是用LotusScript复制、添加RTF域内容,经测试无误。

SubClick(SourceAsButton)%REMRTF域复制操作作者:tnda2000.3.5http://notes.363.netmail:notes@363.netRTF域值在程序中编辑修改后,只能调用doc.save(false,true),不能调用uidoc.save,也不能在文档中单击保存按钮,否则后台修改无效。并且其修改的内容当前不能显示,只有不保存退出文档,再打开才能显示。因为RTF域只能通过后台LotusScript修改。%ENDREM?DimuiwAsNewnotesuiworkspaceDimuidocAsnotesuidocumentDimdocAsnotesdocumentSetuidoc=uiw.currentdocumentSetdoc=uidoc.document''获得当前文档Dimrtitem1AsNotesRichTextItemSetrtitem1=doc.GetFirstItem("aaaa")Ifrtitem1IsNothingThenExitSubIfrtitem1.Type<>RICHTEXTThenExitSub''文档没有保存以前,无法发现RTF域Callrtitem1.AppendText("这是第一个域值内容")?Dimrtitem2AsNotesRichTextItemSetrtitem2=rtitem1.CopyItemToDocument(doc,"bbbb")Callrtitem2.AppendText("这是第二个域新内容")?Calldoc.Save(False,True)EndSub



献花(0)
+1
(本文系Lotus开发首藏)