⼆级下拉菜单关联(数据库版)的简单⽅法
html下拉菜单的制作方法<!--#include  file="public/connstr.asp"-->
<%
'Option  Explicit
'数据库结构和上次发表的同样
'⼆级下拉框连动
'
'数据库:
'location
'表1  loaction  所在地表
'  字段
'  loactionid  (主键)
'  loactionname  名字
'表2  district  所在的地区表
'  字段
'  locationid  (主键)
'  districtid
'  districtname
%>
<html>
<head>
<title>List</title>
<meta  http-equiv="Content-Type"  content="text/html;  charset=gb2312">
<%
dim  rs
dim  sql
dim  count
dim  rs1
dim  sql1
dim  rs2
dim  sql2
dim  count2
sql  =  "select  *  from  district  order  by  locationid  asc"
set  rs  =  ute(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
loop
rs.close
set  rs=nothing
%>
onecount=<%=count%>;
function  changelocation(locationid)
{
var  locationid=locationid;
var  i;
for  (i=0;i  <  onecount;  i++)
{
if  (subcat[i][1]  ==  locationid)
{
}
}
}
</script>
</head>
<body>
<form  name="myform"  method="post">
题⽬:<input  type="text"  name="T2"  size="20"><br>
来源:<input  type="text"  name="T3"  size="20"><br>
分类:<select  name="biglocation"
onChange="form.biglocation.form.biglocation.selectedIndex].value)"  size="1">
<option  selected>请选择你所在的省份</option>
<%
sql1  =  "select  *  from  location  order  by  locationname  asc"
set  rs1  =  conn.Execute  (sql1)
do  while  not  f
%>
<option  value="<%=trim(rs1("locationid"))%>"><%=trim(rs1("locationname"))%></option>
<%
loop
rs1.close
set  rs1  =  nothing
conn.Close
set  conn  =  nothing
%>
</select>
<select  name="smalllocation">
<option  selected  value="">==所有地区==</option>
</select>
<br>
关键词:<input  type="text"  name="T4"  size="20"><br>
内容:<textarea  rows="9"  name="S1"  cols="51"></textarea>      </form>
</body>
</html>

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。