急救！！！！！！！！！两个下拉列表框之间全部左移和右移出现问题，是怎么回事呢？？？

已经不用在加i了
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE> 全移动</TITLE>
<META NAME="Generator" CONTENT="EditPlus">
<META NAME="Author" CONTENT="">
<META NAME="Keywords" CONTENT="">
<META NAME="Description" CONTENT="">
<script language="javascript"> 
  
   function qbyidong(optionMenu1,optionMenu2)
   {
      
 var i;
  for(i=0;i<=optionMenu2.options.length-1;i++)
  {
             optionMenu1[optionMenu1.options.length]= new Option(optionMenu2.options[i].text,optionMenu2.options[i].text);
    
  }
  
 
   optionMenu2.options.length=0
   }
</script>
</HEAD><BODY>
    <form action="" name="testform" method="post">
   
      <table width="200" border="1">
        <tr>
          <td rowspan="4"><select name="selectzuo" multiple >
            <option>France</option>
            <option>china</option>
            <option>japan</option>
            <option>english</option>
            <option>Amica</option>
          </select></td>
          <td><input type="button" name="qzy" value="全部左移" onClick="qbyidong(document.testform.selectzuo,document.testform.selectyou)"></td>
          <td rowspan="4"><select name="selectyou" multiple >
            <option>dddd</option>
            <option>ffff</option>
            <option>cccccc</option>
            <option>eeeeeee</option>
            <option>aaaaaaaaaaaa</option>
          </select></td>
        </tr>
       
        <tr>
          <td><input type="button" name="qyy" value="全部右移" onClick="qbyidong(document.testform.selectyou,document.testform.selectzuo)"></td>
        </tr>
      </table>
</form>
</BODY>
</HTML>

解决方案 »

  1.   

    /*
    函数说明：将一个select中的内容导出到另一个select中。
    select1: 要导出的select
    select2: 要导进的select
    doAll: 是否全部导入（如为假，则只导出选取中的值）
    Author: 小徐
    */
    function selectToSelect(select1,select2,doAll){
    if(eval(select1) && eval(select2)){
    for(var i=0;i<select1.options.length;i++){
    var oo=select1.options[i];
    if(!doAll && !oo.selected){
    continue;
    }
    if(!isValueOfSelect(select2,oo.value)){
    select2.add(new Option(oo.text,oo.value));
    }
    select1.remove(i);
    i--;
    }
    }
    }
    /*
    函数说明：判断一个字符串是否位于Select中
    selecto:要计算的列表框名称
    value: 要判断的字符串
    返回值：boolean
    Author: 徐向红
    */
    function isValueOfSelect(selecto,val){
    if(val.length>0){
    for(var k=0;k<selecto.options.length;k++){
    if(selecto.options[k].value==val){
    return true;
    }
    }
    }
    return false;
    }
      演示：<input type=button value=' &lt;' onclick="selectToSelect(selectObj1,selectObj2,false);">