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

lwzhk954 lwzhk954 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
<%
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>
...全文
评论 1
收藏 已收藏
分享
返回顶部
lwzhk954
vbScript 4,008 成员 3,512 内容