在页面添加select option

[liuleishiyang]

在页面添加select option

[无爱大叔]

说详细一点!

[shiyangking]

<form name="form1" method="post" action="">
<select name="addselect" size="10" id=addselect style="WIDTH: 60px; HEIGHT: 140px">
<option value="1" selected>1</option>
<option value="2">2</option>
</select>
<input type="button" name="Submit2" value="加" onclick=add()> <input type="button" name="Submit" value="减" onclick=add() >
<script language="vbscript">
sub add()
dim opt
if form1.minusselect.selectedIndex< 0 then

else
set opt=document.createElement("option")
opt.text=form1.minusselect(form1.minusselect.selectedIndex).text
opt.value=form1.minusselect(form1.minusselect.selectedIndex).value
form1.addselect.add opt
form1.minusselect.remove form1.minusselect.selectedIndex
end if
end sub
</script>
<select name="minusselect" size="10" id=minusselect style="WIDTH: 60px; HEIGHT: 140px">
<option value="a">a</option>
<option value="b">b</option>
</select>
</form>