
------------ASP二级联动出错---------------
<%fl_id=Request("fl_id")%><SCRIPTLANGUAGE="javascript">functionchang_product_type(){l...
<%
fl_id = Request("fl_id")
%>
<SCRIPT LANGUAGE="javascript">
function chang_product_type(){ location.href="44.asp?fl_id="+document.form1.fl_id.options[document.form1.fl_id.selectedIndex].value;
}
</SCRIPT>
<form name="form1" method="post" action="">
<td width="19%" height="10" align="right"> 选择一级分类: </td>
<td bordercolor="#cccccc" bordercolordark="#FFFFFF" class="p9">
<%
set myrs_root=server.CreateObject("adodb.recordset")
myrs_root.Open "select * from yjfl where fl_fj=0 order by fl_id",conn,1,1
if myrs_root.RecordCount>0 then
if fl_id="" then fl_id=myrs_root("fl_id")
%>
<select name="fl_id" style="WIDTH: 260px; COLOR: navy; font-size:9pt" onChange="javascript:chang_product_type();">
<%
do until myrs_root.EOF
Response.Write "<option value=" & myrs_root("fl_id") & " " & object_selected(fl_id,cstr(myrs_root("fl_fj"))) & " style='color:black;background:#f0f0f0'>⊙" & myrs_root("fl_mz") & "</option>"
myrs_root.MoveNext
loop
%>
</select> </td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="10" align="right">选择二级分类:</td>
<td bordercolor="#cccccc" bordercolordark="#FFFFFF" class="p9">
<select name="fl_fj" style="WIDTH: 260px; COLOR: navy; font-size:9pt">
<%set myrs_child=server.CreateObject("adodb.recordset")
sql="select * from yjfl where fl_fj=" & fl_id & " order by fl_id"
myrs_child.Open sql,conn,1,1
do until myrs_child.EOF
Response.Write "<option value='" & myrs_child("fl_fj") & "'" & object_selected(fl_fj,cstr(myrs_child("fl_id"))) & " >┠—" & myrs_child("fl_mz") & "</option>"
myrs_child.MoveNext
loop
myrs_child.Close
set myrs_child=nothing
%>
</select> </td>
</tr>
<%
end if
myrs_root.Close
set myrs_root=nothing
%>
</form>
以上代码,显示都正常,就是在一级类选择的时候,老是返回,效果就和刷新一样,但二级能接受的到,
如果厉害就不用我多说了吧,
代码不保证没问题。 展开
fl_id = Request("fl_id")
%>
<SCRIPT LANGUAGE="javascript">
function chang_product_type(){ location.href="44.asp?fl_id="+document.form1.fl_id.options[document.form1.fl_id.selectedIndex].value;
}
</SCRIPT>
<form name="form1" method="post" action="">
<td width="19%" height="10" align="right"> 选择一级分类: </td>
<td bordercolor="#cccccc" bordercolordark="#FFFFFF" class="p9">
<%
set myrs_root=server.CreateObject("adodb.recordset")
myrs_root.Open "select * from yjfl where fl_fj=0 order by fl_id",conn,1,1
if myrs_root.RecordCount>0 then
if fl_id="" then fl_id=myrs_root("fl_id")
%>
<select name="fl_id" style="WIDTH: 260px; COLOR: navy; font-size:9pt" onChange="javascript:chang_product_type();">
<%
do until myrs_root.EOF
Response.Write "<option value=" & myrs_root("fl_id") & " " & object_selected(fl_id,cstr(myrs_root("fl_fj"))) & " style='color:black;background:#f0f0f0'>⊙" & myrs_root("fl_mz") & "</option>"
myrs_root.MoveNext
loop
%>
</select> </td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="10" align="right">选择二级分类:</td>
<td bordercolor="#cccccc" bordercolordark="#FFFFFF" class="p9">
<select name="fl_fj" style="WIDTH: 260px; COLOR: navy; font-size:9pt">
<%set myrs_child=server.CreateObject("adodb.recordset")
sql="select * from yjfl where fl_fj=" & fl_id & " order by fl_id"
myrs_child.Open sql,conn,1,1
do until myrs_child.EOF
Response.Write "<option value='" & myrs_child("fl_fj") & "'" & object_selected(fl_fj,cstr(myrs_child("fl_id"))) & " >┠—" & myrs_child("fl_mz") & "</option>"
myrs_child.MoveNext
loop
myrs_child.Close
set myrs_child=nothing
%>
</select> </td>
</tr>
<%
end if
myrs_root.Close
set myrs_root=nothing
%>
</form>
以上代码,显示都正常,就是在一级类选择的时候,老是返回,效果就和刷新一样,但二级能接受的到,
如果厉害就不用我多说了吧,
代码不保证没问题。 展开
展开全部
你这样的做法本来就是会自我刷新的
除非你一次把二级全部select 出来
或者你用ajax
除非你一次把二级全部select 出来
或者你用ajax

2023-07-25 广告
StormProxies是一家提供动态代理服务器服务的企业,旨在帮助用户更好地管理网络访问和安全。以下是一些关于StormProxies的IP动态代理服务的特点:1. 高匿名性:StormProxies的动态代理服务器具有高匿名性,可以有效...
点击进入详情页
本回答由Storm代理提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询