📄 show.asp
字号:
<%@ LANGUAGE = VBScript%>
<!--#include file="conn.asp"-->
<!--#include file="newsConvert.asp"-->
<%'www.yd631.com
'QQ:121591448
'欢迎与我交流%>
<html>
<head>
<title>YD631_put1.0产品发布系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="images/css.css" type="text/css">
</head>
<body bgcolor="#eeeeee" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<center>
<table width="770" border="0" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC" >
<tr valign="top">
<td bgcolor="#EEEEEE"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="30" bgcolor="#E1EBDE">
<table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="49%"><form action="products.asp" method=post name="myform">
<font color="#000000"><b><font color="#666666">产品搜索</font>
<input name=keyword type=text id="keyword" size=12 maxlength=50>
<input name=login type=image src="images/search.gif"
width="60" height="22" align="absmiddle">
</form></td>
<td width="51%">
<div align="right"><font color="#666666" face="Arial, Helvetica, sans-serif">网站首页 </font><font color="#666666">></font> <font face="Arial, Helvetica, sans-serif" color="#666666">产品展示</font></div> </td>
</tr>
</table>
</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="40" bgcolor="#EEEEEE">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="5"><img src="main/dot.gif" width="1" height="1"></td>
</tr>
</table>
<table width="98%" border="0" cellspacing="1" cellpadding="8" bgcolor="#CCCCCC" align="center">
<tr>
<td align="center" bgcolor="#eeeeee">
<% set rs1=server.CreateObject("adodb.recordset")
sql1="select * from class "
rs1.open sql1,con,1,1
if not rs1.bof and rs1.eof then
else
do until rs1.eof
%><a href="products.asp?Sort_ID=<%=rs1("Sort_ID")%>"><b><%=rs1("sort")%></b></a>|<%rs1.movenext
loop
end if
rs1.close
set rs1=nothing%> </td>
</tr>
</table>
<table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="40">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="#EEEEEE">
<%
id=cint(request.QueryString("shop_id"))
if id<>"" then
Set res=Server.CreateObject("ADODB.RecordSet")
sql="select * from product where shop_id="&id
res.open sql,con,3,3
res("click")=res("click")+1
res.update
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="15"><img src="images/dot.gif" width="1" height="1"></td>
</tr>
</table>
<table width="90%" border=0 cellpadding=5 cellspacing=1 align="center" bgcolor="#CCCCCC">
<tbody>
<%if res("pic")<>"" or res("pic2")<>"" then%>
<tr>
<td colspan="2" bgcolor="#FFFFFF">
<div align="center">
<%if res("pic2")<>"" then%>
<img border=0 src="pic/<%=res("pic2")%>" >
<%else%>
<img border=0 src="pic/<%=res("pic")%>">
<%end if
else%>
<img border=0 src="pic/no.jpg"> </div> </td>
</tr>
<%end if%>
<tr>
<td width="76%" bgcolor="#FFFFFF">产品名称：<%=res("shop_name")%> </td>
<td width="24%" bgcolor="#FFFFFF">查看：<%=res("click")%>次</td>
</tr>
<tr>
<td colspan="2" bgcolor="#FFFFFF">产品说明：</td>
</tr>
<tr>
<td colspan="2" bgcolor="#FFFFFF">
<table align=center border=0 cellpadding=0 cellspacing=5
width="99%">
<tbody>
<tr>
<td align=left valign=top class="unnamed1">
<%if res("introduce")<>"" then
response.write newsConvert(res("introduce"))
end if%> </td>
</tr>
</tbody>
</table> </td>
</tr>
</tbody>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="15"><img src="images/dot.gif" width="1" height="1"></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<table width="590" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="30" bgcolor="#EEEEEE"> </td>
</tr>
</table>
</td>
</tr>
</table>
<%res.close
set res=nothing
con.close
set con=nothing
end if
'www.yd631.com
'QQ:121591448
'欢迎与我交流%>
<p>技术支持：<a href="http://www.yd631.com">www.yd631.com </a>‖QQ:121591448‖作者：D.JOY</p>
</center>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -