📄 index.asp
字号:
<head>
</head>
<!--#include file="top.asp"-->
<TABLE cellSpacing=0 cellPadding=0 width=760 align=center >
<TBODY>
<tr>
<td width="173" valign="top">
<!--#include file="left.asp"--></td>
<td class=line></td>
<td valign="top" width="585" align="center">
<table border="0" width="100%" cellspacing="0" cellpadding="0" align=center>
<tr>
<td><div align="center">
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table9">
<tr>
<td colspan="2" class=th>新闻中心</td>
<td colspan="2" class=th>站点公告</td>
</tr>
<tr>
<td valign=top width="380"><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%" id="table24" >
<%
Set rs= conn.execute("select top 6 * from [news] order by id desc" )
do while not rs.eof
%>
<tr>
<td height=18 ><img src='Img/newdot.gif' width='9' height='15'>[<font color='red'><%=rs("typ")%></font>]<a href='news_info.asp?ID=<%=rs("ID")%>' target='_blank'><%=left(rs("title"),16)%></a> (<%=rs("hitnum")%>)次 [<%=rs("date")%>]</td>
<% bq=bq+1
if bq>=6 then exit do
rs.movenext
loop
rs.close
set rs=nothing
%>
</tr>
</table></td>
<td class=line colspan="2"></td>
<td width="204" valign=top>
<marquee id=scrollArea1 onmouseover=scrollArea1.stop() onmouseout=scrollArea1.start() scrollAmount=1 border="0" direction=up height="114"><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%" id="table24" >
<%
Set rs= conn.execute("select top 6 * from [gonggao] order by id desc" )
do while not rs.eof
%>
<tr>
<td height=18 ><img src='Img/newdot.gif' width='9' height='15'><a href='news_info.asp?ID=<%=rs("ID")%>' target='_blank'><%=left(rs("title"),16)%></a> (<%=rs("hitnum")%>)次</td>
<% bqr=bqr+1
if bqr>=6 then exit do
rs.movenext
loop
rs.close
set rs=nothing
%>
</tr>
</table></marquee></td>
</tr>
<tr>
<td align="right" ><a href="news_list.asp">
<img border="0" src="images/more.gif" width="31" height="11"></a></td>
<td width="1" bgcolor="#DFDFDF" colspan="2"> </td>
<td align="right"><a href="annouce_list.asp">
<img border="0" src="images/more.gif" width="31" height="11"></a></td>
</tr>
</table>
</div></td>
</tr>
<tr>
<td><div align="center">
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table15" >
<tr>
<td colspan="2" class=th>
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table21">
<tr>
<td><font color="#FFFFFF">新开店铺</font></td>
<td><font color="#FFFFFF">热门店铺</font></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="4%">最新店铺</td>
<td width="96%">
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table11">
<tr>
<td><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%" id="table24" > <tr>
<%
Set rs= conn.execute("select top 6 * from [dduser] where font='1' order by user_id desc" )
do while not rs.eof
%>
<td width='16%' align='center' ><a href='shop_info.asp?user_id=<%=rs("user_id")%>' target=_blank><img src='<%=rs("shop_img")%>' width=50 height=50 border=0 style='border: 1px solid #000000'><br><%=left((rs("shop_name")),6)%></a></td>
<% beq=beq+1
if beq>=6 then exit do
rs.movenext
loop
rs.close
set rs=nothing
%>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="4%">最热店铺</td>
<td width="96%">
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table11">
<tr>
<td><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%" id="table24" > <tr>
<%
Set rs= conn.execute("select top 6 * from [dduser] where font='1' order by shop_hits desc,user_id desc" )
do while not rs.eof
%>
<td width='16%' align='center' ><a href='shop_info.asp?user_id=<%=rs("user_id")%>' target=_blank><img src='<%=rs("shop_img")%>' width=50 height=50 border=0 style='border: 1px solid #000000'><br><%=left((rs("shop_name")),6)%></a></td> <% berq=berq+1
if berq>=6 then exit do
rs.movenext
loop
rs.close
set rs=nothing
%>
</tr>
</table></td>
</tr>
</table>
</td>
</tr>
<tr>
<td colspan="2" align="right"><a href="shop_list.asp">
<img border="0" src="images/more.gif" width="31" height="11"></a></td>
</tr>
<tr>
<td colspan="2"><a href=<%=indexmiddle_url%> target=_blank><img src="<%=indexmiddle%>" border=0></a><!--中间广告585*80//--></td>
</tr>
</table>
</div></td>
</tr>
<tr>
<td><div align="center">
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table18" >
<tr>
<td class=th>推荐商品
</td>
<td class=th>星级店铺
</td>
</tr>
<tr>
<td width="100%" colspan="2">
<table border="0" width="100%" cellspacing="1" cellpadding="0" bgcolor="#DFDFDF">
<tr>
<td class="tablebody1" width="50%" valign="top"><div align="center">
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table4">
<%
Set rs= conn.execute("select top 9 * from [goods_info] where font='1' order by goods_id desc" )
IF not rs.eof and not rs.bof then
do while not rs.eof
%>
<tr>
<td height=18 >·<a href='goods_info.asp?goods_id=<%=rs("goods_id")%>' target='_blank'><%=left(rs("goods_name"),16)%></a><img src=img/good.gif border=0 alt=推荐商品> <%
if rs("AlipayStatus")="1" then
%> <img alt=支付宝付款 src=Images/AlipayStatus.gif border=0 width=16 height=16><%end if%></td></tr>
<% rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</table>
</div></td><td class="tablebody1" valign="top"><div align="center"><!--#include file="inc/shopstar.asp"-->
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table4">
<%
Set rs= conn.execute("select top 9 * from [dduser] where font='1' order by star desc,user_id desc" )
IF not rs.eof and not rs.bof then
do while not rs.eof
%>
<tr>
<td height=18 >·<a href='shop_info.asp?user_id=<%=rs("user_id")%>' target='_blank'><%=left(rs("shop_name"),10)%></a> <%=top1(rs("star"))%></td></tr>
<% rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</table>
</div></td>
</tr>
</table>
</td>
</tr>
</table>
</div></td>
</tr>
<tr>
<td><div align="center">
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table15" >
<tr>
<td colspan="2" class=th>
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table21">
<tr>
<td><font color="#FFFFFF">最新商品</font></td>
<td><font color="#FFFFFF">最热商品</font></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="4%">最新商品</td>
<td width="96%">
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table16" >
<tr>
<td><table border="0" width="100%" cellspacing="0" cellpadding="0" id="table4"> <tr>
<%
Set rs= conn.execute("select top 6 * from [goods_info] order by goods_id desc" )
IF not rs.eof and not rs.bof then
do while not rs.eof
%>
<td width='16%' align='center' ><a href='goods_info.asp?goods_id=<%=rs("goods_id")%>' target=_blank><img src='<%=rs("goods_pic")%>' width=50 height=50 border=0 style='border: 1px solid #000000'><br><%=left((rs("goods_name")),6)%></a></td>
<% rs.movenext
loop
end if
rs.close
set rs=nothing
%></tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td colspan="2" align="right"><a href="goods_list.asp">
<img border="0" src="images/more.gif" width="31" height="11"></a></td>
</tr>
<tr>
<td colspan="2" align="right"><hr color="#E4F4E1" size="0"></td>
</tr>
<tr>
<td width="4%">热门商品</td>
<td width="96%">
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table17" >
<tr>
<td><table border="0" width="100%" cellspacing="0" cellpadding="0" id="table4"> <tr>
<%
Set rs= conn.execute("select top 6 * from [goods_info] order by goods_hits desc,goods_id desc" )
IF not rs.eof and not rs.bof then
do while not rs.eof
%>
<td width='16%' align='center' ><a href='goods_info.asp?goods_id=<%=rs("goods_id")%>' target=_blank><img src='<%=rs("goods_pic")%>' width=50 height=50 border=0 style='border: 1px solid #000000'><br><%=left((rs("goods_name")),6)%></a></td>
<% rs.movenext
loop
end if
rs.close
set rs=nothing
%></tr>
</table></td>
</tr>
</table>
</td>
</tr>
<tr>
<td colspan="2" align="right"><a href="goodstop.asp">
<img border="0" src="images/more.gif" width="31" height="11"></a></td>
</tr>
</table>
</div></td>
</tr>
<tr>
<td> <div align="center">
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table18" >
<tr>
<td class=th>
最新二手</td>
<td class=th>
热门二手</td>
</tr>
<tr>
<td width="100%" colspan="2">
<table border="0" width="100%" cellspacing="1" cellpadding="0" bgcolor="#DFDFDF">
<tr>
<td class="tablebody1" width="50%" valign="top"><script src="js.asp?topType=new&classNO=&num=8&maxlen=15&showdate=1&showhits=0&showClass=1"></script></td><td class="tablebody1" valign="top"><script src="js.asp?topType=hot&classNO=&num=8&maxlen=15&showdate=1&showhits=0&showClass=1"></script></td>
</tr>
</table>
</td>
</tr>
</table>
</div></td>
</tr>
<tr>
<td> <div align="center">
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table18" >
<tr>
<td class=th>
店铺新闻</td>
<td class=th>
店铺连接</td>
</tr>
<tr>
<td width="100%" colspan="2">
<table border="0" width="100%" cellspacing="1" cellpadding="0" bgcolor="#DFDFDF">
<tr>
<td class="tablebody1" width="50%" valign="top"><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%" >
<%
Set rs= conn.execute("select * from new order by id desc" )
do while not rs.eof
%>
<tr>
<td>·<a href=shopnewsinfor.asp?id=<%=rs("id")%> target=_blank><%=rs("name")%></a>(<%=rs("date")%>)</td>
<% d=d+1
if d>=8 then exit do
rs.movenext
loop
rs.close
set rs=nothing
%>
</tr>
</table></td><td class="tablebody1" valign="top"><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%" >
<%
Set rs= conn.execute("select * from link order by id desc" )
do while not rs.eof
%>
<tr>
<td>·<a href=<%=rs("url")%> target=_blank><%=rs("name")%></a></td>
<% p=p+1
if p>=8 then exit do
rs.movenext
loop
rs.close
set rs=nothing
%>
</tr>
</table></td>
</tr>
</table>
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table20">
<tr>
<td class=th>校园讨论</td>
</tr>
<tr>
<td><script src="../dian2/gbook/homeapply.asp?type=2&lycount=10&lylen=50&info=1&pic=0&reply=1&order=1"></script></td>
</tr>
</table>
</td>
</tr>
</table>
</div></td>
</tr>
</table>
</td>
</tr>
</TBODY>
</TABLE>
<!--#include file="bottom.asp"-->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -