<script language="javascript">
<!--
<%
Dim rsa,sqla
set rsb=server.createobject("adodb.recordset")
sqlb = "select * from SmallClass where BigClassName='"&"外语考试辅导"&"'"
rsb.open sqlb,conn,1,1
set rs=server.createobject("adodb.recordset")
sql = "select * from SSmallClass"
rs.open sql,conn,1,1
%>
var onecount;
subcat = new Array();
<%
count = 0
do while not rs.eof
%>
subcat[ <%=count%>] = new Array(" <%= trim(rs("SSmallClassName"))%>"," <%= trim(rs("SmallClassName"))%>"," <%= trim(rs("SSmallClassName"))%>");
<%
count = count + 1
rs.movenext
loop
rs.close
%>
onecount= <%=count%>;
function changelocation(locationid)
{
document.myform.SmallClassName.length = 1;
var locationid=locationid;
var i;
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{
document.myform.SmallClassName.options[document.myform.SmallClassName.length] = new Option(subcat[i][0], subcat[i][2]);
}
}
}
-->
</script>
<form name="myform" method="post" action="Enshop.asp">
<select name="BigClassName" onChange="changelocation(document.myform.BigClassName.options[document.myform.BigClassName.selectedIndex].value)" size="1">
<option selected value="">请选择课程类别 </option>
<%
if not (rsb.bof and rsb.eof) then
rsb.movefirst
do while not rsb.eof
response.Write " <option value='" & trim(rsb("SmallClassName")) & "'>" & trim(rsb("SmallClassName")) & " </option>"
rsb.movenext
loop
end if
rsb.close
%>
</select>
<select name="SmallClassName">
<option selected value="">请选择课程 </option>
</select>
----------------------------------------------------------------
<%@ page import="java.util.Date,yava.fileapp.*,java.sql.*;"
contentType="text/html;charset=GB2312" pageEncoding="GB2312"
%>
<style>
.f9{ font-size:9pt; }
.bgc{ background-color:#AECAF9; color: #0033FF }
.buttons{font-family:Arial; font-size:13px; font-weight:bold; background-color:#6796E4; color:white; border-top: solid 2px #AACAFB;
border-bottom: solid 1px #4E7DC1;
border-left: solid 1px #AECAF9;
border-right: solid 1px #5679BD;
padding:1px;
margin:0px;}
</style>
<SCRIPT LANGUAGE="JavaScript">
<!--
function rv()
{
var val="";
for(i=0;i<combo_box.list2.length;i++){
val+=","+combo_box.list2[i].value;
}
if(val.charAt(0)==","){
val=val.substr(1,val.length);
}
opener.form1.frecname.value=val;
self.close();
}
//-->
</SCRIPT>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<jsp:useBean id="user" scope="session" class="yava.fileapp.UserBean" />
<%
CDataSource ds=new CDataSource(); //数据联结Bean实例
java.sql.Connection conn=ds.getConnection();
java.sql.Statement stmt=null;
java.sql.ResultSet rs=null;
CDataCheck dc=new CDataCheck();
%>
<%
String sqlu="SELECT t1.fno, t1.fname, t2.fname AS fdept FROM tuser t1 LEFT OUTER JOIN TDept t2 ON t1.fdept = t2.fno order by t2.fname";
stmt=conn.createStatement();
rs=stmt.executeQuery(sqlu);
%>
<script language='Javascript'>
arr = new Array();
<% int temp=0;
while(rs.next())
{
%>
arr[<%=temp%>]=new Array("<%=rs.getString("fname")%>","<%=rs.getString("fdept")%>");
<%
temp = temp + 1;
}
%>
temp=<%=temp%>;
function ChangeLocation(id){
document.combo_box.city.length=0; //初始化第2级菜单的长度，下标从0开始
var i = 0;
document.combo_box.city.options[0]=new Option('-------','');
for(i=0;i<temp;i++){
if(arr[i][1]==id){//如果相等，证明在第2级里面有输入第1级组织的子集,arr[总数目][部门]
document.combo_box.city.options[document.combo_box.city.length] = new Option(arr[i][0], arr[i][0]);
}
}
}
</script>
<form name="combo_box">
<table border="0" cellspacing="0" cellpadding="0" height="210" width="59">
<tr height="24">
<td bgcolor="#336699" class="buttons" align=center><font color=#ffffff>部门选择</font></td>
<td bgcolor="#336699" class="buttons" align=center><font color=#ffffff>人名选择</font></td>
<td bgcolor="#336699" class="buttons" align=center nowrap><font color=#ffffff>添加/移除</font></td>
<td bgcolor="#336699" class="buttons" align=center><font color=#ffffff>最终人</font></td>
</tr>
<tr>
<td>
<select multiple id=prov name="prov" onchange="ChangeLocation(combo_box.prov.options[combo_box.prov.selectedIndex].text);" style="width:150;height:200" class="bgc">
<option value="0">请选择部门 ---></option>
<%
String sqld="SELECT * FROM tdept";
stmt=conn.createStatement();
rs=stmt.executeQuery(sqld);
while(rs.next())
{
%>
<option name="<%=rs.getString("fno")%>"><%=rs.getString("fname")%></option>
<%
}
%>
</select>
</td>
<td>
<select multiple id=city style="width:150;height:200" class="bgc">
</select>
</td>
<td nowrap align="center" class="bgc">
<input type="button" onClick="move(this.form.list2,this.form.city)" value="<<" class="buttons">
<input type="button" onClick="move(this.form.city,this.form.list2)" value=">>" class="buttons">
</td>
<td>
<select multiple size="10" name="list2" style="width:150;height:200" class="bgc">
</select>
</td>
</tr>
<tr class="bgc">
<td colspan="4" align="center"><input type="button" name="button1" class="buttons" value="选好了！" onclick="rv();"></td>
</tr>
</table>
</form>
<script language="JavaScript">
//人名移动
function move(fbox, tbox) {
var arrFbox = new Array();
var arrTbox = new Array();
var arrLookup = new Array();
var i;
for (i = 0; i < tbox.options.length; i++) {
arrLookup[tbox.options[i].text] = tbox.options[i].value;
arrTbox[i] = tbox.options[i].text;
}
var fLength = 0;
var tLength = arrTbox.length;
for(i = 0; i < fbox.options.length; i++) {
arrLookup[fbox.options[i].text] = fbox.options[i].value;
if (fbox.options[i].selected && fbox.options[i].value != "") {
arrTbox[tLength] = fbox.options[i].text;
tLength++;
}
else {
arrFbox[fLength] = fbox.options[i].text;
fLength++;
}
}
arrFbox.sort();
arrTbox.sort();
fbox.length = 0;
tbox.length = 0;
var c;
for(c = 0; c < arrFbox.length; c++) {
var no = new Option();
no.value = arrLookup[arrFbox[c]];
no.text = arrFbox[c];
fbox[c] = no;
}
for(c = 0; c < arrTbox.length; c++) {
var no = new Option();
no.value = arrLookup[arrTbox[c]];
no.text = arrTbox[c];
tbox[c] = no;
}
}
</script>
</body>
--------------------------------------------------------------------
分享到：
相关推荐
js实现的二级菜单联动。选择的是省市联动
简单网页二级菜单的实现
SQLite数据库的使用，以及如何通过双ListView实现二级菜单。
js完善的二级菜单,通过js实现的二级折叠菜单.更加的方便,用着很舒服
用JAVA 实现二级菜单功能 二个JAVA LIST 从数据库里写俩个方法 获取数据LIST
实现二级导航菜单栏效果，FragmentTabHost嵌套FragmentTabHost方.zip,太多无法一一验证是否可用，程序如果跑不起来需要自调，部分代码功能进行参考学习。
现在客户端用到的二级菜单越来越多，所以一次打包提供下载。用了之后简直爱不释手。
Access数据库-二级下拉菜单制作
JS 和 CSS 实现的二级下拉菜单，很漂亮。伸缩。但是没有实现三级下拉噢。上传这里，希望爱好者可以扩展为三级纵向下拉
JS二级菜单联动的实现***********
jQuery个性动画二级下拉导航菜单基于jquery1.8.3.min.js制作，鼠标经过显示二级下拉菜单。
用于网站栏目二级子菜单的下拉 二级菜单 二级下拉菜单 栏目二级子菜单
recyclerview优化以及二级菜单展开，recyclerview优化以及二级菜单展开，recyclerview优化以及二级菜单展开
几个月前初学前端时挖的坑，把二级菜单设计得和一级菜单在DOM结构上没啥关系，导致想要鼠标悬浮一级菜单即可显示该一级菜单对应的二级菜单，移出则显示当前页所在一级菜单所对应的二级菜单列表不好用CSS实现，现在用...
CSS实现动态二级菜单实例
当鼠标悬浮时显示二级菜单，这种类似的效果，想必大家在浏览网页时经常会遇到吧，下面有个示例，大家可以看看
二级菜单! 很值得下载看看!资源免费,大家分享!!
wpf自定义漂亮的二级菜单,数据加载方便，可扩展，适合企业及项目
jQuery实现精美二级菜单,增加网页的美观效果
java/jsp 实现二级级联菜单 可以 从数据库里取出数据进行级联