www.gusucode.com > 爱美尔女性商城源码 1.0源码程序 > wen/cp.asp
<!--#include file="Inc/conn.asp"-->
<!--#include file="Inc.asp"-->
<%
Dim ID,page
ID=LaoYRequest(request("id"))
page=LaoYRequest(Request("Page"))
set rs=server.createobject("adodb.recordset")
sql="select * from "&tbname&"_shop where id="&id
rs.open sql,conn,1,1
if rs.eof and rs.bof then
Call Alert("不正确的ID!",SitePath)
else
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta name="keywords" content="<%=Sitekeywords%>" />
<meta name="description" content="<%=left(LoseHtml(rs("Content")),120)%>" />
<link href="<%=SitePath%>images/8586<%=Css%>.css" ID="skin" type=text/css rel=stylesheet>
<link rel="shortcut icon" href="<%=SitePath%>images/myfav.ico" type="image/x-icon" />
<script type="text/javascript" src="<%=SitePath%>inc/main.asp"></script>
<title><%=rs("Title")%>-Powered by www.8586.com.cn</title>
</head>
<body>
<div class="mwall">
<%=Head%>
<%=Menu%><div class="mw">
<div class="dh">
您现在的位置：<a href="<%=SitePath%>">首页</a> >> 商品信息浏览
</div>
<div id="nw_left">
<div id="web2l">
<h1><%=rs("Title")%></h1>
<p align="center" style="line-height:30px; font-size:14px; color:#FF0000;"><del>市场价格：<%=rs("price")%>元</del> 商城价格：<%=rs("sprice")%>元</p>
<p align="center" style="line-height:30px; font-size:12px; color:#666666;">时间：<%=rs("DateAndTime")%><%If IsHits=1 then%> 被浏览：<script type="text/javascript" src="/Hits2.asp?id=<%=request("id")%>"></script>次<%End if%>
</p>
<p align="center" style="margin-top:5px; margin-bottom:5px;">
<%if Instr(rs("Images"),"http://")<=0 then%>
<img src="<%=SitePath%><%=SiteUp%>/<%if IsAspJpeg=1 then Response.Write("s250/") End if%><%=rs("Images")%>" border="0" />
<%else%>
<img src="<%=rs("Images")%>" border="0" />
<%end if%>
</p>
<h3></h3>
<table cellpadding="0" cellspacing="0" width="100%"><tr><td>
<div id="content">
<%=rs("Content")%>
</div>
</td></tr></table>
</div>
</div>
<div id="nw_right">
<div id="web2r">
<h5>商品分类</h5>
<ul id="list10" style="line-height:25px; text-align:left;">
<%
set rs1=server.createobject("ADODB.Recordset")
sql1="select * from "&tbname&"_leixing order by ID desc"
rs1.open sql1,conn,1,3
If Not rs1.Eof Then
do while not (rs1.eof or err)
%>
<a href="<%=SitePath%><%If html=3 then Response.Write("product/Product_"&rs1("ID")&"_1.html") else Response.Write("Product.asp?ID="&rs1("ID")&"") End if%>"><%=rs1("Title")%></a>
<%
rs1.movenext
loop
end if
rs1.close
set rs1=nothing
%>
</ul>
</div>
</div>
</div>
<%End if%>
<%
rs.close
set rs=nothing
%>
<%=Copy%>
</div>
</body>
</html>