<% set adrs=server.createobject("adodb.recordset") sql="select top 1 * from site" adrs.open sql,conn,1,1 %>
<% page=clng(request("page")) key=request("key") key2=request("key2") area=request("area") big=request("big") smallclass=request("class") bigclass=request("bigclass") set rslook=server.createobject("adodb.recordset") if key2="cp" then if smallclass<>"" and big <>"" then sql77="select * from info where smallclass='"&smallclass&"'and bigclass='"&big&"' order by vip desc, tuijian desc, id asc" aa=1 end if if area<>"" then sql77="select * from info where gscontent like '%"& key &"%' and whereee='"&area&"' order by vip desc, tuijian desc, id asc" bb=1 end if if area="日照" then sql77="select * from info where gscontent like '%"& key &"%' order by vip desc, tuijian desc,id asc" bb=1 end if if bigclass<>"" and smallclass="" then sql77="select * from info where bigclass='"&bigclass&"' order by vip desc, tuijian desc, id asc " cc=1 end if else if smallclass<>"" and big <>"" then sql77="select * from info where smallclass='"&smallclass&"'and bigclass='"&big&"' order by vip desc, tuijian desc,id asc" aa=1 end if if area<>"" then sql77="select * from info where company like '%"& key &"%' and whereee='"&area&"' order by vip desc, tuijian desc,id asc" bb=1 end if if area="日照" then sql77="select * from info where company like '%"& key &"%' order by vip desc, tuijian desc,id asc" bb=1 end if if bigclass<>"" and smallclass="" then sql77="select * from info where bigclass='"&bigclass&"' order by vip desc, tuijian desc,id asc" cc=1 end if end if rslook.open sql77,conn,1,3 if rslook.eof or rslook.bof then response.write"暂时没有数据!" else %> <% rslook.PageSize=18 if page=0 then page=1 pages=rslook.pagecount if page > pages then page=pages rslook.AbsolutePage=page for j=1 to rslook.PageSize %> <% rslook.movenext if rslook.eof then exit for next end if %>
.html" title="<%=rslook("company")%>" target="_blank"> <% vip=rslook("tuijian") if vip=1 then%> <%=left(rslook("company"),12)%><%else%><%=left(rslook("company"),12)%> <%end if%>