虽然这个问题已经讲过许多次,这里还是再说一次:)
这里主要用到了notesuidocument的selectall 与 deselectall 成员函数.他们的用法如下: 【程序编程相关:如何在Lotus Domino中设置PA】
当rtf文本中仅仅包含一个文档链接.ole 对象或文件附件,而没有文字的时候,怎样检查rtf文本域中是否为空? 【推荐阅读:如何在Windows 2000上创建性能】
call notesuidocument.deselectall 【扩展信息:如何限制普通用户访问Domino Adm】
call notesuidocument.selectall
如果文档在编辑模式下,则selectall 成员函数选择当前域的内容.如果文档处于读模式,则选择全部文档内容.
与selectall 相反,deselectall取消选取文档的全部内容.当没有选择任何条目时,deselectall函数将产生一个编号为4407的错误(“文档命令无效”错误).
由于文档链接.附件.ole对象等都是可以选择的内容,selectall 成员函数可以作用与rtf 文本域的任何内容.因此,只要当前文档处于编辑模式下,就可以执行以下语句:
call uidoc.gotofield("richtextfield")
call uidoc.selectall
call uidoc.deselectall
如果deselectall函数产生错误4407,就说明该rtf文本域中没有任何内容.
下面的isrtfnull函数检查rtf文本域是否为空.参数rtfield 为rtf域的域名.如果函数返回true,说明该域中没有任何内容,否则返回 false.
function isrtfnull(rtfield as string) as integer
on error goto errhandle
... 下一页