📄 list.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" -->
<%
id=nosql(request("id"))
if Not isChkInteger(request("id")) then
%>
<script language=javascript>
alert("参数错误！");
window.close();
</script>
<%
response.end
end if
set rs=server.createobject("adodb.recordset")
if Request.querystring("action")="next" then
rs.open "select top 1 * from shop_snsn where shopid < "&nosql(request("id"))&" order by shopid desc",conn,1,3
elseif Request.querystring("action")="Previous" then
rs.open "select top 1 * from shop_snsn where shopid > "&nosql(request("id"))&" order by shopid asc",conn,1,3
else
rs.open "select * from shop_snsn where shopid = "&nosql(request("id")),conn,1,3
end if
if rs.EOF or rs.bof then
response.write"<SCRIPT language=JavaScript>alert('对不起，已经到顶了！');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.end
end if
sftc=rs("sftc")
url=rs("lj")
if rs("lj")<>"www" then
Response.Redirect url
response.end
end if
p1=trim(rs("p1"))
p2=trim(rs("p2"))
p3=trim(rs("p3"))
p4=trim(rs("p4"))
dq_2=rs("dq")
dq_2=split(dq_2,",")
dq1=dq_2(0)
dq2=dq_2(1)
dq3=dq_2(2)
dq4=dq_2(3)
psdq_2=rs("psdq")
psdq_2=split(psdq_2,",")
psdq1=psdq_2(0)
psdq2=psdq_2(1)
psdq3=psdq_2(2)
psdq4=psdq_2(3)
shopname=rs("shopname")
zhuang=rs("zhuang")
shoppic=rs("shoppic")
shichangjia=rs("shichangjia")
huiyuanjia=rs("huiyuanjia")
pifajia=rs("pifajia")
vipjia=rs("vipjia")
mch=rs("mch")
kucun=rs("kucun")
isbn1=rs("isbn1")
isbn=rs("isbn")
jj=rs("jj")
shopchuban=rs("shopchuban")
cj=rs("cj")
cjname=rs("cjname")
gj=rs("gj")
gjz=rs("gjz")
pingjizong=rs("pingjizong")
pingji=rs("pingji")
ps=rs("ps")
yeshu=rs("yeshu")
x1=rs("x1")
x2=rs("x2")
x3=rs("x3")
x4=rs("x4")
x5=rs("x5")
x6=rs("x6")
y1=rs("y1")
y2=rs("y2")
y3=rs("y3")
y4=rs("y4")
y5=rs("y5")
y6=rs("y6")
shopid=rs("shopid")
shopcontent=rs("shopcontent")
newsshop=rs("newsshop")
bestshop=rs("bestshop")
tejiashop=rs("tejiashop")
cxiaoshop=rs("cxiaoshop")
hot=rs("liulancount")
xiao=rs("chengjiaocount")
set rs2=server.createobject("adodb.recordset")
rs2.open "select * from shop_anclass where anclassid="&rs("anclassid"),conn,1,1
if rs2.recordcount>0 then
anclass=rs2("anclass")
anclassid=rs2("anclassid")
end if
rs2.close
set rs2=server.createobject("adodb.recordset")
rs2.open "select * from shop_nclass where nclassid="&rs("nclassid"),conn,1,1
if rs2.recordcount>0 then
nclass=rs2("nclass")
nclassid=rs2("nclassid")
end if
rs2.close
if rs("xclassid")=0 then
xclass="无子类"
xclassid=0
xhtml=xclass
else
set rs2=server.createobject("adodb.recordset")
rs2.open "select * from shop_xclass where id="&rs("xclassid"),conn,1,1
if rs2.recordcount>0 then
xclass=rs2("xclass")
xclassid=rs2("id")
end if
rs2.close
set rs2=nothing
xhtml="<a href=class.asp?lx=snsn&anid="&anclassid&"&nid="&nclassid&"&xid="&xclassid&" targer=_blank>"&xclass&"</a>"
end if
rs("liulancount")=rs("liulancount")+1
rs.update
rs.close
set rs=nothing
if zhuang="" then
zhuang=shoppic
end if
if p1="" then
p1=zhuang
end if
if p2="" then
p2=zhuang
end if
if p3="" then
p3=zhuang
end if
if p4="" then
p4=zhuang
end if
%>
<html>
<script src="/pic.js" type="text/javascript"></script>
<script LANGUAGE="javascript">
<!--
function checkspace(checkstr) {
var str = '';
for(i = 0; i < checkstr.length; i++) {
str = str + ' ';
}
return (str == checkstr);
}
function check()
{
if(checkspace(document.pinglunform.pinglunname.value)) {
document.pinglunform.pinglunname.focus();
alert("请填写您的姓名！");
return false;
}
if(checkspace(document.pinglunform.pingluntitle.value)) {
document.pinglunform.pingluntitle.focus();
alert("请填写评论标题！");
return false;
}
if(checkspace(document.pinglunform.pingluncontent.value)) {
document.pinglunform.pingluncontent.focus();
alert("请填写评论正文！");
return false;
}
}
//-->
</script>
<head>
<title><%=webname%>--<%=anclass%>--<%=nclass%>--<%=xclass%>--商品信息</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"><style type="text/css">
<!--
.style1 {color: #FF0000}
.style4 {
font-size: 18px;
font-weight: bold;
}
.style5 {color: #0000FF}
-->
</style>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<!-- onMouseOver="window.status='【<%=webname%>】<%=weburl%> 如果您喜欢本站,别忘了把本站介绍给您的好友哦！：）';return true">-->
<!--#include file="webtop.asp"-->
<table width="940" align="center" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="6" colspan="4"></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> -> <a href=class.asp?lx=big&anid=<%=anclassid%> targer=_blank><%=anclass%></a> -> <a href=class.asp?lx=small&anid=<%=anclassid%>&nid=<%=nclassid%> targer=_blank><%=nclass%></a></span></span> -> <%=xhtml%></td>
<td valign="bottom"><div align="right">注：购物数量达到<%=pifa_s%>件或金额累积到<%=pifa_e%>元可以享受更优惠价格! </div></td>
<td valign="bottom">
</td>
</tr>
<tr>
<td height="6" colspan="4"></td>
</tr>
</table>
<table width="945" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="200" valign="top"><!--#include file="cart.asp"-->
<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_best10.gif" width="180" height="40" border="0" usemap="#Map5"></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><%if session("username")="" then
set rsg=server.createobject("adodb.recordset")
rsg.open "select top 12 * from shop_usergg where lx=0 order by id desc",conn,1,1
else
set rsg=server.createobject("adodb.recordset")
rsg.open "select top 10 * from shop_usergg where lx="&nosql(session("reglx"))&" or lx=0 order by id desc",conn,1,1
end if
if rsg.recordcount=0 then
%>
<table width="160" border="0" cellspacing="0" cellpadding="5" align="center">
<tr>
<td height="26" align=center>暂无会员公告</td>
</tr>
</table>
<%else%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
</table>
<table width="160" border="0" align="center" cellpadding="0" cellspacing="0">
<%
while not rsg.eof
%>
<tr>
<td height="22"><a href="gg_list.asp?id=<%=rsg("id")%>" title=<%=year(rsg("adddate"))%>年<%=month(rsg("adddate"))%>月<%=day(rsg("adddate"))%>日发布><img src="/img/left_7.gif" width="11" height="11" border="0">
<%if len(trim(rsg("zt")))>12 then
response.write left(trim(rsg("zt")),12)&""
else
response.write trim(rsg("zt"))
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>
<%
rsg.movenext
wend
%>
</table>
<%
end if
rsg.close
set rsg=nothing
%></td>
</tr>
</table>
<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='"&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%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -