asp三级分类－联动下拉菜单
2013年08月10日
⁄ 综合
⁄ 共 5523字 ⁄ 字号
小 中 大
<%
dim rs,firstFlag
set rs=server.CreateObject("adodb.recordset")
'读主分类
sqlstr = "select product_type1_id,product_type1 from t_product_type1 where isDel=0 and me_ver='" & G_mver & "' order by sort"
rs.Open sqlstr,conn,1,1
response.Write "<script language='javascript'>"
response.Write "optType1=new Array("
firstFlag = true
do while not rs.EOF
if firstFlag then
response.Write "'" & rs("product_type1_id") & "','" & rs("product_type1") & "'"
firstFlag = false
else
response.Write ",'" & rs("product_type1_id") & "','" & rs("product_type1") & "'"
end if
rs.MoveNext()
loop
response.Write ");"
response.Write "</script>"
rs.Close()
'读二级分类
sqlstr = "select product_type1_id,product_type2_id,product_type2 from t_product_type2 where me_ver='"& G_mver &"' order by product_type1_id,sort"
rs.Open sqlstr,conn,1,1
response.Write "<script language='javascript'>"
response.Write "optType2=new Array("
firstFlag = true
do while not rs.EOF
if firstFlag then
response.Write "'" & rs("product_type1_id") & "_" & rs("product_type2_id") & "','" & rs("product_type2") & "'"
firstFlag = false
else
response.Write ",'" & rs("product_type1_id") & "_" & rs("product_type2_id") & "','" & rs("product_type2") & "'"
end if
rs.MoveNext()
loop
response.Write ");"
response.Write "</script>"
rs.Close()
'读三级分类
sqlstr = "select product_type1_id,product_type2_id,product_type3_id,product_type3 from t_product_type3 where me_ver='"& G_mver &"' order by product_type1_id,product_type2_id,sort"
rs.Open sqlstr,conn,1,1
response.Write "<script language='javascript'>"
response.Write "optType3=new Array("
firstFlag = true
do while not rs.EOF
if firstFlag then
response.Write "'" & rs("product_type1_id") & "_" & rs("product_type2_id") & "|" & rs("product_type3_id") & "','" & rs("product_type3") & "'"
firstFlag = false
else
response.Write ",'" & rs("product_type1_id") & "_" & rs("product_type2_id") & "|" & rs("product_type3_id") & "','" & rs("product_type3") & "'"
end if
rs.MoveNext()
loop
response.Write ");"
response.Write "</script>"
rs.Close()
set rs=nothing
%>
<script language="javascript">
function chang_product_type(){
location.href="product_list.asp?type1_id="+document.frm_search.product_type1_id.options[document.frm_search.product_type1_id.selectedIndex].value;
}
</script>
主类别：
<select name="type1_id" onChange="changeType1(this, frm_search.product_type2_id)" style="WIDTH: 90px; COLOR: navy; font-size:9pt"
ID="product_type1_id">
<option value="0">所有主类别</option>
<script language="javascript">
showOptions(optType1);
</script>
</select>
<select name="type2_id" onChange="changeType2(this, frm_search.product_type3_id)" style="WIDTH: 100px; COLOR: navy; font-size:9pt"
ID="product_type2_id">
<option value="0_0">所有二级类别</option>
</select>
<select name="type3_id" style="WIDTH: 100px; COLOR: navy; font-size:9pt" ID="product_type3_id">
<option value="0_0_0">所有三级类别</option>
</select>
<script language="javascript">
<!--
//初始载入时确定所选项
if(!frm_search.product_type1_id[0].selected)
changeType1(frm_search.product_type1_id,frm_search.product_type2_id);
if(!frm_search.product_type2_id[0].selected)
changeType2(frm_search.product_type2_id,frm_search.product_type3_id);
//显示所选项
//主分类
var len=frm_search.product_type1_id.length;
var s1=frm_search.product_type1_id;
for(i=0;i<len;i++)
{
if(s1.options[i].value=='<%=request.Form("type1_id")%>')
{
s1.selectedIndex=i;
}
}
changeType1(frm_search.product_type1_id,frm_search.product_type2_id);
//二级分类
len=frm_search.product_type2_id.length;
var s2=frm_search.product_type2_id;
for(i=0;i<len;i++)
{
if(s2.options[i].value=='<%=request.Form("type2_id")%>')
{
s2.selectedIndex=i;
}
}
changeType2(frm_search.product_type2_id,frm_search.product_type3_id);
//三级分类
len=frm_search.product_type3_id.length;
var s3=frm_search.product_type3_id;
for(i=0;i<len;i++)
{
if(s3.options[i].value=='<%=request.Form("type3_id")%>')
{
s3.selectedIndex=i;
}
}
//-->
</script>