难倒了我们部门高手的简单问题

[gaoyibo8939]

我在表单里做了一个按钮执行这个代理:
Sub Initialize
On Error Goto ErrorHandler
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim locationstr As String

Msgbox "enter"
Set db = session.CurrentDatabase
Set doc = session.DocumentContext
Call doc.Save(True,True)
Msgbox Cstr(doc.form(0))+Cstr(doc.UniversalID)
locationstr="./0/"+Cstr(doc.UniversalID)+"?opendocument"
Msgbox locationstr
Call writewin(|window.location.replace("|+locationstr+|")|)
Exit Sub
ErrorHandler:
alert("发生错误在"+Cstr(Erl)+"行，原因："+Error)
End Sub

下面是代理中用到的方法用来改变当前表单窗口的路径.
Sub writewin(wstr As String)
JStr=|<SCRIPT>|
JStr=JStr+|function window.onerror(){|
JStr=JStr+|window.event.returnValue=true;|
JStr=JStr+|alert("脚本错误!")|
JStr=JStr+|;}|
JStr=JStr+wstr
JStr=JStr+|;</SCRIPT>|
Print JStr
End Sub
随便做一个表单,里面有个域,有个按钮.按扭的公式执行这个代理.为何不能打开这个已经存在后的文档.好象这个文档根本就没有保存.WHY?我们的部门高手帮我看时,头上直冒冷汗.WHY?

[carlunbu]

把你的代理写在webquerysave中，在按钮里写javascript:document.forms[0].submit()

[carlunbu]

赶紧给分

[rugl]

你的做法文档根本没有保存下来。

在Call doc.Save(True,True)
之前再写一句：
doc.form="表单名"

[灰大师]

我看高手们是基础知识不扎实!
你发邮件还指定doc.form="memo"了,为什么不指定就保存!
doc.form="表单名"
call doc.save(true,true)才能保存

[灰大师]

我没看到楼上已回复了,^_^

[maplescloud]

头上直冒冷汗.WHY?

肯定还有其他的原因.呵呵.

[gaoyibo8939]

谢谢各位的参与.哈哈
为什么还要设置doc.form="*"本来就是对当前表单对应的文档的保存吗?

[marronking]

因为你的文档里没有数据，服务器如何存储呢
如果你设置一个域的内容就可以保存了
无论是form还是其他的域

[gaoyibo8939]

我在客房端通过JS是给表单中的某些域赋值了.难道放到后台就不行吗?

[gaoyibo8939]

还有carlunbu兄回复说
把你的代理写在webquerysave中，在按钮里写javascript:document.forms[0].submit()
这也没有给域赋值呀.为啥可以?

[gaoyibo8939]

我这个问题还没弄明白呀,各位兄台?
我在客房端通过JS是给表单中的某些域赋值了.放到后台保存就不行吗?

[rizhinan]

顶··

[灰大师]

你们部门的高手还冒冷汗吗?严重的话，建议看医生，哈哈

[desertwolf81]

怪异，为什么要赋值？
更奇怪的是为什么要这样写保存当前文档，并打开？

[gaoyibo8939]

我这个问题还没弄明白呀,各位兄台?
我在客房端通过JS是给表单中的某些域赋值了.放到后台保存就不行吗?