在ASP开发中,如何利用Javascript实现在同一页面中实现两个选择框(select)之间参数的传递 本版FAQ,联动下拉框,一大堆 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我还是不明白阿。下面的是我写的源代码,在单位的字段中有这个单位属于哪个区的字段“D_No”,我想在这个页面加个funtion函数,然后可以解决上面的问题。<%Set conn=Server.CreateObject("ADODB.CONNECTION")conn.open Application("Connection1_ConnectionString")Set rs=Server.CreateObject("ADODB.recordset")sql="select * from tblDistrict"rs.open sql,conn,1%><td width="30%"><font size="-1"> 所在区名称:</font></td><td><font size="-1"> <select id=select1 name="D_No" onChange="ChBm()"><% do while not rs.eof %><option value="<%=trim(rs("D_No"))%>"><%=trim(rs("D_Name"))%></option><% rs.movenextloop rs.close%><option value="" selected>请选择</option></select></font><font color=red>*</font></td></tr><%Set conn=Server.CreateObject("ADODB.CONNECTION")conn.open Application("Connection1_ConnectionString")Set rs=Server.CreateObject("ADODB.recordset")sql="select * from tblDangerUnit" rs.open sql,conn,1%><td width="30%"><font size="-1"> 所属危险单位:</font></td><td><font size="-1"> <select id=select1 name="DU_No"><% do while not rs.eof %><option value="<%=rs("DU_No")%>"><%=rs("DU_Name")%></option><% rs.movenextloop rs.close %><option value="0" selected>请选择</option></select></font><font color=red></font></td></tr> 笨,去www.163.com注册油箱,然后查看源代码 如何实现DIV跟随滚动,到网页底部的时候固定 问一个简单的表单验证问题 请教一个巨难的问题。。 改变表单内所有text的className和readOnly 在线等.参数传递问题! js获得get值问题 定义一个继承自div的对象 为何用window.close()关闭不了当前窗口? 如何限制file域文件路径长度! 怎样调用vbs里的类 关于鼠标双击问题,非常急,请大家帮助. 大侠这里那里错了,帮我改改可以嘛?谢谢
<%
Set conn=Server.CreateObject("ADODB.CONNECTION")
conn.open Application("Connection1_ConnectionString")
Set rs=Server.CreateObject("ADODB.recordset")
sql="select * from tblDistrict"
rs.open sql,conn,1
%>
<td width="30%"><font size="-1"> 所在区名称:</font></td>
<td><font size="-1">
<select id=select1 name="D_No" onChange="ChBm()">
<% do while not rs.eof %>
<option value="<%=trim(rs("D_No"))%>"><%=trim(rs("D_Name"))%></option>
<% rs.movenext
loop
rs.close
%>
<option value="" selected>请选择</option>
</select></font><font color=red>*</font></td>
</tr>
<%
Set conn=Server.CreateObject("ADODB.CONNECTION")
conn.open Application("Connection1_ConnectionString")
Set rs=Server.CreateObject("ADODB.recordset")
sql="select * from tblDangerUnit"
rs.open sql,conn,1
%>
<td width="30%"><font size="-1"> 所属危险单位:</font></td>
<td><font size="-1">
<select id=select1 name="DU_No">
<% do while not rs.eof %>
<option value="<%=rs("DU_No")%>"><%=rs("DU_Name")%></option>
<% rs.movenext
loop
rs.close
%>
<option value="0" selected>请选择</option>
</select></font><font color=red></font></td>
</tr>