📄 sjsearch.asp

📁 北京商务网
💻 ASP
字号:
<%@ codepage ="936" %><!--#include file="head.asp"--><!--#include file="../sortcount.asp"--><!--#include file="../newcount.asp"--><script language="javascript">function show_sader(mylink){window.open(mylink,'','top=50,left=120,width=520,height=450,scrollbars=yes')}</script><script language="javascript">function show_business(link){window.open(link,'','top=50,left=150,width=520,height=450,scrollbars=yes')}</script><%const MaxPerPage=7dim totalPut dim CurrentPagedim TotalPagesdim i,jdim keywordkeyword=request("type")title=request("txtitle")if not isempty(request("page")) thencurrentPage=cint(request("page"))elsecurrentPage=1end ifdim sqldim rsdim rssortdim sortsqldim sort,sortnamedim datetimeif not isEmpty(request("datetime")) thendatetime=request("datetime")elsedatetime=date()end if %><%if flag_syjh=1 then  '判断是否需要审核才显示if datetime="7788" thenif keyword="0" thensql="select * from info where showname like '%"&request("txtitle")&"%' and dateandtime>=date()-"&cint(request("datetime"))&" order by info_id desc"elsesql="select * from info where showname like '%"&request("txtitle")&"%' and dateandtime>=date()-"&cint(request("datetime"))&" and type like '%"&request("type")&"%' order by info_id desc"end ifelse if keyword="0" thensql="select * from info where showname like '%"&request("txtitle")&"%' and dateandtime>=date()-"&cint(request("datetime"))&" order by info_id desc"elsesql="select * from info where showname like '%"&request("txtitle")&"%' and dateandtime>=date()-"&cint(request("datetime"))&" and type like '%"&request("type")&"%' order by info_id desc"end ifend ifelseif datetime="7788" thenif keyword="0" thensql="select * from info where showname like '%"&request("txtitle")&"%' and dateandtime>=date()-"&cint(request("datetime"))&" order by info_id desc"elsesql="select * from info where showname like '%"&request("txtitle")&"%' and dateandtime>=date()-"&cint(request("datetime"))&" and type like '%"&request("type")&"%' order by info_id desc"end ifelse if keyword="0" thensql="select * from info where showname like '%"&request("txtitle")&"%' and dateandtime>=date()-"&cint(request("datetime"))&" order by info_id desc"elsesql="select * from info where showname like '%"&request("txtitle")&"%' and dateandtime>=date()-"&cint(request("datetime"))&" and type like '%"&request("type")&"%' order by info_id desc"end ifend ifend ifSet rs= Server.CreateObject("ADODB.Recordset") rs.open sql,conn,1,1 if rs.eof and rs.bof then response.write"<SCRIPT language=JavaScript>alert('对不起，没有您要查询的信息！');"response.write"javascript:history.go(-1)</SCRIPT>"else totalPut=rs.recordcount if currentpage<1 then currentpage=1 end if if (currentpage-1)*MaxPerPage>totalput then if (totalPut mod MaxPerPage)=0 then currentpage= totalPut \ MaxPerPage else currentpage= totalPut \ MaxPerPage + 1 end if end if if currentPage=1 then showContentshowpage totalput,MaxPerPage,"sjsearch.asp"else if (currentPage-1)*MaxPerPage<totalPut then rs.move (currentPage-1)*MaxPerPage dim bookmark bookmark=rs.bookmark showContentshowpage totalput,MaxPerPage,"sjsearch.asp"else currentPage=1 showContentshowpage totalput,MaxPerPage,"sjsearch.asp"end if end if rs.close end ifset rs=nothingsub showContent%> <HTML><HEAD><TITLE><%=WebName%>·贸易机会</TITLE><LINK href="../css/Style.css" rel=stylesheet type=text/css><META content="Microsoft FrontPage 5.0" name=GENERATOR></HEAD><BODY bgColor=#ffffff text=#000000 topMargin=0 marginheight="0"><CENTER><TABLE border=0 cellPadding=0 cellSpacing=0 width=750><TBODY><TR><TD align=middle vAlign=top width=174><IMG height=34 src="images/TradeChance_hyfl.gif" width=174><BR><TABLE background=images/TradeChance_x1.gif border=0 cellPadding=0 cellSpacing=0 width="100%"><TBODY><tr><TD align=middle vAlign=top><TABLE border=0 cellPadding=2 width="95%" height="76" style="border-collapse: collapse" bordercolor="#111111" cellspacing="1"><TBODY><TR><TD align=middle height="19"><FONT color=#FF6600><B>供求信息分类统计</B></FONT></TD></TR><TR><TD height="17"><IFRAME frameBorder=0 height=46 marginHeight=1 marginWidth=1 scrolling=no src="fl.asp" width=154 BORDERCOLOR="#000000" name="I1"></IFRAME></TD></TR><TR align=middle><TD height="14"><IMG height=10 src="../images/index_10.gif" width=160></TD></TR></TBODY></TABLE></TD></tr></TBODY></TABLE><TABLE background=images/TradeChance_x1.gif border=0 cellPadding=0 cellSpacing=0 width="100%"><TBODY><tr><TD><IMG src="../images/index_clarity.gif"></TD><TD vAlign=top><TABLE bgColor=#e9e9e9 border=0 cellPadding=0 cellSpacing=1 width=168 height="29"><TBODY><%dim rssortdim sortsql Set rssort= Server.CreateObject("ADODB.Recordset") sortsql="select * from Class_1" rssort.open sortsql,conn,1,1 %><%do while not rssort.eof%><TR bgColor=#ffffff><TD onmouseout="this.style.background='ffffff'" onmouseover="this.style.background='#E8FAFF'" height="1"><TABLE border=0 cellPadding=3 cellSpacing=1 style="border-collapse: collapse" bordercolor="#111111" height="24"><TBODY><TR><TD>　</TD><TD><a href="search.asp?sortid=<%=rssort("sortid")%>" style="text-decoration: none"><%=rssort("sort")%></a><font color="#808080"><%response.write"("&count(rssort("sortid"))&")" %></font><%if count1(rssort("sortid"))=0 then%><%else%><img border="0" src="../Pict/new1.gif" width="27" height="10"><%end if%><FONT class=GR>&nbsp; </FONT></TD></TR></TBODY></TABLE></TD></TR><% rssort.movenext loop rssort.close set rssort=nothing %></TBODY></TABLE></TD></tr><TR><TD colSpan=2><IMG height=4 src="images/TradeChance_x2.gif" width=174></TD></TR></TBODY></TABLE></TD><TD align=middle vAlign=top width=576> <INPUT name=BHName type=hidden> <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1" ><tr><td width="100%"><div align="center"><center><table border="0" style="border-collapse: collapse" bordercolor="#111111" width="99%" id="AutoNumber4" height="21"><tr><td width="100%" height="19"><FONT color=#993300>当前位置：<a href="../default.asp" style="text-decoration: none">首页</a>&gt;&gt;<a href="default.asp" style="text-decoration: none">贸易机会</a>&gt;&gt;</FONT><%if request("txtitle")="" then%><font color="#FF0000"><%if request("type")="0"then response.write"全部信息" else response.write""&rs("type")&"专区"end if%></font><%else%>关键字：<font color="#ff6600"><%=title%><%end if%></font></td></tr></table></center></div></td></tr><tr><td width="100%" height="12"><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber3"><FORM action=sjsearch.asp method=POST name=searchtitle ><tr><TD vAlign=top width=130><img border="0" src="images/sj11.gif"></TD><TD background=images/sj12.gif><TABLE border=0 cellPadding=0 cellSpacing=0 height=25 width="446"><TBODY><TR><TD width="88"> <INPUT maxLength=100 name=txtitle size=14></TD><TD width="98"> <SELECT Class=f11 Size="1" Name="DateTime"><OPTION VALUE="30" selected>显示最近30天</OPTION><OPTION value="7788">显示所有时段</OPTION><OPTION VALUE="0">显示今日最新</OPTION><OPTION VALUE="2">显示最近2天</OPTION><OPTION VALUE="7">显示最近7天</OPTION><OPTION VALUE="90">显示最近3个月</OPTION><OPTION VALUE="180">显示最近6个月</OPTION><OPTION VALUE="365">显示最近1年</OPTION></select></TD><TD width="75"> <Select Class=f11 size="1" name="Type"> <OPTION value="0">全部信息</OPTION><OPTION VALUE="采购">采购</OPTION><OPTION VALUE="供应">供应</OPTION><OPTION VALUE="代理">代理</OPTION><OPTION VALUE="合作">合作</OPTION></Select> </TD><TD width="122"><INPUT align=bottom border=0 name=I7 src="images/index_search.gif" type=image ></TD></TR></TBODY></TABLE></TD></FORM></tr></table><TABLE background=images/TradeChance_jrgyxx_x.gif border=0 cellPadding=0 cellSpacing=0 width=575 style="border-collapse: collapse" bordercolor="#111111"><TBODY><TR><TD width=116 background="images/sj127.gif" height="25"><p align="center"><span style="letter-spacing: 2; font-weight: 700"><font color="#FFFFFF" size="2"><%if request("type")="0"then response.write"全部信息" else response.write""&rs("type")&"专区"end if%></font></span></TD><TD align=right vAlign=middle width="15">　</TD><TD align=right vAlign=middle width="465"><p align="left"><font size="2"><%if request("txtitle")="" then%><%else%></font><span style="font-size: 10pt">搜索关键字：</span><font color="#ff6600"><span style="font-size: 10pt"><%=title%><%end if%></span></font></TD></TR></TBODY></TABLE><TABLE background=images/TradeChance_jrgyxx_x2.gif border=0 cellPadding=0 cellSpacing=0 height=36 width=575><TBODY><TR><TD align=middle bgcolor="#ECF5FF"><TABLE border=0 cellPadding=0 cellSpacing=0 width="98%"><TBODY><TR><TD width="11%"><B><FONT color=#FF6600>[显示方式]：</FONT></B></TD><TD width="54%"><font color="#FF6600"><a href="sjsearch.asp?type=&keyword=0&datetime=7788&txtitle=<%=title%>">全部</a> →<a href="sjsearch.asp?type=采购&keyword=0&datetime=7788&txtitle=<%=title%>">采购</a> →<a href="sjsearch.asp?type=供应&keyword=0&datetime=7788&txtitle=<%=title%>">供应</a> →<a href="sjsearch.asp?type=代理&keyword=0&datetime=7788&txtitle=<%=title%>">代理</a> →<a href="sjsearch.asp?type=合作&keyword=0&datetime=7788&txtitle=<%=title%>">合作</a></font><b></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE><TABLE border=0 cellPadding=0 cellSpacing=0 width=575><!-- 翻页处理 --><!-- 翻页处理结束 --><TBODY><TR><%do while not rs.eof%> <TD align=right><TABLE border=0 cellPadding=0 cellSpacing=1 width="98%" style="border-collapse: collapse" bordercolor="#111111"><TBODY><TR><TD width="8%"><font size="2"><%if rs("type")="采购" then%></font><FONT color=#FF0000>[<%=rs("type")%>]</FONT><font face="Arial"><%elseif rs("type")="供应" then%></font><FONT color=#0066ff>[</FONT><font color="#0066FF"><%=rs("type")%></font><FONT color=#0066ff>]</FONT><font face="Arial"><%elseif rs("type")="代理" then%></font><FONT color=#008000>[<%=rs("type")%>]</FONT><font face="Arial"><%elseif rs("type")="合作" then%></font><FONT color=#800080>[<%=rs("type")%>]</FONT><font face="Arial"><%end if%></font></TD><TD height=18><IMG src="images/list3.gif"> <b> <a href='javascript:show_sader(&quot;business_info.asp?info_id=<%=rs("info_id")%>&quot;)'><%=rs("showname")%></a></b></TD><TD width="15%"> <%=rs("dateandtime")%></TD></TR><TR><TD align=middle bgColor=#f5f5f5 height=20 width="8%"><font size="2"><%if rs("type")="采购" then%><img border="0" src="images/a-qg.gif"></font><font face="Arial"><%elseif rs("type")="供应" then%><img border="0" src="images/a-gy.gif"><%elseif rs("type")="代理" then%><img border="0" src="images/a-dl.gif"><%elseif rs("type")="合作" then%><img border="0" src="images/a-hz.gif"><%end if%></font></TD><TD bgColor=#f5f5f5 colSpan=2>·<FONT color=#000080> <%if rs("web")="" or rs("web")="空" then%><a target="_blank" href="../company/index.asp?id=<%=rs("gsid")%>"><%=rs("company")%></a><%else%><A href="<%=rs("web")%>" target="_blank"><%=rs("company")%></A><%end if%></FONT><FONT color=#003399>&nbsp; </FONT><FONT color=#000080>[<%=rs("country")%>.<%=rs("city")%>]&nbsp;</FONT>&nbsp;</TD></TR><TR><TD colSpan=3 height=7 vAlign=center></TD></TR><TR><TD align=middle vAlign=center width="8%">　</TD><TD colSpan=2 vAlign=center><%=mid(rs("content"),1,80)%><FONT color=#003399>..[<a href="javascript:show_sader(&quot;business_info.asp?info_id=<%=rs("info_id")%>&quot;)" style="text-decoration: none">详细信息</a>]</FONT><BR></TD></TR></TBODY></TABLE></TD></TR><TR><TD align=middle height=15><IMG height=3 src="images/tradechance_jrgyxx_x3.gif" width=570></TD></TR><% i=i+1if i>=MaxPerPage then exit do rs.movenext loop end sub%></TBODY></TABLE></td></tr></table></TD></TR></TBODY></TABLE><%function showpage(totalnumber,maxperpage,filename)dim nif totalnumber mod maxperpage=0 then n= totalnumber \ maxperpage else n= totalnumber \ maxperpage+1 end if if CurrentPage<2 then response.write "<table border=0 width=98% cellspacing=0 cellpadding=0>" response.write "<tr height=30>"response.write "<td align=center>"response.write "共<font color=ff6600><b>"&n&"</b></font>页&nbsp;第<font color=ff6600><b>"&CurrentPage&"</b></font>页&nbsp;共检索到<font color=ff6600><b>"&totalnumber&"</b></font>条信息</TD>"response.write "<td align=right>"response.write "【最前页】【上一页】" else response.write "<table border=0 width=98% cellspacing=0 cellpadding=0>"response.write "<tr height=30>"response.write "<td align=center>"response.write "共<font color=ff6600><b>"&n&"</b></font>页&nbsp;第<font color=ff6600><b>"&CurrentPage&"</b></font>页&nbsp;共检索到<font color=ff6600><b>"&totalnumber&"</b></font>条信息" response.write "<td align=right>"response.write "【<a href="&filename&"?page=1&type="&keyword&"&datetime="&datetime&"&txtitle="&request("txtitle")&">最前页</a>】" response.write "【<a href="&filename&"?page="&CurrentPage-1&"&type="&keyword&"&datetime="&datetime&"&txtitle="&request("txtitle")&">上一页</a>】" end if if n-currentpage<1 then response.write "【下一页】【最后页】" else response.write "【<a href="&filename&"?page="&(CurrentPage+1)&"&type="&keyword&"&datetime="&datetime&"&txtitle="&request("txtitle")&">" response.write "下一页</a>】【<a href="&filename&"?page="&n&"&type="&keyword&"&datetime="&datetime&"&txtitle="&request("txtitle")&">最后页</a>】" end if response.write "</td>"response.write "</tr>"response.write "</form>"end function%><%sub content%><%end sub%><table width="750" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#111111" id="AutoNumber2" style="border-collapse: collapse"><tr><td width="100%" background="images/bt3.gif" style="line-height: 150%">　</td></tr></table></CENTER><!--#include file="../inc/end.asp"--></HTML>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -