??能不能在程序运行的时候，用lotus script向组合框类型的域中添加项？？

[RickeyLv]

[hellrock]

直接向组合框类型的域中添加项是不行的，但是你可以通过另外一个多值域a，
然后通过添加项到该域中，而组合框(为选项使用公式)的值就根据包含该域的试图的列值动态的变化！
组合框使用公式可以类似：
@DbColumn("":"NoCache";"server name":"database name";"view name";Column Number)
其实Column Number就是a的view列

[hellrock]

其中Column Number就是view中a的列

[joxin]

用javascript直接向该域中添值即可。

[hellrock]

java真的这么强。。看来还是学学这个。。

[joxin]

给一个对话框列表的例子吧。src是多值的文本域的值（input），tar是对话框列表域。
使用：getvalue(input.value,document.forms[0].xxx);
function getvalue(src,tar)
{
var allArgs = src;
allArgsA = allArgs.split(";");
maxA = allArgsA.length
for (i=0;i<maxA;i++)
{
Text = allArgsA[i].replace(" ","")
if (Text =="") return false;
tar.options[i] = new Option(Text);
}
你可以参照改一下用。

[shgciom]

joxin():
我不知道怎么直接添加(使用javascript)?
取不到组合框类型的域的总的大小,既有多少个值?

[zhymerry]

hellrock:他说的是通过程序实现，你这种是公式的实现方法
程序实现：
This script appends the text value "Shocks" to the Categories item on a document. For example, if the Categories item contains the values "Clocks" and "Blocks" before the script runs, it contains the values "Clocks," "Blocks," and "Shocks" after the script runs.
Dim doc As NotesDocument
Dim item As NotesItem
' ...set value of doc...
Set item = doc.GetFirstItem( "Categories" )
Call item.AppendToTextList( "Shocks" )
Call doc.Save( False, True )

详细查看notesitem.appendtotextlist

[joxin]

document.forms[0].xxx.length;
星期一，去公司再给你发一段程序。

[Jim_OU]

Set item = doc.GetFirstItem( "Categories" )
Call item.AppendToTextList( "Shocks" )
这个程序是可以把值加入到“复合框”，可以用程序读出加入后的值，但是显示不了啊，就是说下拉的时候看不到：（