<html>
<HEAD>
<title>例子</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"><SCRIPT LANGUAGE="JavaScript">
var meng1Array =  new Array("('选择Heha.net栏目内容','',true,true)",
"('学习 XML')",
"('学习 Javascript')",
"('学习 PHP')");
var mengArray =  new Array("('选择Myrice.com栏目内容','',true,true)",
"('学习 Flash')",
"('学习 Dreamweaver Ultradev')",
"('学习 Java')");
var meng2Array =  new Array("('选择China.com栏目内容','',true,true)",
"('查找歌词')",
"('其他')");function populatemxhweb(inForm,selected) {
var selectedArray = eval(selected + "Array");
while (selectedArray.length < inForm.mxhweb.options.length) {
inForm.mxhweb.options[(inForm.mxhweb.options.length - 1)] = null;
}
for (var i=0; i < selectedArray.length; i++) {
eval("inForm.mxhweb.options[i]=" + "new Option" + selectedArray[i]);
}if ( navigator.appName == 'Netscape') {
if (parseInt(navigator.appVersion) < 4) {
window.history.go(0);
}}
//以下不影响}</script>
<link rel="stylesheet" href="../css/css.css" type="text/css">
</head><body topmargin="0" leftmargin="0" marginweight="0" marginheight="0"  bgcolor="#0099FF" oncontextmenu="return false;"><p>&nbsp;</p>
<font color="#000066">说明:适用于IE4,IE5.5,IE5,NS4+,NS6。早期版本的IE5.0可能无法工作。</font> 
<center>
<form name="globe">
<table width="80%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<select  onChange="populatemxhweb(document.globe,this.options[selectedIndex].value)">
<option>请选择
<option value="meng">http://lucky.myrice.com
<option value="meng1">http://go.163.com/~colorweb
<option value="meng2">http://egirl.51.net
</select>
</td>
<td>
<select name="mxhweb" onChange="window.open('http://egirl.51.net')">
<option value=''>☆ 请选择上面的选项 ☆</option>
</select>
</td>
</tr>
</table></form>
</center>
</body>
</html>

解决方案 »

  1.   

    为什么我这样用没有变化呢?rjmc=document.diy.yyrj.value
    leng=document.diy.rj.options.length;
    document.diy.rj.options[leng]=new option("--"+rjmc+"--",rjmc);
    document.diy.rj.options[leng+1]=new option("hello","hl");
      

  2.   

    怎样添加或删除下拉列表框的选项??
    可以通过下面的办法产生一个新的option:var opt = new Option('text', 'value');并通过下面的办法插入到列表框的最后位置上:var sel = document.formName.selectName;
    sel.options[sel.options.length] = opt;
      要删除一个列表框的某个OPTION,可以用下面的方法:  var sel = document.formName.selectName;
      sel.options[optionIndex] = null;这里值得注意的一点是:WINDOWS和MAC平台上的NN2/3/4可以插入到相应的位置,但浏览器里并不更新,要解决此问题,必须对浏览器进行刷新:
      

  3.   

    添加是通过选择前一个select激活,并把选项中的值(value,name)全部传到(加入到)另一个select的后面。
    我做了半天总是一点反映都没有。您的这个方法我在试一下,在谢了。。
      

  4.   

    已经搞定啦!多谢大哥啦。我的代码:(太多啦,只列了一点)
    <script> 
    function yyrjchange()
    {
    rjmc=document.diy.yyrj.value
    if (rjmc=='xzrj')
       return;
    var opt = new Option("--"+rjmc+"--",rjmc);

    leng=document.diy.rj.options.length;
    var sel = document.diy.rj;
    sel.options[sel.options.length] =opt;}
    </script><tr> 
            <td align=center colspan="3"> 
              <div align="right"> <font size=2> </font> </div>
              <div align="right"><font color="#0000FF" size="2">请您选择应用软件</font><font size="2"> 
                </font></div>
            <td align=center colspan="7"> 
              <div align="left"><font size="2"> 
                <select name="yyrj" onchange=yyrjchange()>
                  <option value="xzrj">--请您选择软件--</option>
                  <option value=PhotoShop>--PhotoShop--</option>
    <option value=DreamWare>--DreamWare--</option>
    <option value=Flash>--Flash--</option>
    <option value=AutoCAD>--AutoCAD--</option>
    <option value=Office>--Office--</option>
    <option value=Wps>--Wps--</option>
    <option value=二战特种兵>--二战特种兵--</option>
    <option value=极品飞车>--极品飞车--</option>
    <option value=星际争霸>--星际争霸--</option>
    <option value=金山词霸>--金山词霸--</option>
    <option value=金游侠>--金游侠--</option>
                  
    </select>
                ==&gt; 
                <select name="rj">
                  <option value="xz">--您选择的软件--</option>
                </select>
                </font><font size="2"> </font></div>
          <tr>