波浪文字特效(没有动感) dn001 2009-06-21 08:38:50 <!--把如下代码加入<body>区域中--> <SCRIPT LANGUAGE="JavaScript"> <!-- Begin function move(fbox,tbox) { var i = 0; if(fbox.value != "") { var no = new Option(); no.value = fbox.value; no.text = fbox.value; tbox.options[tbox.options.length] = no; fbox.value = ""; } } function remove(box) { for(var i=0; i<box.options.length; i++) { if(box.options[i].selected && box.options[i] != "") { box.options[i].value = ""; box.options[i].text = ""; } } BumpUp(box); } function BumpUp(abox) { for(var i = 0; i < abox.options.length; i++) { if(abox.options[i].value == "") { for(var j = i; j < abox.options.length - 1; j++) { abox.options[j].value = abox.options[j + 1].value; abox.options[j].text = abox.options[j + 1].text; } var ln = i; break; } } if(ln < abox.options.length) { abox.options.length -= 1; BumpUp(abox); } } function Moveup(dbox) { for(var i = 0; i < dbox.options.length; i++) { if (dbox.options[i].selected && dbox.options[i] != "" && dbox.options[i] != dbox.options[0]) { var tmpval = dbox.options[i].value; var tmpval2 = dbox.options[i].text; dbox.options[i].value = dbox.options[i - 1].value; dbox.options[i].text = dbox.options[i - 1].text dbox.options[i-1].value = tmpval; dbox.options[i-1].text = tmpval2; } } } function Movedown(ebox) { for(var i = 0; i < ebox.options.length; i++) { if (ebox.options[i].selected && ebox.options[i] != "" && ebox.options[i+1] != ebox.options[ebox.options.length]) { var tmpval = ebox.options[i].value; var tmpval2 = ebox.options[i].text; ebox.options[i].value = ebox.options[i+1].value; ebox.options[i].text = ebox.options[i+1].text ebox.options[i+1].value = tmpval; ebox.options[i+1].text = tmpval2; } } } // End --> </script> <form ACTION="" METHOD="POST"> <table> <tr> <td> <input type="button" value="增加记录" onclick="move(this.form.list1,this.form.list2)" name="B1"><br> <input type="button" value="删除记录" onclick="remove(this.form.list2)" name="B2"><br> <input type="button" value="向上移动" onclick="Moveup(this.form.list2)" name="B3"><br> <input type="button" value="向下移动" onclick="Movedown(this.form.list2)" name="B4"> </td> <td> <select multiple size=7 name="list2"> <option value="one">记录一</option> <option value="two">记录二</option> <option value="three">记录三</option> <option value="four">记录四</option> <option value="five">记录五</option> <option value="six">记录六</option> </select> </td> </tr> <tr> <td> <input type="text" name="list1" value=""> </td></tr> </table> </form>
