来个asp高手帮我解决三级联动的问题

最近学习一个asp+access三级联动表单的实现，总是调试不成功，哪个高手帮我看看故障出现在哪里，万分感谢！数据库有3个表sbxx，wxbm,wblb,需要查询输出的主... 最近学习一个asp+access三级联动表单的实现，总是调试不成功，哪个高手帮我看看故障出现在哪里，万分感谢！数据库有3个表sbxx ，wxbm,wblb,需要查询输出的主要表格如下：

还有两个表是查询条件 wxbm,wxlb,分别对应上图sbxx里面的ssbm,leibie,

最后能选择j指定的jqm代码如下：

<% lb1=Trim(Request.Form("lb1"))
lb2=Trim(Request.Form("lb2"))
lb3=Trim(Request.Form("lb3"))
%>
<form action="" method="post" name="form1" id="form1"><table width="200" border="1">
<tr>
<td>部门</td>
<td>类别</td>
<td>机器名</td>
</tr>
<tr>
<td><label>
<select name="lb1" onChange="document.form1.submit()">
<option value="0">请选择部门</option>
<% sql="SELECT bumen FROM wxbm order by bumen "
Set rs=Server.CreateObject("adodb.recordset")
rs.Open sql,conn,1,1
do while not rs.eof %>

do while not rs.eof %>
<option value="&rs("id")&"><%=rs("bumen")%></option>
<%
rs.movenext
loop
rs.close %>
</select>
</label></td>
<td><label>
<select name="lb2" onChange="document.form1.submit()">
<option value="0">请选择类别</option>
<%
sql="SELECT leibie FROM sbxx where ssbm='"&lb1&"' order by leibie "

rs.Open sql,conn,1,1
do while not rs.eof %>
<option value="&rs("id")&"><%=rs("leibie")%></option>
<%
rs.movenext
loop
rs.close
%>
</select>
</label></td>
<td><label>
<select name="lb3">
<option value="0">请选择机器名</option>
<%
sql="SELECT jqm FROM sbxx where leibie='"&lb2&"' and ssbm='"&lb1&"' order by jqm "

rs.Open sql,conn,1,1
do while not rs.eof %>
<option value="&rs("id")&"><%=rs("jqm")%></option>
<%

rs.movenext
loop
rs.close
%>
</select>
</label></td>
</tr>
</table>
</form>

调试无法实现，谁能帮我解决下啊如果我的代码无法实现，那么可以忽略我的代码，提供一个只要能实现的代码展开





 我来答

3个回答

#热议# 什么是淋病？哪些行为会感染淋病？

图材图色tusea
推荐于2016-10-18 · 用心创作内容，感谢您的关注

图材图色tusea

采纳数：318 获赞数：1880

向TA提问私信TA

关注

展开全部

<!DOCTYPE html>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<body onload="loadlevel1()">
Brunch：<select id="mylevel1" onchange=loadlevel3()></select>
Type：<select id="mylevel2" onchange=loadlevel3()></select>
PCname：<select id="mylevel3"></select>

<p><a href=pclist.zip>Download the demo code</p>
<script>
<% 
strProvider="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("class301.mdb")
Set objConn= server.createobject("ADODB.Connection")
objConn.Open strProvider
sql="SELECT DISTINCT ssbm FROM sbxx"
Set rs=Server.createobject("adodb.recordset")
rs.open sql, objConn, 1, 1
mytypearr="var myCars=['"

for i = 0 to rs.RecordCount-1
mytypearr=mytypearr&rs("ssbm")&"','"

rs.MoveNext()
next
mytypearr=left(mytypearr,len(mytypearr)-2)&"];"
response.write(mytypearr)
rs.close
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
sql="SELECT DISTINCT leibie FROM sbxx"
rs.open sql, objConn, 1, 1
mytypearr="var mytype=['"

for i = 0 to rs.RecordCount-1
mytypearr=mytypearr&rs("leibie")&"','"

rs.MoveNext()
next
mytypearr=left(mytypearr,len(mytypearr)-2)&"];"
response.write(mytypearr)
rs.close
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
sql="SELECT ssbm,leibie,jqm FROM sbxx"
rs.open sql, objConn, 1, 1
mypersonarr="var mypc=['"
for i = 0 to rs.RecordCount-1
mypersonarr=mypersonarr&rs("ssbm")&":"&rs("leibie")&":"&rs("jqm")&"','"
rs.MoveNext()
next
mypersonarr=left(mypersonarr,len(mypersonarr)-2)&"];"
response.write(mypersonarr)
%>

function loadlevel1()
{
var x=document.getElementById("mylevel1");
//var i=0,len=myCars.length;
for (y in myCars)
{
var option=document.createElement("option");
option.value=myCars[y];
option.text=myCars[y];
try
  {
  // for IE earlier than version 8
  x.add(option,x.options[null]);
  }
catch (e)
  {
  alert(option.value+option.text)
  x.add(option,null);
  }  
}
////////////////////////////////////////////////////////////////////////
var x=document.getElementById("mylevel2");
for (y in mytype)
{
var option=document.createElement("option");
option.value=mytype[y];
option.text=mytype[y];
try
  {
  // for IE earlier than version 8
  x.add(option,x.options[null]);
  }
catch (e)
  {
  alert(option.value+option.text)
  x.add(option,null);
  }  
}
loadlevel3();
}

function loadlevel3()
{
var x=document.getElementById("mylevel1");
var y=document.getElementById("mylevel2");
var z=document.getElementById("mylevel3");
var i=0,len=z.length;
for (; i<len; i++)
{
z.remove(z.selectedIndex);
}
var i=0,len=mypc.length;
for (; i<len; i++){
var n=mypc[i].split(":");
if(n[0].search(x.value)==0&&n[1].search(y.value)==0)
{
var option=document.createElement("option");
option.value=n[2];
option.text=n[2];
try
  {
  // for IE earlier than version 8
 z.add(option,z.options[null]);
  }
catch (e)
  {
 z.add(option,null);
  }
}
}
if(z.length==0){
var option=document.createElement("option");
option.value="0";
option.text="No PC hit";
try
  {
  // for IE earlier than version 8
 z.add(option,z.options[null]);
  }
catch (e)
  {
 z.add(option,null);
  }
}
}
</script>

已赞过 已踩过<

评论收起

Storm代理
2023-07-25 广告

StormProxies是一家提供动态代理服务器服务的企业，旨在帮助用户更好地管理网络访问和安全。以下是一些关于StormProxies的IP动态代理服务的特点：1. 高匿名性：StormProxies的动态代理服务器具有高匿名性，可以有效... 点击进入详情页

本回答由Storm代理提供

xdownx
2013-07-28 · TA获得超过2052个赞

知道小有建树答主

回答量：1135

采纳率：0%

帮助的人：1194万

我也去答题访问个人页

关注

展开全部

这个就是用AJAX来进行实现的，我有现成的例子，因为之前的项目很多都是这种效果显示。
你可以在线联系我Q：1606083272

追问

我在网上找过很多案例，但是都无法用

已赞过 已踩过<

评论收起

百度网友fb55f35
2013-07-28 · TA获得超过579个赞

知道小有建树答主

回答量：1395

采纳率：50%

帮助的人：1243万

我也去答题访问个人页

关注

展开全部

如果是Ajax来实现的话，就非常容易！可无限级。

已赞过 已踩过<

评论收起

更多回答（1）

推荐律师服务：若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询

来个asp高手帮我解决三级联动的问题

其他类似问题

为你推荐：