📄 default.asp
字号:
<%@ codepage ="936" %><!--#include file="head.asp"--><!--#include file="../sortcount.asp"--><!--#include file="../newcount.asp"--><SCRIPT>function view1(url){ var url; window.open(url,'_blank','status=no,scrollbars=yes,top=20,left=110,width=600,height=460'); }</SCRIPT><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 MaxNumber=10const Max1=6dim mrsdim msqldim grsdim gsqldim drsdim sqldim cgsqldim cgrsdim rssortdim sortsqlSet rssort= Server.CreateObject("ADODB.Recordset") sortsql="select * from Class_1" rssort.open sortsql,conn,1,1if flag_syjh=1 then '判断是否需要审核才显示Set mrs= Server.CreateObject("ADODB.Recordset") msql="select * from info where type like '" & "采购" & "' and flag=1 and showname like '%"&showname&"%' order by info_id desc" mrs.open msql,conn,1,1cgnum=mrs.recordcountSet grs= Server.CreateObject("ADODB.Recordset") gsql="select * from info where type like '" & "供应" & "' and flag=1 and showname like '%"&showname&"%' order by info_id desc" grs.open gsql,conn,1,1 gynum=grs.recordcount Set drs= Server.CreateObject("ADODB.Recordset") dsql="select * from info where type like '" & "代理" & "' and flag=1 and showname like '%"&showname&"%' order by info_id desc" drs.open dsql,conn,1,1 dlnum=drs.recordcount Set hrs= Server.CreateObject("ADODB.Recordset") hsql="select * from info where type like '" & "合作" & "' and flag=1 and showname like '%"&showname&"%' order by info_id desc" hrs.open hsql,conn,1,1 hznum=hrs.recordcount else Set mrs= Server.CreateObject("ADODB.Recordset") msql="select * from info where type like '" & "采购" & "' and showname like '%"&showname&"%' order by info_id desc" mrs.open msql,conn,1,1 cgnum=mrs.recordcount Set grs= Server.CreateObject("ADODB.Recordset") gsql="select * from info where type like '" & "供应" & "' and showname like '%"&showname&"%' order by info_id desc" grs.open gsql,conn,1,1 gynum=grs.recordcount Set drs= Server.CreateObject("ADODB.Recordset") dsql="select * from info where type like '" & "代理" & "' and showname like '%"&showname&"%' order by info_id desc" drs.open dsql,conn,1,1 dlnum=drs.recordcount Set hrs= Server.CreateObject("ADODB.Recordset") hsql="select * from info where type like '" & "合作" & "' and showname like '%"&showname&"%' order by info_id desc" hrs.open hsql,conn,1,1hznum=hrs.recordcountend ifcgsql="select * from cgal order by NewsID desc"Set cgrs= Server.CreateObject("ADODB.Recordset") cgrs.open cgsql,conn,1,1 %><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="84" style="border-collapse: collapse" bordercolor="#111111" cellspacing="1"><TBODY><TR><TD align=middle colSpan=2 height="27"><FONT color=#FF6600><B>供求信息分类统计</B></FONT></TD></TR><TR><TD height="17"><a style="text-decoration: none" target="_top" href="sjsearch.asp?type=供应&keyword=0&datetime=7788&txtitle=<%=title%>">供应</a> <font color="#808080"><%=gynum%></font></TD><TD height="17"><a style="text-decoration: none" target="_top" href="sjsearch.asp?type=采购&keyword=0&datetime=7788&txtitle=<%=title%>">采购</a> <font color="#808080"><%=cgnum%></font></TD></TR><TR><TD height="17"><a style="text-decoration: none" target="_top" href="sjsearch.asp?type=合作&keyword=0&datetime=7788&txtitle=<%=title%>">合作</a> <font color="#808080"><%=hznum%></font></TD><TD height="17"><a style="text-decoration: none" target="_top" href="sjsearch.asp?type=代理&keyword=0&datetime=7788&txtitle=<%=title%>">代理</a> <font color="#808080"><%=dlnum%></font></TD></TR><TR align=middle><TD colSpan=2 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><%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="22"><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> </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><FORM action=sjsearch.asp method=POST name=Search><TABLE border=0 cellPadding=0 cellSpacing=4 width=576><TBODY><TR><TD><FONT color=#993300>当前位置：<a href="../default.asp" style="text-decoration: none">首页</a> >> <a href="default.asp" style="text-decoration: none">贸易机会</a> </FONT></TD></TR></TBODY></TABLE><TABLE border=0 cellPadding=0 cellSpacing=0 width=576><TBODY><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 name=BHName type=hidden> <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></TR></TBODY></TABLE></FORM><TABLE border=0 cellPadding=0 cellSpacing=0 width=576><TBODY><TR><TD align=right background=images/sj13.gif height=38 vAlign=top><TABLE border=0 cellPadding=0 cellSpacing=0 width="45%" style="border-collapse: collapse" bordercolor="#111111"><TBODY><TR><TD align=right height=18 vAlign=bottom background="images/sj14.gif"><font style='width=100%; position: relative; filter: glow(color=#ffffff, strength=1); letter-spacing:1; '><p align="center"><font style='filter: glow(color=#ffffff, strength=1); letter-spacing:1'><a style="text-decoration: none" href="sjsearch.asp?type=采购&keyword=0&datetime=7788&txtitle=<%=title%>"><font color="#FF0000">采购</font></a></font><font color="#000080"> |</font><font color="#008080"> </font>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -