📄 zhk.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%>--折扣专区</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"><body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="940" align="center" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="6" colspan="3"></td>
</tr>
<tr>
<td width="16"><img src="/img/index_1.gif" width="15" height="16"></td>
<td valign="bottom">您现在的位置是：<a href="<%=weburl%>"><%=webname%></a> -> 折扣专区 -> <%action=trim(request("action"))
select case action
case "1"
response.write "一至二折区"
case "2"
response.write "二至三折区"
case "3"
response.write "三至四折区"
case "4"
response.write "四至五折区"
case else
response.write "折扣专区"
end select
%></td>
<td width="434" valign="bottom"></td>
</tr>
<tr>
<td height="6" colspan="3"></td>
</tr>
</table>
<!-- onMouseOver="window.status='【<%=webname%>】<%=weburl%> 如果您喜欢本站,别忘了把本站介绍给您的好友哦！：）';return true">-->
<table width="945" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="200" valign="top"><table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif">
<tr>
<td><img src="/img/lf_img_top.gif" width="180" height="9"></td>
</tr>
<tr>
<td><img src="/img/lf_tl_car.gif" width="180" height="40" border="0" usemap="#derectgo"></td>
</tr>
<tr>
<td><img src="/img/lf_directgo_boxtop.gif" width="180" height="8"></td>
</tr>
<tr>
<td background="/img/lf_directgo_boxbg.gif" width="180" height="23">
<table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><font color="#FF0000">亲爱的
<%if session("username")="" then%>
游客
<%else%>
<%=session("username")%>
<%end if%>
，欢迎您 </font>
<%
if session("username")<>"" then
set rs=server.CreateObject("adodb.recordset")
rs.open "select count(*) as rec_count from shop_action where username='"&nosql(session("username"))&"' and zhuangtai=7",conn,1,1
rec_count=rs("rec_count")
rs.close
rs.open "select sum(zonger) as zongji from shop_action where username='"&nosql(session("username"))&"' and zhuangtai=7",conn,1,1
else
set rs=server.CreateObject("adodb.recordset")
rs.open "select count(*) as rec_count from shop_action where username='"&nosql(session("tmp_usersessionid"))&"' and zhuangtai=7",conn,1,1
rec_count=rs("rec_count")
rs.close
rs.open "select sum(zonger) as zongji from shop_action where username='"&nosql(session("tmp_usersessionid"))&"' and zhuangtai=7",conn,1,1
end if
%>
</td>
</tr>
<tr>
<td>您的购物车有：<%=rec_count%>种商品</td>
</tr>
<tr>
<td> 总计价格：￥<%=rs("zongji")%>元 </td>
</tr>
<tr>
<td> <a href="gouwu.asp?action=show&lx=1">查看购物车</a> - <a href="user.asp?action=dindan">查询订单</a></td>
</tr>
</table></td>
</tr>
<tr>
<td><img src="/img/lf_directgo_boxbottom.gif" width="180" height="6"></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_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>
<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_best13.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">
<tr>
<td><%
if request("anid")<>"" then
set rs4=conn.execute("SELECT * From shop_toupiao where classid='" & nosql(request("anid")) & "' and IsChecked=1 ")
else
set rs4=conn.execute("SELECT * From shop_toupiao where classid=0 and IsChecked=1 ")
end if
if rs4.eof then
%>
暂无投票
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -