📄 sca.asp
字号:
<!--#include file="main.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>商贸机会-<%=citytitle%></title>
</head>
<body topmargin="0">
<%SMT_TOP%>
<table width="760" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="480" valign=top>
<!--=========left===============-->
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height=6 colspan=6 background="img/tit_3.GIF"></td>
</tr>
<tr>
<td height=22 colspan=6 bgcolor=#efefef style="border-right:1px #B44001 solid;border-left:1px #B44001 solid;border-bottom:2px #999999 solid">
<!--================-->
<table width="478" border="0" cellspacing="0" cellpadding="0">
<tr align=center>
<%set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from SMT_scasort order by SMT_date desc"
rs.open sql,conn,1,1
do while not rs.eof
set rs1=server.createobject("adodb.recordset")
sql1="select * from SMT_sca where SMT_scasort="&rs("SMT_id")&" and SMT_key=1 and SMT_key1=1 and SMT_key2=1"
rs1.open sql1,conn,1,1%>
<td width=80 style="border-right:1px #cccccc solid"><a href=sca_tlist.asp?scasort=<%=rs("SMT_id")%>><%=rs("SMT_scasort")%></a><font color=red>(<%=rs1.recordcount%>)</font></td>
<%rs1.close
rs.movenext
loop
rs.close
set rs=nothing%>
<%set rs1=server.createobject("adodb.recordset")
sql1="select * from SMT_sca where SMT_scasort=0 and SMT_key=1 and SMT_key1=1 and SMT_key2=1"
rs1.open sql1,conn,1,1%>
<td width=78><a href=sca_tlist.asp?scasort=0>其它</a><font color=red>(<%=rs1.recordcount%>)</font></td>
<%rs1.close
set rs1=nothing%> </tr>
</table>
<!--================-->
</td>
</tr>
<tr>
<td style="border-bottom:1px #B44001 solid;border-right:1px #B44001 solid;border-left:1px #B44001 solid" colspan=6>
<!--==-->
<table width="96%" border="0" cellspacing="0" cellpadding="0" align=center>
<tr><td height=10></td></tr>
<tr>
<%set rs=server.createobject("adodb.recordset")
sql="select * from SMT_ypxxone order by SMT_date desc"
rs.open sql,conn,1,1
n=0
nn=rs.recordcount
do while not rs.eof
n=n+1
set rs1=server.createobject("adodb.recordset")
sql1="select * from SMT_sca where SMT_ypxxone_id="&rs("SMT_ypxxone_id")
rs1.open sql1,conn,1,1
onecount=rs1.recordcount
rs1.close%>
<td height=30 width=235 valign=top><p style="line-height:150%"><strong><a href=sca_list.asp?id=<%=rs("SMT_ypxxone_id")%> class="black"><font class=f14><%=rs("SMT_ypxxone")%></font></a></strong> <font color=red>(<%=onecount%>)</font></td>
<%if n mod 2<>0 then response.write("<td width=10></td>")
if n mod 2=0 and nn<>n then response.write("</tr><tr>")
rs.movenext
loop
rs.close%>
</tr>
</table>
<!--==-->
</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="1" cellpadding="0">
<tr><td colspan=5 height=4></td></tr>
<%sql="select * from SMT_sca where SMT_key=1 and SMT_key1=1 and SMT_key2=1 and SMT_key3=1 order by SMT_tjdate desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "<tr><td height=194 colspan=5 align=center>暂无内容</td></tr>"
else
'分页的实现
listnum=12
Rs.pagesize=listnum
page=Request("page")
if (page-Rs.pagecount) > 0 then
page=Rs.pagecount
elseif page = "" or page < 1 then
page = 1
end if
Rs.absolutepage=page
'编号的实现
j=rs.recordcount
j=j-(page-1)*listnum%>
<%i=0
nn=request("page")
if nn="" then
n=0
else
nn=nn-1
n=listnum*nn
end if
do while not rs.eof and i<listnum
n=n+1
sca=rs("SMT_sca")
if len(sca)>61 then
sca=left(sca,60)&"..."
end if
set rs1=server.createobject("adodb.recordset")
sql1="select * from SMT_scasort where SMT_id="&rs("SMT_scasort")
rs1.open sql1,conn,1,1
if not rs1.eof then
scasort="<font color=green>["&rs1("SMT_scasort")&"]</font>"
else
scasort="<font color=green>[其它]</font>"
end if
rs1.close%>
<tr>
<td width="40"><%=scasort%></td>
<td width="470" height=25><img src="img/index_aro4.gif"> <a href=sca_view.asp?id=<%=rs("SMT_id")%> target="_blank"><strong><font class=f14><%=rs("SMT_scatitle")%></font></strong></a></td>
<td width="80" align=right><font color=#000000><%=year(rs("SMT_begindate"))&"-"&month(rs("SMT_begindate"))&"-"&day(rs("SMT_begindate"))%></font></td>
</tr>
<%if rs("SMT_yp_id")<>0 then
set rs1=server.createobject("adodb.recordset")
sql1="select * from SMT_yp where SMT_id="&rs("SMT_yp_id")
rs1.open sql1,conn,1,1
if not rs1.eof then
goname=rs1("SMT_user")
goid=rs1("SMT_id")
coname=rs1("SMT_coname")
addtwo_id=rs1("SMT_addtwo_id")
svip=rs1("SMT_vip")
end if
rs1.close
set rs1=server.createobject("adodb.recordset")
sql1="select * from SMT_ypaddtwo where SMT_addtwo_id="&addtwo_id
rs1.open sql1,conn,1,1
coadd=" <font color=1587DE>["&rs1("SMT_addtwo")&"/"&rs1("SMT_addone")&"]</font>"
rs1.close%>
<!--#include file="dns/dns.asp"-->
<tr>
<td></td>
<td height=20 colspan=2> <a href=<%=usertwourl%> target=_blank><%=coname%></a> <%if svip=2 then%><img src="img/vip.gif" title="VIP会员"><%end if%> <%=coadd%></td>
</tr>
<%end if%>
<tr>
<td></td>
<td height=20 colspan=2><p style="line-height:150%"> <%=trim(sca)%></td>
</tr>
<tr><td colspan=3 background="img/list_line_1.gif"></td></tr>
<%rs.movenext
i=i+1
j=j-1
loop%>
<tr>
<%filename="sca.asp"%>
<td colspan=6 align=right bgcolor=#efefef height=20><strong><font color=FF6C00><%=rs.recordcount%></font></strong>条信息 共<strong><font color=FF6C00><%=Rs.pagecount%></font></strong>页
<% if page=1 then %>
<%else%>
<a href=<%=filename%>><strong>|<<</strong></a>
<a href=<%=filename%>?page=<%=page-1%>><strong><<</strong></a>
<a href=<%=filename%>?page=<%=page-1%>><strong>[<%=page-1%>]</strong></a>
<%end if%><% if Rs.pagecount=1 then %>
<%else%><strong>[<%=page%>]</strong>
<%end if%>
<% if Rs.pagecount-page <> 0 then %>
<a href=<%=filename%>?page=<%=page+1%>><strong>[<%=page+1%>]</strong></a>
<a href=<%=filename%>?page=<%=page+1%>><strong>>></strong></a>
<a href=<%=filename%>?page=<%=Rs.pagecount%>><strong>>>|</strong></a>
<%end if%> </td>
<%end if%></tr>
<tr><td colspan=5 height=4></td></tr>
</table>
<%rs.close%>
<!--==========left end==============-->
</td>
<td width="10"></td>
<td width="270" valign=top bgcolor=#efefef>
<!--==========right==============-->
<table width="100%" border="0" cellspacing="0" cellpadding="0" align=right>
<tr><td height=110 bgcolor=#ffffff align=right><img src="ad/20041209001.jpg"></td></tr>
<tr><td height=30 background="img/bgtitle1.gif"> <strong class=f14>供应推荐</strong></td></tr>
<tr><td><table width="95%" border="0" cellspacing="0" cellpadding="0" align=center><tr><td><script language=javascript src=Include/sca.asp?aid=3&bid=6&cid=30&did=0&eid=0&fid=1></script></td></tr></table></td></tr>
<tr><td height=65 valign=top align=center><img src="ad/20040820001.gif"></td></tr>
<tr><td height=30 background="img/bgtitle1.gif"> <strong class=f14>求购推荐</strong></td></tr>
<tr><td><table width="95%" border="0" cellspacing="0" cellpadding="0" align=center><tr><td><script language=javascript src=Include/sca.asp?aid=2&bid=6&cid=30&did=0&eid=0&fid=1></script></td></tr></table></td></tr>
<tr><td height=195><img src="ad/20040820003.gif"></td></tr>
<tr><td height=30 background="img/bgtitle1.gif"> <strong class=f14>推荐VIP会员</strong></td></tr>
<tr>
<td>
<table width="95%" border="0" cellspacing="0" cellpadding="0" align=center><tr>
<td height=120><script language=javascript src=Include/yp.asp?aid=9&bid=50&cid=2&did=1></script></td>
</tr></table>
</td>
</tr>
<tr>
<td height=30 background="img/bgtitle1.gif"> <strong class=f14>推荐展会</strong></td>
</tr>
<tr>
<td>
<table width="95%" border="0" cellspacing="0" cellpadding="0" align=center>
<tr><td height=5></td></tr>
<tr>
<td height=72><p style="line-height:180%"><%set rs=server.createobject("adodb.recordset")
sql="select top 5 * from SMT_exhibit where SMT_key=2 and SMT_key2=1 order by SMT_id desc"
rs.open sql,conn,1,1
do while not rs.eof
z_name=trim(rs("SMT_z_name"))%>
·<a href=zh_view.asp?id=<%=rs("SMT_id")%> target="_blank" class="f14"><%=LeftT(z_name,32)%></a><br>
<%rs.movenext
loop
rs.close%></td>
</tr>
<tr><td height=5></td></tr>
</table>
</td>
</tr>
<tr><td height=30 background="img/bgtitle1.gif"> <strong class=f14>行业动态</strong></td></tr>
<tr><td><table width="95%" border="0" cellspacing="0" cellpadding="0" align=center><tr><td><script language=javascript src=Include/news.asp?aid=1&bid=15&cid=30&did=1&eid=0&fid=1&gid=0></script></td></tr></table></td></tr>
</table>
<!--===============right end =========-->
</td>
</tr>
</table>
<!--====== bottom ========-->
<table width="760" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor=#ffffff>
<tr><td height=2 bgcolor=#ff6600></td></tr>
<tr>
<td align="center" height=80><%=citybottom%></td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -