?? class.asp
字號:
rs_nclass.open "select count(*) from shop_snsn where cxiaoshop=1",conn,1,1
response.write "(本類共有<font color=#FF0000>"&rs_nclass(0)&"</font>種)"
rs.open "select * from shop_snsn where cxiaoshop=1 order by adddate desc",conn,1,1
else
xml= "<a href=rss_class.asp?lx=tejia><img src=img/xml.gif border=0 alt=""RSS2.0支持""></a>"
response.write "其它查看方式"
px=request.QueryString("px")
if px="" then
set rs_nclass=server.createobject("adodb.recordset")
rs_nclass.open "select count(*) from shop_snsn where newsshop=1",conn,1,1
response.write "(本類共有<font color=#FF0000>"&rs_nclass(0)&"</font>種)"
rs.open "select * from shop_snsn where newsshop=1 order by adddate desc",conn,1,1
else
set rs_nclass=server.createobject("adodb.recordset")
rs_nclass.open "select count(*) from shop_snsn",conn,1,1
response.write "(本類共有<font color=#FF0000>"&rs_nclass(0)&"</font>種)"
select case px
case "0"
rs.open "select * from shop_snsn where bestshop=1 ",conn,1,1
case "1"
rs.open "select * from shop_snsn order by adddate asc",conn,1,1
case "2"
rs.open "select * from shop_snsn order by adddate desc",conn,1,1
case "3"
rs.open "select * from shop_snsn order by shichangjia desc",conn,1,1
case "4"
rs.open "select * from shop_snsn order by shichangjia asc",conn,1,1
case "5"
rs.open "select * from shop_snsn order by sx desc",conn,1,1
case "6"
rs.open "select * from shop_snsn order by sx asc",conn,1,1
end select
end if
end if
%></td>
<td valign="bottom">
</td>
</tr>
<tr>
<td height="6" colspan="3"></td>
</tr>
</table>
<table width="945" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="200" valign="top"><!--#include file="cart.asp"--><%if leixing="big" then%>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif" class="sm_gray">
<tr>
<td height="12"></td>
</tr>
<tr>
<td><img src="img/lf_tl_class.gif" width="180" height="40"></td>
</tr>
<tr>
<td> </td>
</tr>
</table>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><span class="fontglow"><span class="b14">
</span></span>
<table width="160" border="0" align="center" cellpadding="0" cellspacing="0">
<%set rsl=server.createobject("adodb.recordset")
rsl.open "select nclass,nclassid,xsztys from shop_nclass where anclassid="&anclassid&" and xs=2 order by nclassidorder asc",conn,1,1
while not rsl.eof %>
<tr>
<td height="22"> <img src="img/go.gif" width="15" height="15">
<span class="fontglow"><A href=class.asp?lx=small&anid=<%=anclassid%>&nid=<%=rsl("nclassid")%>><font color=<%=trim(rsl("xsztys"))%>><%=trim(rsl("nclass"))%></font></A></span><%
classsl=conn.execute("Select count(*) from shop_snsn where nclassid="&rsl("nclassid")&"")(0)
response.write "(<font color=#FF0000>"&classsl&"</font>)"%> </td>
</tr>
<tr>
<td height="1" colspan="2" class="td_margin1"><img src="/img/skin<%=cssid%>/x.gif" width="149" height="1"></td>
</tr>
<%rsl.movenext
wend
rsl.close
%>
</table>
<span class="fontglow"><span class="b14">
</span></span></td>
</tr>
</table> </td>
</tr>
</table>
<%elseif leixing="small" or leixing="snsn" then%>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif" class="sm_gray">
<tr>
<td height="12"></td>
</tr>
<tr>
<td><img src="img/lf_tl_class.gif" width="180" height="40"></td>
</tr>
<tr>
<td> </td>
</tr>
</table>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><span class="fontglow"><span class="b14"> </span></span>
<table width="160" border="0" align="center" cellpadding="0" cellspacing="0">
<%set rsl=server.createobject("adodb.recordset")
rsl.open "select nclass,nclassid,xsztys from shop_nclass where anclassid="&anclassid&" and xs=2 order by nclassidorder asc",conn,1,1
while not rsl.eof%>
<tr>
<td height="22"> <img src="img/go.gif" width="15" height="15"> <span class="fontglow"><span class="b14"><A href=class.asp?lx=small&anid=<%=anclassid%>&nid=<%=rsl("nclassid")%>><font color=<%=trim(rsl("xsztys"))%>><%=trim(rsl("nclass"))%></font></A></span></span><%
classsl=conn.execute("Select count(*) from shop_snsn where nclassid="&rsl("nclassid")&"")(0)
response.write "(<font color=#FF0000>"&classsl&"</font>)"%></td>
</tr>
<tr>
<td height="1" colspan="2" class="td_margin1"><img src="/img/skin<%=cssid%>/x.gif" width="149" height="1"></td>
</tr>
<%rsl.movenext
wend
rsl.close
%>
</table>
<span class="fontglow"><span class="b14"> </span></span></td>
</tr>
</table></td>
</tr>
</table>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif" class="sm_gray">
<tr>
<td height="12"></td>
</tr>
<tr>
<td><img src="img/lf_tl_xclass.gif" width="180" height="40"></td>
</tr>
<tr>
<td> </td>
</tr>
</table>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><span class="fontglow"><span class="b14"> </span></span>
<table width="160" border="0" align="center" cellpadding="0" cellspacing="0">
<%set rsl=server.createobject("adodb.recordset")
rsl.open "select * from shop_xclass where anclassid="&anclassid&" and nclassid="&nclassid&" and xxs=2 order by xpx asc",conn,1,1
while not rsl.eof%>
<tr>
<td height="22"> <img src="img/go.gif" width="15" height="15"> <span class="fontglow"><span class="b14"><A href=class.asp?lx=snsn&anid=<%=anclassid%>&nid=<%=rsl("nclassid")%>&xid=<%=rsl("id")%>><%=trim(rsl("xclass"))%></A> </span></span><%
xclasssl=conn.execute("Select count(*)from shop_snsn where xclassid="&rsl("id")&"")(0)
response.write "(<font color=#FF0000>"&xclasssl&"</font>)"%></td>
</tr>
<tr>
<td height="1" colspan="2" class="td_margin1"><img src="/img/skin<%=cssid%>/x.gif" width="149" height="1"></td>
</tr>
<%rsl.movenext
wend
rsl.close
%>
</table>
<span class="fontglow"><span class="b14"> </span></span></td>
</tr>
</table></td>
</tr>
</table>
<%end if%>
<font color="#FF0000">
<%if session("username")<>"" then%>
</font>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif" class="sm_gray">
<tr>
<td height="12"></td>
</tr>
<tr>
<td><img src="img/lf_tl_best11.gif" width="180" height="40"></td>
</tr>
<tr>
<td>
</td>
</tr>
</table>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><table width="160" border="0" align="center" cellpadding="0" cellspacing="0">
<%set rsl=server.createobject("adodb.recordset")
rsl.open "select * from shop_his where username='"&nosql(session("username"))&"' and lx=1 order by ltime desc",conn,1,1
while not rsl.eof%>
<tr>
<td height="22"> <img src="img/go.gif" width="15" height="15"><a href='list.asp?id=<%=rsl("shopid")%>' target=_blank>
<%if len(trim(rsl("shopname")))>11 then
response.write left(trim(rsl("shopname")),11)&".."
else
response.write trim(rsl("shopname"))
end if%>
</a></td>
</tr>
<tr>
<td height="1" colspan="2" class="td_margin1"><img src="/img/skin<%=cssid%>/x.gif" width="149" height="1"></td>
</tr>
<%rsl.movenext
wend
rsl.close
%>
</table></td>
</tr>
</table></td>
</tr>
</table>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif" class="sm_gray">
<tr>
<td height="12"></td>
</tr>
<tr>
<td><img src="img/lf_tl_best12.gif" width="180" height="40"></td>
</tr>
<tr>
<td>
</td>
</tr>
</table>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><table width="160" border="0" align="center" cellpadding="0" cellspacing="0">
<%set rss=server.createobject("adodb.recordset")
rss.open "select * from shop_his where username='"&nosql(session("username"))&"' and lx=2 order by ltime desc",conn,1,1
while not rss.eof%>
<tr>
<td height="22"> <img src="img/image002.gif" width="15" height="15">
<%if len(trim(rss("shopname")))>21 then
response.write left(trim(rss("shopname")),21)&".."
else
response.write trim(rss("shopname"))
end if%>
</td>
</tr>
<tr>
<td height="1" colspan="2" class="td_margin1"><img src="/img/skin<%=cssid%>/x.gif" width="149" height="1"></td>
</tr>
<%rss.movenext
wend
rss.close
set rss=nothing%>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
<%end if%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -