当前位置:96看吧 > 技术文档 > ASP编程 > JS代码三级联动菜单(ASP版+数据库)

JS代码三级联动菜单(ASP版+数据库)

时间:2010/01/27
作者:诚心(MaWenDong)
来源:96看吧
查看:
标签:js代码asp数据
  1. <%  
  2. Option Explicit  
  3. '数据库:  
  4. 'location  
  5. '表1 loaction  所在的市 表  
  6. '   字段  
  7. '   loactionid  (主键)  
  8. '   loactionname 名字  
  9. '表2 district  所在的县 表  
  10. '   字段  
  11. '   locationid (主键)  
  12. '    districtid  
  13. '    districtname  
  14. '表3 village  所在的乡镇 表  
  15. '   字段  
  16. '   districtid (主键)  
  17. '   villageid  
  18. '   villagename  
  19. %>  
  20. <html>  
  21. <head>  
  22. <title>asp三级联动菜单(含数据库)</title>  
  23. <meta http-equiv="Content-Type" content="text/html; charset=gb2312">  
  24. <%  
  25. dim conn  
  26. dim rs  
  27. dim sql  
  28. dim count  
  29. dim rs1  
  30. dim sql1  
  31. dim rs2  
  32. dim sql2  
  33. dim count2  
  34. dim connstr  
  35.  
  36.  
  37. connstr="DBQ="+server.mappath("class.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" 
  38.    set conn=server.createobject("ADODB.CONNECTION")  
  39.    conn.open connstr   
  40.  
  41. sql = "select * from district order by locationid asc" 
  42. set rs = conn.execute(sql)  
  43. %>  
  44. <script language = "JavaScript">  
  45. var onecount;  
  46. onecount=0;  
  47. subcat = new Array();  
  48.         <%  
  49.         count = 0  
  50.         do while not rs.eof   
  51.         %>  
  52. subcat[<%=count%>] = new Array("<%=trim(rs("districtname"))%>","<%= trim(rs("locationid"))%>","<%= trim(rs("districtid"))%>");  
  53.         <%  
  54.         count = count + 1  
  55.         rs.movenext  
  56.         loop  
  57.         rs.close  
  58.         set rs=nothing  
  59.         %>  
  60. onecount=<%=count%>;  
  61.  
  62. function changelocation(locationid)  
  63.     {  
  64.     document.myform.class2.length = 0;   
  65.       
  66.         document.myform.class3.length = 0;   
  67. document.myform.class3.options[0] = new Option('==请选择乡镇==','');  
  68.  
  69.       
  70.  
  71.     var locationid=locationid;  
  72.     var i;  
  73.     document.myform.class2.options[0] = new Option('==请选择县==','');  
  74.     for (i=0;i < onecount; i++)  
  75.         {  
  76.             if (subcat[i][1] == locationid)  
  77.             {   
  78.                 document.myform.class2.options[document.myform.class2.length] = new Option(subcat[i][0], subcat[i][2]);  
  79.             }          
  80.         }  
  81.           
  82.     }      
  83. </script>  
  84. <%sql2 = "select * from village order by districtid asc" 
  85. set rs2 = conn.execute(sql2)  
  86. %>  
  87. <script language = "JavaScript">  
  88. var onecount2;  
  89. onecount2=0;  
  90. subcat2 = new Array();  
  91.         <%  
  92.         count2 = 0  
  93.         do while not rs2.eof   
  94.         %>  
  95. subcat2[<%=count2%>] = new Array("<%= trim(rs2("villagename"))%>","<%= trim(rs2("districtid"))%>","<%= trim(rs2("villagename"))%>");  
  96.         <%  
  97.         count2 = count2 + 1  
  98.         rs2.movenext  
  99.         loop  
  100.         rs2.close  
  101.         set rs2=nothing  
  102.         %>  
  103. onecount2=<%=count2%>;  
  104.  
  105. function changelocation2(villageid)  
  106.     {  
  107.     document.myform.class3.length = 0;   
  108.  
  109.     var villageid=villageid;  
  110.     var j;  
  111.     document.myform.class3.options[0] = new Option('==请选择乡镇==','');  
  112.     for (j=0;j < onecount2; j++)  
  113.         {  
  114.             if (subcat2[j][1] == villageid)  
  115.             {   
  116.                 document.myform.class3.options[document.myform.class3.length] = new Option(subcat2[j][0], subcat2[j][2]);  
  117.             }          
  118.         }  
  119.           
  120.     }      
  121. </script>  
  122. </head>  
  123. <body>  
  124. <form action="" method="get" name="myform">  
  125.     <p><br>  
  126.         <select name="class1" onChange="changelocation(document.myform.class1.options[document.myform.class1.selectedIndex].value)">  
  127.             <option selected value="">==请选择市==</option>  
  128.             <%   
  129.           
  130.         sql1 = "select * from loaction order by loactionname asc" 
  131.         set rs1 = conn.Execute (sql1)  
  132.         do while not rs1.eof  
  133.         %>  
  134.             <option value="<%=rs1("loactionid")%>"><%=rs1("loactionname")%></option>  
  135.             <%  
  136.         rs1.movenext  
  137.         loop  
  138.         rs1.close  
  139.         set rs1 = nothing  
  140.         conn.Close  
  141.         set conn = nothing  
  142.         %>  
  143.         </select>  
  144.     </p>  
  145.     <p>  
  146.         <select name="class2" onChange="changelocation2(document.myform.class2.options[document.myform.class2.selectedIndex].value)">  
  147.             <option selected value="">==请选择县==</option>  
  148.         </select>  
  149.     </p>  
  150.     <p>  
  151.         <select name="class3">  
  152.             <option selected value="">==请选择乡镇==</option>  
  153.         </select>  
  154.     </p>  
  155.     <p>  
  156.         <input type="submit" name="Submit" value="提交">  
  157.     </p>  
  158. </form>  
  159. </body>  
  160. </html> 

 

上一篇:aspjpeg组件中文验证码
下一篇:ASP生成不读数据库的中奖码
下载地址
Down
页面举报
Report
关闭页面
Close
收藏页面
Favorites
分享页面
Share
版权信息:栏目内,站内会员所分享的全部“资源/素材/文章”,仅供学习与参考,版权为原作者所有。
下载提示:非注册用户每天可下载一个文件,已注册会员不受限制。
网友评论
数据载入中
验证码
  • 请您注意:
  • ·请不要在评论中含与内容无关的广告链接。
  • ·不良评论请用报告管理员,以利管理员及时删除。
  • ·遵守中华人民共和国的各项有关法律法规
  • ·承担一切因您的行为而直接或间接导致的民事或刑事法律责任
  • ·本站管理人员有权保留或删除评论中的任意内容
  • ·您在本站发表的作品,本站有权在网站内转载或引用
  • ·参与本评论即表明您已经阅读并接受上述条款
相关最新
相关热门