?? class.asp
字號:
<!--
┌─9911.com.cn────────────┐
│ 動感購物 WWW.9911.com.cn 版權所有 │
│ 動感購物2005Vb 聯系：web@snsn.net │
└───────────9911.com.cn──┘
-->
<!--#include file="conn.asp"-->
<!--#include file="webconfig.asp"-->
<!--#include file="fuction.asp"-->
<!--#include file="webtop.asp"-->
<html>
<head>
<title><%=webname%>--<%leixing=lcase(trim(request("lx")))
select case leixing
case "big"
response.write "大類商品"
case "small"
response.write "小類商品"
case "snsn"
response.write "子類商品"
case "tejia"
response.write "特價商品"
case "news"
response.write "新品上架"
case "tj"
response.write "推薦商品"
case "cx"
response.write "促銷商品"
case else
response.write "新品上架"
end select
anclassid=request("anid")%></title>
<link rel="SHORTCUT ICON" href="/shortcut.ico">
<meta name="generator" content="snsn-shop">
<meta name=keywords content="<%=webgjz%>">
<meta name="description" content="<%=webmx%>">
<meta name="MSSmartTagsPreventParsing" content="TRUE">
<meta http-equiv="MSThemeCompatible" content="Yes">
<link href="/css.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body leftmargin=0 topmargin=0 marginwidth="0" marginheight="0">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}
function MM_showHideLayers() { //v6.0
var i,p,v,obj,args=MM_showHideLayers.arguments;
for (i=0; i<(args.length-2); i+=1) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v=='hide')?'hidden':v; }
obj.visibility=v; }
}
//-->
var link_1=new Array(); //第一個連接列表
link_1[0]="<a href=class.asp?px=0 >按推薦商品方式查看</a>";
link_1[1]="<a href=class.asp?px=1 >按上架時間從早到晚</a>";
link_1[2]="<a href=class.asp?px=2 >按上架時間從晚到早</a>";
link_1[3]="<a href=class.asp?px=3 >按商品價格從高到低</a>";
link_1[4]="<a href=class.asp?px=4 >按商品價格從低到高</a>";
link_1[5]="<a href=class.asp?px=5 >按商品排序從高到低</a>";
link_1[6]="<a href=class.asp?px=6 >按商品排序從低到高</a>";
var nStep = 10;
//動態效果速度
var nDelay = 20;
//動態效果延遲時間
var nChunk=25;
nChunk = nStep;
function gg() {
document.all.aa.style.clip= "rect(0 "+ nChunk + "% " + nChunk + "% 0)";
nChunk += nStep;
//alert(nChunk);
nChunk<=200?setTimeout("gg()",nDelay):null
}
function aa() {
MM_showHideLayers('aa','','show');
return gg();
}
function bb() {
MM_showHideLayers('aa','','hide');
nChunk = 25;
}
</script>
<!-- onMouseOver="window.status='【<%=webname%>】<%=weburl%> 如果您喜歡本站,別忘了把本站介紹給您的好友哦！：）';return true">-->
<table width="940" align="center" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="6" colspan="3"></td>
</tr>
<tr>
<td width="17"><img src="/img/index_1.gif" width="15" height="16"></td>
<td valign="bottom">您現在的位置是：<a href="<%=weburl%>"><%=webname%></a> ->
<%
set rs=server.createobject("adodb.recordset")
if leixing="big" then
anclassid=nosql(request("anid"))
if Not isChkInteger(anclassid) then
%>
<script language=javascript>alert("參數錯誤！");window.close();</script>
<%
response.end
end if
set rs=server.createobject("adodb.recordset")
rs.open "select * from shop_anclass where xs=2 and anclassid="&anclassid,conn,1,1
if rs.recordcount=0 then
%>
<script language='javascript'>alert('分類調用錯誤，請返回！');window.location.href='index.asp';</script>
<%end if
anclassname=rs("anclass")
pic=trim(rs("pic"))
links=trim(rs("links"))
sztys=trim(rs("sztys"))
flsl=trim(rs("spdlh"))
fll=trim(rs("spdll"))
rs.close
xml="<a href=rss_class.asp?lx=big&a="&anclassid&"><img src=img/xml.gif border=0 alt=""RSS2.0支持""></a>"
response.write anclassname
set rs_class=server.createobject("adodb.recordset")
rs_class.open "select count(*) from shop_snsn where anclassid="&anclassid,conn,1,1
response.write "(本類共有<font color=#FF0000>"&rs_class(0)&"</font>種)"
rs.open "select * from shop_snsn where anclassid="&anclassid&" order by adddate desc",conn,1,1
elseif leixing="small" then
anclassid=nosql(request("anid"))
nclassid=nosql(request("nid"))
if Not isChkInteger(anclassid) then
%>
<script language=javascript>alert("參數錯誤！");window.close();</script>
<%
response.end
end if
set rs=server.createobject("adodb.recordset")
rs.open "select * from shop_anclass where anclassid="&anclassid,conn,1,1
anclassname=rs("anclass")
sztys=trim(rs("sztys"))
rs.close
if Not isChkInteger(nclassid) then%>
<script language=javascript>alert("參數錯誤！");window.close();</script>
<%response.end
end if
rs.open "select * from shop_nclass where nclassid="&nclassid,conn,1,1
if rs.recordcount=0 then%>
<script language='javascript'>alert('分類調用錯誤，請返回！');window.location.href='index.asp';</script>
<%end if
nclassname=rs("nclass")
piccc=trim(rs("piccc"))
links=trim(rs("links"))
xsztys=trim(rs("xsztys"))
flsl=trim(rs("spxlh"))
fll=trim(rs("spxll"))
rs.close
xml= "<a href=rss_class.asp?lx=big&a="&anclassid&"&n="&nclassid&"><img src=img/xml.gif border=0 alt=""RSS2.0支持""></a>"
response.write "<a href=class.asp?lx=big&anid="&anclassid&">"&anclassname&"</a> -> "&nclassname&""
set rs_nclass=server.createobject("adodb.recordset")
rs_nclass.open "select count(*) from shop_snsn where nclassid="&nclassid,conn,1,1
response.write "(本類共有<font color=#FF0000>"&rs_nclass(0)&"</font>種)"
rs.open "select * from shop_snsn where anclassid="&anclassid&" and nclassid="&nclassid&" order by adddate desc",conn,1,1
elseif leixing="snsn" then
anclassid=nosql(request("anid"))
nclassid=nosql(request("nid"))
xclassid=nosql(request("xid"))
if Not isChkInteger(anclassid) then
%>
<script language=javascript>alert("參數錯誤！");window.close();</script>
<%
response.end
end if
set rs=server.createobject("adodb.recordset")
rs.open "select * from shop_anclass where anclassid="&anclassid,conn,1,1
anclassname=rs("anclass")
sztys=trim(rs("sztys"))
rs.close
if Not isChkInteger(nclassid) then%>
<script language=javascript>alert("參數錯誤！");window.close();</script>
<%response.end
end if
rs.open "select * from shop_nclass where nclassid="&nclassid,conn,1,1
if rs.recordcount=0 then%>
<script language='javascript'>alert('分類調用錯誤，請返回！');window.location.href='index.asp';</script>
<%end if
nclassname=rs("nclass")
rs.close
if Not isChkInteger(xclassid) then%>
<script language=javascript>alert("參數錯誤！");window.close();</script>
<%response.end
end if
rs.open "select * from shop_xclass where id="&xclassid,conn,1,1
if rs.recordcount=0 then%>
<script language='javascript'>alert('分類調用錯誤，請返回！');window.location.href='index.asp';</script>
<%end if
xclassname=rs("xclass")
xpic=trim(rs("xpic"))
xurl=trim(rs("xurl"))
xxs=trim(rs("xxs"))
flsl=trim(rs("xh"))
fll=trim(rs("xl"))
rs.close
xml= "<a href=rss_class.asp?lx=big&a="&anclassid&"&n="&nclassid&"><img src=img/xml.gif border=0 alt=""RSS2.0支持""></a>"
response.write "<a href=class.asp?lx=big&anid="&anclassid&">"&anclassname&"</a> -> <a href=class.asp?lx=small&anid="&anclassid&"&nid="&nclassid&">"&nclassname&"</a> -> "&xclassname&""
set rs_nclass=server.createobject("adodb.recordset")
rs_nclass.open "select count(*) from shop_snsn where nclassid="&nclassid&" and xclassid="&xclassid,conn,1,1
response.write "(本類共有<font color=#FF0000>"&rs_nclass(0)&"</font>種)"
rs.open "select * from shop_snsn where anclassid="&anclassid&" and nclassid="&nclassid&" and xclassid="&xclassid&" order by adddate desc",conn,1,1
elseif leixing="tejia" then
response.write "特價商品"
xml= "<a href=rss_class.asp?lx=tejia><img src=img/xml.gif border=0 alt=""RSS2.0支持""></a>"
set rs_nclass=server.createobject("adodb.recordset")
rs_nclass.open "select count(*) from shop_snsn where tejiashop=1",conn,1,1
response.write "(本類共有<font color=#FF0000>"&rs_nclass(0)&"</font>種)"
rs.open "select * from shop_snsn where tejiashop=1 order by adddate desc",conn,1,1
elseif leixing="cx" then
response.write "促銷商品"
xml= "<a href=rss_class.asp?lx=cx><img src=img/xml.gif border=0 alt=""RSS2.0支持""></a>"
set rs_nclass=server.createobject("adodb.recordset")
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
elseif leixing="news" then
response.write "新品上架"
xml= "<a href=rss_class.asp?lx=news><img src=img/xml.gif border=0 alt=""RSS2.0支持""></a>"
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
elseif leixing="tj" then
response.write "推薦商品"
xml= "<a href=rss_class.asp?lx=tj><img src=img/xml.gif border=0 alt=""RSS2.0支持""></a>"
set rs_nclass=server.createobject("adodb.recordset")
rs_nclass.open "select count(*) from shop_snsn where bestshop=1",conn,1,1
response.write "(本類共有<font color=#FF0000>"&rs_nclass(0)&"</font>種)"
rs.open "select * from shop_snsn where bestshop=1 order by adddate desc",conn,1,1
elseif leixing="cx" then
response.write "促銷商品"
xml= "<a href=rss_class.asp?lx=cx><img src=img/xml.gif border=0 alt=""RSS2.0支持""></a>"
set rs_nclass=server.createobject("adodb.recordset")
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -