300分求RTF域如何操作?顶者有分!!

sd_lichangyou 2005-09-26 03:15:38
在代理中,我想把一个文档的RTF域值传给另一个新建得文档RTF域,如何做呀?

如果是文本域直接赋值就可以,但用同样的方法处理RTF域时就出问题,服务器报“变量没有
container”,如果要建container,该如何建呀? 还是技术上根本上就不可行?

好像最多只能给100!解决了问题,另开贴给分!顶者有分!
...全文
332 20 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
20 条回复
切换为时间正序
请发表友善的回复…
发表回复
hell_wolf 2005-10-08
  • 打赏
  • 举报
回复
up
Mc_Hill 2005-10-02
  • 打赏
  • 举报
回复
up
gui_yingzi 2005-09-30
  • 打赏
  • 举报
回复
Dim item As NotesItem
Set item = doc1.GetFirstItem( "域名1" )
Call item.CopyItemToDocument( doc2, "域名2" )
xuxuwaley 2005-09-30
  • 打赏
  • 举报
回复
notesDocument.CopyItem(item,newName$)可以,俺一直用它
sd_lichangyou 2005-09-30
  • 打赏
  • 举报
回复
对不住了,这两天比较忙,没时间看
灰大师 2005-09-29
  • 打赏
  • 举报
回复
怎么还不结贴啊
ding_2001 2005-09-29
  • 打赏
  • 举报
回复
查帮助就可以啦!
ibm123 2005-09-28
  • 打赏
  • 举报
回复
不管RTF域有没有附件/链接/OLE,均使用以下两种方式任一即可:


Set notesItem = notesItem.CopyItemToDocument( document, newName$ )

or

Set notesItem = notesDocument.CopyItem( item, newName$ )
sylzi 2005-09-28
  • 打赏
  • 举报
回复
Set rtitem = xmlDoc.GetFirstItem( "域名" )
If ( rtitem.Type = RICHTEXT ) Then
Forall e In rtitem.EmbeddedObjects
If ( e.Type = EMBED_ATTACHMENT ) Then
Call e.ExtractFile( e.name )
filename = e.name
Call e.Remove
End If
End Forall
End If

Dim rtitem2 As NotesRichTextItem
Set rtitem2 = New NotesRichTextItem( Doc, "域名" )
Dim object As NotesEmbeddedObject
Set object = rtitem2.EmbedObject( EMBED_ATTACHMENT, "",文件路径)
北京老苏 2005-09-27
  • 打赏
  • 举报
回复
notesDocument.CopyItem(item,newName$)试试这个
jhing39 2005-09-27
  • 打赏
  • 举报
回复
dim item as NotesRichTextItem
dim mstring as string
Set item=doc.GetFirstItem("域名称")
mstring=item.Getformattedtext(False,40)
anp824 2005-09-27
  • 打赏
  • 举报
回复
用item是可以的
心雪峰 2005-09-27
  • 打赏
  • 举报
回复
up up up
dugu9j 2005-09-27
  • 打赏
  • 举报
回复
只要原来rtf域没有附件的dd,直接就
newdoc.newrtf = olddoc.oldrtf

不然就得把附件判断类型、拆离本地,然后传给新的rtf域。我是这么做得,不知道有没有大虾有更好的bf
showhigh 2005-09-27
  • 打赏
  • 举报
回复
用notesitem应该可以吧
hanwenjuan3 2005-09-27
  • 打赏
  • 举报
回复
顶!
ybfqlyq 2005-09-26
  • 打赏
  • 举报
回复
頂啦。。/。。。
sd_lichangyou 2005-09-26
  • 打赏
  • 举报
回复
我试试看
maplescloud 2005-09-26
  • 打赏
  • 举报
回复
如果RTF只包含文本信息的话,可以把它单纯看做一个NOTESITEM,用NOTESITEM.TEXT直接赋值看看。
还有一种办法是REMOVE掉目的文档的RTF,再产生个新的,再把源RTF的append过去。
灰大师 2005-09-26
  • 打赏
  • 举报
回复
rtf的内容如果只是文本的话,付给另一个rtf,很简单,帮助里就有
container不知道是啥

536

社区成员

发帖
与我相关
我的任务
社区描述
企业开发 Exchange Server
社区管理员
  • 消息协作社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧