大家帮忙看看这个，怎么取得下拉列表框的值呢？

[lwzhk954]

<%
strHTML="<select name=dept2 id=myList>"
Do While rsDeptChild.EOF = False
strHTML=strHTML & "<option value='" & Trim(rsDeptChild.Fields("编号").Value) & "'>" & rsDeptChild.Fields("工序纱支").Value & "</option>"
rsDeptChild.movenext
Loop
strHTML=strHTML & "</select>"
Else
strHTML=""
End If
rsDeptChild.Close
conn.Close
Set rsDeptChild = NoThing
Set conn = NoThing
%>
<script language=vbscript>
Parent.Form1.all.myTd.innerHTML="<% =strHTML %>"
-->
</script>

[BlueDestiny]

<BODY>
<select id=s1 onchange='alert(this.value)'>
<option value='1'>1
<option value='2'>2
<option value='3'>3
</select>
<select id=s2 onchange='fc();'>
<option value='1'>1
<option value='2'>2
<option value='3'>3
</select>
<SCRIPT LANGUAGE="JavaScript">
<!--
function fc()
{
alert(s2.options[s2.selectedIndex].value)
}
//-->
</SCRIPT>
</BODY>