在后台代理中用new 新建的文档为何一直取不到代理,代码如下。谢谢
Dim storedoc As NotesDocumentSet storedoc = New NotesDocument(db)
storedoc.form="fmstore"
Dim wenitem As NotesItem
Set danitem=storedoc.getFirstItem("fdan")
call danitem.getfiestitem("dan")
call storedoc.save(true,true)
后台报错。call danitem.getfiestitem("dan") 这一句对象找不到
请教高手,,后台文档取不到item 吗?
多谢大家
--------------------编程问答-------------------- 啊啊啊。。第一次发帖子。发现好多错。呵呵。题目都错了。。重新如下,,:
在后台代理中用new 新建的文档为何一直取不到item,代码如下。谢谢
Dim storedoc As NotesDocument
Set storedoc = New NotesDocument(db)
storedoc.form="fmstore"
Dim danitem As NotesItem
Set danitem=storedoc.getFirstItem("fdan")
call danitem.getfiestitem("dan")
call storedoc.save(true,true)
后台报错。call danitem.getfiestitem("dan") 这一句对象找不到
请教高手,,后台文档取不到item 吗?
多谢大家
--------------------编程问答-------------------- 用ls新建一个文档和从表单上新建一个文档是不同滴,所以当然取不到这个域.举个简单的例子,用ls新建文档相当于一张白纸,你在这张纸上去新建一个个域值,而从表单上直接新建一个文档,想当于在一个存在表格的word上填写你需要填写的值,不知道我说的清楚不清楚. --------------------编程问答-------------------- 。。楼上说的很清楚。谢谢。。
可以再麻烦告知下,我想append 些值到 新建文档 的域中。以上可以怎么改进?
是不是初始化这些域就可以了?
--------------------编程问答-------------------- 我尝试了下。。我知道了。谢谢
只要加上
storedoc.fdan=""
这句就好了。谢谢楼上的 --------------------编程问答-------------------- 如果是一般的域,则只需要赋值就可以了,如果是rtf域的话,需要新建一个rtf域,如下:
--------------------编程问答-------------------- 谢谢。我好像不知道怎么结帖子奥。。 --------------------编程问答-------------------- 文档没值 --------------------编程问答-------------------- 接分是王道!
If doc.HasItem("RTF域名称") Then
Set item=doc.GetFirstItem("RTF域名称")
Else
Set item = New notesitem(doc,"RTF域名称","")
End If
补充:企业软件 , Lotus