下拉式互动列表框(EC潮流网同学录之真情留言板使用的代码)

答案：//本函数的具体实例请查看EC潮流网(http://www.ectide.com/)同学录之真情留言板，访客请从访客参观处进入
//对本函数中的表单元素名称稍做修改即可移值至你的网站中，你就可以轻松拥有一个超强板的互动式下拉列表框啦！
//本函数的具体功能请查看EC潮流网(http://www.ectide.com/)同学录之真情留言板的"你知道吗"

//将列表框1中的选定部分移到列表框2中
function godown()
{
for (i=0 ; i<=newmessage.allfriends .options .length -1 ; i++)
{
if (newmessage.allfriends .options [i].selected )
{
var element = window.Option.create (newmessage.allfriends.options [i].text,
newmessage.allfriends .options[i].value,0);
newmessage.selectedfriends.add (element);
} 

} 
for (i=0 ; i< newmessage.allfriends .options .length ; i++)
{
if (newmessage.allfriends .options [i].selected )
{
newmessage.allfriends.remove(i);
i = i - 1 ;
} 

} 
newmessage.clearall.disabled=false;
newmessage.downbox.disabled=true;
if (newmessage.allfriends.options.length==0)
{
newmessage.selectall.disabled=true;
newmessage.downbox.disabled=true;
}
if (newmessage.selectedfriends.options.length==0)
{
newmessage.clearall.disabled=true;
}
}

//将位于下面的列表框的选定值移至上面的列表框
function goup()
{
for (i=0 ; i<=newmessage.selectedfriends .options .length -1 ; i++)
{
if (newmessage.selectedfriends .options [i].selected )
{
var element = window.Option.create (newmessage.selectedfriends.options [i].text,
newmessage.selectedfriends .options[i].value,0);
newmessage.allfriends.add (element);
} 

} 
for (i=0 ; i< newmessage.selectedfriends .options .length ; i++)
{
if (newmessage.selectedfriends .options [i].selected )
{
newmessage.selectedfriends.remove(i);
i = i - 1 ;
} 

} 

newmessage.selectall.disabled=false;
newmessage.upbox.disabled=true;
if (newmessage.selectedfriends.options.length==0)
{
newmessage.clearall.disabled=true;
newmessage.upbox.disabled=true;
}
if (newmessage.allfriends.options.length==0)
{
newmessage.selectall.disabled=true;
}
}

//将上面列表框的所有选项移至下面列表框
function alldown()
{
for (i=0 ; i<=newmessage.allfriends .options .length -1 ; i++)
{
var element = window.Option.create (newmessage.allfriends.options [i].text,
newmessage.allfriends .options[i].value,0);
newmessage.selectedfriends.add (element);
} 

for (i=0 ; i< newmessage.allfriends .options .length ; i++)
{
newmessage.allfriends.remove(i);
i = i - 1 ;
} 
newmessage.clearall.disabled=false;
newmessage.selectall.disabled=true;
newmessage.downbox.disabled=true;

}

//将下面的列表框的所有选项移至上面列表框
function allup()
{
for (i=0 ; i<=newmessage.selectedfriends .options .length -1 ; i++)
{
var element = window.Option.create (newmessage.selectedfriends.options [i].text,
newmessage.selectedfriends .options[i].value,0);
newmessage.allfriends.add (element);
} 

for (i=0 ; i< newmessage.selectedfriends .options .length ; i++)
{
newmessage.selectedfriends.remove(i);
i = i - 1 ;
} 
newmessage.clearall.disabled=true;
newmessage.selectall.disabled=false;
newmessage.upbox.disabled=true;

} 

上一个：在网页中实现OICQ里的头像选择的下拉框
下一个：vbscript和javascript互相调用