📄 101.asp
字号:
<%
sb=request("sb")
set rs=server.createobject("adodb.recordset")
sql="select * from shop where shop_name1='" &shop_name& "'"
rs.open sql,conn,3,3
if rs("LastTime")<now() then
response.write"<script>alert('该网站已过期！假如你是管理员，请与商城联系！');window.location.href='../default.asp'</script>"
response.end()
end if
if rs("logo_type")="tp1" then
logo=rs("logo_name")
else
logo="<img src="&rs("logo_pic")&">"
end if
banner="<img src="&rs("banner")&">"
center_pic="<img src="&rs("center_pic")&">"
shop_name2=rs("shop_name2")
Email=rs("Email")
Phone=rs("Phone")
look_count=rs("look_count")
count_type=rs("count_type")
rs("look_count")=look_count+1
rs.update
rs.close
%>
<html>
<head>
<title><%=shop_name2%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
BODY { FONT-SIZE: 9pt }
a:link { color: #000000; text-decoration: none}
a:visited { color:#000000; text-decoration: none}
a:hover { color: #CC0000; text-decoration: underline}
td {font-size:9pt;line-height:12pt;}
#hint {
BORDER-RIGHT: green 1px solid; PADDING-RIGHT: 4px; BORDER-TOP: green 1px solid; PADDING-LEFT: 4px; Z-INDEX: 9; BACKGROUND: #d1f9a2; FILTER: Alpha(Opacity=90, FinishOpacity=50, Style=0); PADDING-BOTTOM: 4px; BORDER-LEFT: green 1px solid; WIDTH: 200px; LINE-HEIGHT: 17px; PADDING-TOP: 4px; BORDER-BOTTOM: green 1px solid; POSITION: absolute
}
-->
</style>
<SCRIPT language=JavaScript>
<!--
function openbag(url,name){
window.open(url,name,"height=200,width=600,left=190,top=0,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no")}
-->
</SCRIPT>
<SCRIPT language=javascript>
<!--
function isok(theform)
{
if (theform.uid.value=="")
{
alert("会员帐号不能为空！");
theform.uid.focus();
return (false);
}
if (theform.pwd.value=="")
{
alert("对不起!密码不能为空！");
theform.pwd.focus();
return (false);
}
return (true);
}
-->
</SCRIPT>
</head>
<div id=hint style="display:none"> </div>
<body background="../images/bg1.gif" leftmargin="0" topmargin="0">
<table width="778" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#3366cc">
<tr>
<td width="1009" valign="top" bgcolor="#ffffff"> <table width="778" border="0" cellspacing="0" cellpadding="0">
<tr align="center">
<td width="210" height="100" style="line-height: 600%"><%=logo%></td>
<td width="568"><%=banner%></td>
</tr>
<tr bgcolor="0096e1">
<td height="5" colspan="2"> </td>
</tr>
<tr bgcolor="#000000">
<td height="1" colspan="2"> </td>
</tr>
<tr valign="top">
<td colspan="2"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="27" background="../images/top_bg.jpg"><div align="right"><a href="default.asp">首页</a>
<a href="default.asp?sb=lnc">公司简介</a> <a href="default.asp?sb=newsp">最新商品</a> <a href="default.asp?sb=bill">商品清单</a>
<a href="javascript:openbag('../check.asp?shopname=<%=session("shop")%>')">购物车</a>
<a href="default.asp?sb=news">新闻公告</a> <a href="default.asp?sb=send">配送信息</a> <a href="default.asp?sb=pay">支付方式</a>
<a href="default.asp?sb=help">购物帮助</a> <a href="default.asp?sb=word">客户留言</a></div></td>
<td width="10" background="../images/top_bg.jpg"> </td>
</tr>
</table> </td>
</tr>
<tr valign="top">
<td colspan="2"> <table width="778" height="556" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="174" height="556" valign="top" bgcolor="0096e1">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td colspan="2" valign="top">
<!--会员登录入口=============================================================== -->
<%If Session("LoginSuccess")="" Then%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td colspan="2"><img src="../images/left_01.gif" width="174" height="51"></td>
</tr>
<tr>
<td width="8"><img src="../images/left_02.gif" width="8" height="97"></td>
<td width="166" valign="top"> <table width="100%" height="92" border="0" cellpadding="0" cellspacing="2">
<form action=../user/ReLoginCheck.asp?refe=<%=shop_name%> method=post onSubmit="return isok(this)">
<tr>
<td width="29%" height="28" align="center" bgcolor="#CCFFFF">用户：</td>
<td width="71%" align="center" bgcolor="#CCFFFF">
<input name="uid" type="text" size="14" style="BACKGROUND-COLOR: #ffffff; BORDER-BOTTOM: #666666 1px solid; BORDER-LEFT: #666666 1px solid; BORDER-RIGHT: #666666 1px solid; BORDER-TOP: #666666 1px solid; FONT-SIZE: 9pt"></td>
</tr>
<tr>
<td height="31" align="center" bgcolor="#ccFFFF">密码：</td>
<td align="center" bgcolor="#ccFFFF"> <font color="#CCFFFF">
<input name="pwd" type="password" size="14" style="BACKGROUND-COLOR: #ffffff; BORDER-BOTTOM: #666666 1px solid; BORDER-LEFT: #666666 1px solid; BORDER-RIGHT: #666666 1px solid; BORDER-TOP: #666666 1px solid; FONT-SIZE: 9pt">
</font></td>
</tr>
<tr bgcolor="#ccFFFF">
<td height="25" colspan="2"> <div align="center">
<input name="Submit1" src style="BACKGROUND-COLOR: #cccccc; BORDER-BOTTOM: #000875 1px solid; BORDER-LEFT: #9aa3ff 1px solid; BORDER-RIGHT: #000875 1px solid; BORDER-TOP: #9aa3ff 1px solid; COLOR: #000000; HEIGHT: 20px" type="submit" value="登 录">
<input name="Submit12" onClick="window.open('../newuser.asp')" src style="BACKGROUND-COLOR: #cccccc; BORDER-BOTTOM: #000875 1px solid; BORDER-LEFT: #9aa3ff 1px solid; BORDER-RIGHT: #000875 1px solid; BORDER-TOP: #9aa3ff 1px solid; COLOR: #000000; HEIGHT: 20px" type="button" value="注 册">
</div></td>
</tr>
</form>
</table></td>
</tr>
<tr bgcolor="#666666">
<td height="1" colspan="2"> </td>
</tr>
</table>
<% else%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="../images/left_03.gif" width="174" height="33"></td>
</tr>
<tr>
<td><div align="center">
<table width="100%" border="0" cellpadding="4" cellspacing="4" bgcolor="0096e1">
<tr bgcolor="#A4E1FF">
<td> <div align="center"><a href="#" onclick="window.open('../user/odrsrchset.asp','','height=400,width=610,scrollbars=yes,resizable=1,top=10, left=15');">我的订单</a></div></td>
<td bgcolor="#A4E1FF"> <div align="center"><a href="#" onclick="window.open('../user/myinfo.asp','','height=280,width=582,scrollbars=yes,resizable=1,top=10, left=15');">统计信息</a></div></td>
</tr>
<tr bgcolor="#A4E1FF">
<td> <div align="center"><a href="#" onclick="window.open('../user/Favorites.asp','','height=280,width=600,scrollbars=yes,resizable=1,top=10, left=15');">我的收藏</a></div></td>
<td bgcolor="#A4E1FF"> <div align="center"><a href="#" onClick="window.open('../user/reg.asp','','height=400,width=582,scrollbars=yes,resizable=1,top=10, left=15');">资料修改</a></div></td>
</tr>
<tr bgcolor="#A4E1FF">
<td> <div align="center"><a href="javascript:openbag('../check.asp?shopname=<%=session("shop")%>')">购物车</a></div></td>
<td> <div align="center"><a href="../user/loginout.asp?refe=<%=shop_name%>">退出登录</a></div></td>
</tr>
</table>
</div></td>
</tr>
<tr bgcolor="#666666">
<td height="1" colspan="2"> </td>
</tr>
</table>
<%End If%>
<!--会员登录入口=============================================================== -->
</td>
</tr>
<tr>
<td colspan="2" align="center" valign="top"> </td>
</tr>
<tr>
<td width="7" valign="top"> </td>
<td width="167" valign="top">
<!--分类///////////////////////////////////////////////////////////////////////////// -->
<table width="100%" cellspacing="1" cellpadding="2" align=center>
<tr class="tdbg1">
<td width="35%"><div align="center"><strong>[ 商 品
分 类 </strong>]</div></td>
</tr>
<%
sql="select * from SoftDown_Catalog where sp_name='"&shop_name&"' order by rootid,orders"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
do while not rs.eof
%>
<tr>
<td width=35% >
<%
if rs("depth") =1 then Response.Write " "
if rs("depth") >1 then
for i=2 to rs("depth")
Response.Write " "
next
Response.Write " "
end if
if rs("parentid")=0 then Response.Write("<b>")
Response.Write "<a href=default.asp?sb=P_class&CatalogID="&rs("CatalogID")&"&CatalogName="&rs("CatalogName")&">"&rs("CatalogName")&"</a>"
%>
</td>
</tr>
<%
rs.movenext
loop
rs.close:set rs=nothing
%>
</table>
<!--分类-------- -->
<br></td>
</tr>
<tr>
<td colspan="2" align="center" valign="top"> <table width="100%" border="0" cellspacing="5" cellpadding="0">
<tr>
<td><div align="center"><strong>[ 友 情 连 接 </strong>]</div></td>
</tr>
<%
set link_rs=server.createobject("adodb.recordset")
sqltext="select * from link where shop_name='"&shop_name&"'"
link_rs.open sqltext,conn,1,1
do while not (link_rs.eof or link_rs.bof)
%>
<tr>
<td><div align="center"><a href="<%=link_rs("l_url")%>" target="_blank"><img src="<%=link_rs("l_pic")%>" border="0"></a></div></td>
</tr>
<%
link_rs.movenext
loop
link_rs.close : set link_rs=nothing
%>
</table></td>
</tr>
<tr>
<td colspan="2" align="center" valign="top"> </td>
</tr>
<tr>
<td colspan="2" align="center" valign="top">
<%
L=Len(look_count)
i = 1
For i = i to L
num = Mid(look_count,i,1)
Display = Display & "<img src=../count/" &count_type&"/"& num & ".gif>"
Next
response.Write(Display)
%>
</td>
</tr>
<tr>
<td colspan="2" align="center" valign="top"> </td>
</tr>
</table> </td>
<td width="10" background="../images/yy.gif"> </td>
<td width="594" align="center" valign="top">
<%
select case sb
case "lnc"
call lnc
case "newsp"
call newsp
case "bill"
call bill
case "news"
call news
case "mode"
call mode
case "help"
call help
case "news_show"
call news_show
case "product"
call product
case "P_class"
call P_class
case "search"
call search
case "word"
call word
case "word_save"
call word_save
case "book"
call book
case "send"
call send
case "pay"
call pay
case else
call indx
end select
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -