📄 shop_info.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>欢迎光临《<%=Conn.ExeCute("select shop_name from user_info where user_id="&Request("user_id")&"")(0)%>》</title>
<LINK href="style.css" type=text/css rel=stylesheet>
</head>
<body>
<TABLE width="760" class=page border=0 align="center" cellPadding=0 cellSpacing=0>
<TBODY>
<TR>
<TD>
<!--#include file="top.asp"-->
<TABLE width=760 border=0 align=center cellpadding=0 cellspacing=0>
<TBODY>
<TR>
<TD align="center" vAlign=top width="176">
<%
set rs=conn.execute("select * from user_info where user_id="&request("user_id")&"")
%>
<table cellspacing=0 cellpadding=0 width="100%" border=0>
<tbody>
<tr>
<td>
<img border="0" src="images/menu6.gif" width="176" height="33"></td>
</tr>
</tbody>
</table>
<table width="95%" border=0 cellpadding=0 cellspacing=0>
<tbody>
<tr>
<td valign=top align=middle>
<table width="96%" border="0" cellpadding=0 cellspacing=0>
<tr>
<td align="center">
<img src="<%=rs("shop_img")%>" width="100" height="100"
border=1></td>
</tr>
<tr>
<td><font color="#009933">店铺名称：</font><%=rs("shop_name")%></td>
</tr>
<tr>
<td><font color="#009933">店铺掌柜：</font><%=rs("user_realname")%></td>
</tr>
<tr>
<td><font color="#009933">店铺地址：</font><%=rs("shop_address")%></td>
</tr>
<tr>
<td><font color="#009933">联系电话：</font><%=rs("shop_phone")%></td>
</tr>
<tr>
<td><font color="#009933">店铺简介：</font><%=rs("shop_content")%></td>
</tr>
</table></td>
</tr>
</tbody>
</table>
</TD><td bgcolor="#59be48" width="1"></td>
<TD align="center" vAlign=top>
<%
set rs=server.createobject("adodb.recordset")
sql="select * from goods_info where user_id="&request("user_id")&""
rs.open sql,conn,1,3
conn.execute("update user_info set shop_hits=shop_hits+1 where user_id="&request("user_id")&"")
if rs.eof or rs.bof then
%>
<TABLE cellSpacing=1 cellPadding=0 width="550" border=0 bgcolor="#59BE48">
<TBODY>
<TR>
<TD bgColor=#DFF1DC height=21>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD align=middle width=25>
<img border="0" src="images/news.gif" width="15" height="15"></TD>
<TD><%=Conn.ExeCute("select shop_name from user_info where user_id="&Request("user_id")&"")(0)%></TD>
<TD align="right">该店铺已被访问 <font color="#FF0000"><%=Conn.Execute("SELECT shop_hits from user_info where user_id="&request("user_id")&"")(0)%></font> 次</TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD align="center" bgcolor="#FFFFFF">还没有任何商品！ </TD>
</TR>
</TBODY>
</TABLE>
<%else%>
<TABLE cellSpacing=1 cellPadding=0 width="550" border=0 bgcolor="#59BE48">
<TBODY>
<TR>
<TD bgColor=#DFF1DC height=21>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD align=middle width=25>
<img border="0" src="images/news.gif" width="15" height="15"></TD>
<TD><%=Conn.ExeCute("select shop_name from user_info where user_id="&Request("user_id")&"")(0)%></TD>
<TD align="right">该店铺已被访问 <font color="#FF0000"><%=Conn.Execute("SELECT shop_hits from user_info where user_id="&request("user_id")&"")(0)%></font> 次</TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD align="center" bgcolor="#FFFFFF">
<table cellSpacing=1 cellPadding=0 width="100%" border=0>
<tr align="center">
<td width="20%"><font color="#008000">商品名称</font></td>
<td><font color="#008000">商品描述</font></td>
<td width="12%"><font color="#008000">商品价格</font></td>
<td width="12%"><font color="#008000">商品数量</font></td>
<td width="12%"><font color="#008000">有效期</font></td>
<td width="22%"><font color="#008000">上架时间</font></td>
</tr>
<%do while not rs.eof %>
<tr align="center">
<td><a href="goods_info.asp?goods_id=<%=rs("goods_id")%>" target="_blank"><%=rs("goods_name")%></a></td>
<td><%=left(rs("goods_content"),30)%></td>
<td><%=rs("goods_price")%>元</td>
<td><%=rs("goods_amount")%>个</td>
<td><%=rs("goods_long")%>天</td>
<td><%=rs("goods_date")%></td>
<%
rs.MoveNext
Loop
rs.close
set rs=nothing
%>
</tr>
</table>
</TD>
</TR>
</TBODY>
</TABLE>
<%end if%>
</TD>
<TD align="center" vAlign=top>
</TD>
</TR>
</TBODY>
</TABLE>
<!--#include file="bottom.asp"-->
</TD>
</TR>
</TBODY>
</TABLE>
</body>
</html>
<%
conn.close
set conn=nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -