 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
ASP文件： <%@ Language=VBScript %> <%Option Explicit%> <html> <head> <title>List</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <% dim conn dim rs dim sql dim count dim rs1 dim sql1 set conn = server.CreateObject ("adodb.connection") conn.Open "test","sa","" sql = "select * from district order by locationid asc" set rs = conn.execute(sql) %> <script language = "JavaScript"> var onecount; onecount=0; subcat = new Array(); <% count = 0 do while not rs.eof %> subcat[<%=count%>] = new Array("<%= trim(rs("districtname"))%>","<%= trim(rs("locationid"))%>","<%= trim(rs("districtid"))%>"); <% count = count + 1 rs.movenext loop rs.close set rs=nothing %> onecount=<%=count%>; function changelocation(locationid) { document.myform.smalllocation.length = 0; var locationid=locationid; var i; document.myform.smalllocation.options[0] = new Option(\\\'====所有地区====\\\',\\\'\\\'); for (i=0;i < onecount; i++) { if (subcat[i][1] == locationid) { document.myform.smalllocation.options[document.myform.smalllocation.length] = new Option(subcat[i][0], subcat[i][2]); } } } </script> </head> <body> <form name="myform" method="post"> <select name="biglocation" onChange="changelocation(document.myform.biglocation.options[document.myform.biglocation.selectedIndex].value)"> <% sql1 = "select * from location order by locationname asc" set rs1 = conn.Execute (sql1) do while not rs1.eof %> <option value="<%=trim(rs1("locationid"))%>"> <%=trim(rs1("locationname"))%></option> <% rs1.movenext loop rs1.close set rs1 = nothing conn.Close set conn = nothing %> </select> <select name="smalllocation"> <option selected value="">==所有地区==</option> </select> </form> <script LANGUAGE="javascript"> changelocation(document.myform.biglocation.options[document.myform.biglocation.selectedIndex].value); </script> </body> </html> 数据库： create table location ( locationid char(2) not null primary key, locationname char(50) not null ) create table district ( districtid char(3) not null primary key, districtname char(50) not null, locationid char(2) not null ) 返回类别: 教程 上一教程: 利用JMAIL.MESSAGE发送邮件 下一教程: 一个函数无组件上传文件 您可以阅读与"下拉框连动的小例子(数据库版)"相关的教程: · 三级下拉框连动的数据库版 · 下拉框连动的小例子（.htm版） · 网络寻呼机数据库版处理发送消息SUBMITMESSAGE.ASP · 从数据库中动态选取下拉列表的方式 · 介绍一个用ASP来压缩ACCESS数据库的例子 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
