asp 二级联动下拉菜单 开发源码 |
来源:智睿 浏览:28090 次 发布时间:2019-04-18 16:46:19 |
<!--#include file="Include/conig.asp"--> <% sql = "select * from zhi_rui_s_meshi where id=3" Set rs = Server.CreateObject("ADODB.RecordSet") rs.Open sql,conn,1,1 classid=rs("classid") Topid=rs("Topid") rs.close set rs=nothing Response.Write(classid&"_"&Topid) %> <script language="javascript" type="text/javascript"> var onecount; subcat = new Array(); <% Set rs=Conn.Execute("Select * From [zhi_rui_s_io_Class] where topid<>0") count = 0 do while not rs.eof %> subcat[<%=count%>] = new Array("<%=trim(rs("id"))%>","<%= trim(rs("TopID"))%>","<%= trim(rs("ClassName"))%>"); <% count = count + 1 rs.movenext loop rs.close:set rs=nothing %> onecount=<%=count%>; function changelocation(locationid) { document.form.Topid.length = 1; var locationid=locationid; var i; for (i=0;i < onecount; i++) { if (subcat[i][1] == locationid) { document.form.Topid.options[document.form.Topid.length] = new Option(subcat[i][2], subcat[i][0]); } } } </script> <form method="post" action="ru_query.asp" name="form" id="form"> <select class='common-input' name="ClassId" onChange="changelocation(this.value)"> <option value="">请选择大类</option> <% sql2 = "select * from zhi_rui_s_io_Class where topid=0" Set rs2 = Server.CreateObject("ADODB.RecordSet") rs2.Open sql2,conn,1,1 while not rs2.eof %> <option value='<%=rs2("id")%>' <% if cint(classid)=cint(rs2("id")) then response.write "selected" %>><%=rs2("ClassName")%></option> <% rs2.movenext wend rs2.close set rs2=nothing %> </select> <select class='common-input' name="Topid"> <option value="">请选择小类</option> <% sql2 = "select * from zhi_rui_s_io_Class where topid="&cint(classid)&" order by id asc" Set rs2 = Server.CreateObject("ADODB.RecordSet") rs2.Open sql2,conn,1,1 while not rs2.eof %> <option value='<%=rs2("id")%>' <% if cint(Topid)=cint(rs2("id")) then response.write "selected" %>> <%=rs2("ClassName")%></option> <% rs2.movenext wend rs2.close set rs2=nothing %> </select> </form> |
【刷新页面】【加入收藏】【打印此文】 【关闭窗口】 |
上一篇:智睿网络投票评选管理系统 V 10.7.0 年度网络投票系统,行业投票评选管理系统 下一篇:智睿录取查询报名系统 V 9.7.0 学校录取系统,学校报名系统 |