cynthia 发表于 2005-10-14 14:48:21

如何取域值

各位高手:<br>本人需要在一个主表单(mainform)内创建一个按纽,当1号人填写完主表单并提交以后,2号人打开该文挡,该文挡以主表单的形式显示1号人填写的内容,2号人要利用按纽显示另一个表单(testform),但是testform是以表格形式显示mainform的内容,<br>我的步骤是这样:<br>1、创建第二个表单(testform),设计几个和主表单(mainform)相同的域<br>2、创建一个视图(testview),第一列取名为uind,列值:@text(@DOcumentUNiqueId),试图的form formule 是testform,选择试图公式是:select form="mainform";<br>3、var pathname=location.pathname.toLowerCase();<br>pathname=pathname.substring(0,pathname.indexOf('.nsf')+5);<br>
通过以下语句打开testform表单<br>
window.open(pathname + "testform?openform&unid="+unid,"","height=400,width=400,menubar=no,resizable=1,scrollbars=0,status=0,toolbar=no,channelmode=0,directories=0,location=0");<br>同时在表单testform的WebQueryOpen中执行一个代理,用于将mainform表单的信息传入到testform中去(通过传近来的unid来获取主文档)<br>
<br>
Dim session As New NotesSession<br>
Dim db As NotesDatabase<br>
Dim doc As NotesDocument<br>
Dim ndoc As NotesDocument<br>
Set db = session.CurrentDatabase<br>
Set doc = New NotesDocument(db)<br>
Set ndoc = session.DocumentContext<br>
doc.datetime=ndoc.datetime<br>
doc.name=ndoc.name(0)<br>
Call doc.Save(True,True)<br>
<br>
不知道这样写的代理程序是否有问题,但是最后我在点击按钮时,出现错误信息:unid未定义。<br>什么地方错了呢?<br>

flatfish99 发表于 2005-10-19 20:38:50

re:恭喜楼主已搞定了!BTW:记得把...

恭喜楼主已搞定了!<br>
<br>
BTW:记得把心得写出来大家分享哦!
页: [1]
查看完整版本: 如何取域值