e_search1.asp

zheng fu wang zhan gong neng qi quan

<%
dim count
set rs7=server.createobject("adodb.recordset")
rs7.Source= "select * from "& db_SmallClass_Table &" order by SmallClassID asc"
rs7.open rs7.Source,conn,1,1
%>
<script language = "JavaScript">
var onecount;
onecount=0;
subcat = new Array();
        <%
        count = 0		
        do while not rs7.eof 
        %>
subcat[<%=count%>] = new Array("<%=rs7("E_smallclassname")%>","<%=rs7("BigClassid")%>","<%=rs7("SmallClassID")%>");
        <%
        count = count + 1
        rs7.movenext
        loop
        rs7.close
		set rs7=nothing
        %>
onecount=<%=count%>;

function changelocation(locationid)
    {
    document.myform.SmallClassID.length = 0; 

    var locationid=locationid;
    var i;
    for (i=0;i < onecount; i++)
        {
            if (subcat[i][1] == locationid)
            { 
                document.myform.SmallClassID.options[document.myform.SmallClassID.length] = new Option(subcat[i][0], subcat[i][2]);
            }        
        }
        
    }    
</script>


<p><br>
    <select name="action" style="border:1 solid #CCD5F9; font-size:9pt; background-color:#EAEAF4" size="1">
      <option value="">== 全 部 内 容 ==</option>
      <option value="title">== 按 标 题 ==</option>
      <option value="content">== 按 内 容 ==</option>
      <option value="editor">== 按 作 者 ==</option>
      <option value="about">== 按 关 键 字 ==</option>
    </select>
</p>
  <p> 
    <select name="BigClassid" onChange="changelocation(document.myform.BigClassid.options[document.myform.BigClassid.selectedIndex].value)" style="border:1 solid #CCD5F9; font-size:9pt; background-color:#EAEAF4" size="1">
      <option selected value="">== 全 部 大 类 ==</option>
      <%         
set rs8=server.CreateObject("ADODB.RecordSet")
rs8.Source="select * from "& db_BigClass_Table &" order by BigClassID"
rs8.Open rs8.Source,conn,1,1
        do while not rs8.eof
        %>
      <option value="<%=rs8("BigClassid")%>"><%=rs8("E_BigClassName")%></option>
      <%
        rs8.movenext
        loop
        rs8.close
		set rs8=nothing
        %>
    </select>
</p>
  <p>
    <select name="SmallClassID" style="border:1 solid #CCD5F9; font-size:9pt; background-color:#EAEAF4" size="1" >                  
      <option selected value="">== 全 部 小 类 ==</option>
    </select>  
</p>
  <p>
    <input type="text" name="keyword" style="font-size:9pt; background-color:#EAEAF4" size=10 value="关键字"onfocus="if (value =='关键字'){value =''}"onblur="if (value ==''){value='关键字'}" maxlength="50">
    &nbsp;
    <input type="submit" name="Submit" value="搜索" style="font-size: 9pt;  color: #000000; background-color: #EAEAF4; solid #EAEAF4" onMouseOver ="this.style.backgroundColor='#ffffff'" onMouseOut ="this.style.backgroundColor='#EAEAF4'">
</p>
        </p>