摘要:
在逛论坛的时候发现的,看到写的不错,故而摘抄了下来。希望大家共同努力! 注意:这个方法是将附件放到富文本中,然后再将富文本当做存储的介质,进行存取删的操作 取附件方法------------------------------------------ 通过Notesdocument.EmabledObjects属性取得 Java代码 Dim db As NotesDatabase Dim view As NotesView Dim doc As NotesDocument Set db = New NotesDatabase( "SanFrancisco", "h 阅读全文
posted @ 2012-01-04 22:24
hannover
阅读(2636)
评论(1)
推荐(0)
摘要:
前段时间用lotus写了个内容发布系统,使用notesRichTextItem保存内容。首页有个栏目块需要抽取文章的摘要信息(也就前多少个字符),手动输入的内容没问题,可以正常抽取;可是用户有时候在文档的前面插了个图片,或是从Word、网页上复制下来的信息贴进去保存之后,notesRichTextItem里面的内容就会带有<html>代码格式,抽取数据时数据、格式的问题就来了,晕啊。 在网上找到一个解决办法,就是在Lotusscript代理中调用正则将得到的内容先替换,然后再截取内容片断。具体代码如下(用于window平台): Class RegExp ' RegExp - 阅读全文
posted @ 2012-01-04 06:13
hannover
阅读(2294)
评论(0)
推荐(0)