欢迎光临
我们一直在努力

下拉框连动的小例子(数据库版)

建站超值云服务器,限时71元/月

【钢铁工人】 于 2000-11-2 10:35:06 加贴在 joy asp ↑:

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

)

赞(0)
版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com 特别注意:本站所有转载文章言论不代表本站观点! 本站所提供的图片等素材,版权归原作者所有,如需使用,请与原作者联系。未经允许不得转载:IDC资讯中心 » 下拉框连动的小例子(数据库版)
分享到: 更多 (0)