📄 productslistb.asp
字号:
<!--#include file="SiteInfo.asp"-->
<%
'☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆
'★ ★
'☆ 万博中小企业网站管理系统(NWEB) ☆
'★ ★
'☆ 版权所有 Nweb.cn ☆
'★ ★
'☆ 程序制作 万博工作室 ☆
'★ Add:四川省彭州市西大街228号/611930 ★
'☆ Tel:028-88079088 Fax:83708850 ☆
'★ E-m:duolaimi-123@163.com ★
'☆ Q Q:59309100 ☆
'★ ★
'☆ 相关网址 [产品介绍]http://www.Nweb.cn ☆
'★ [支持论坛]http://www.Nweb.cn/bbs ★
'☆ ☆
'★ 演示网址 http://www.Nweb.cn ★
'☆ ☆
'★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
%>
<%
ID=trim(request.QueryString("id"))
Str=trim(request.QueryString("Str"))
Pid=trim(request.QueryString("Pid"))
PStr=trim(request.QueryString("PStr"))
PidID=Pid&"-"&id
Locality="<a href='ProductsListA.asp?id="&Pid&"&Str="&PStr&"'>"&PStr&"</a> >> <a href='ProductsListB.asp?Pid="&Pid&"&PStr="&PStr&"&id="&id&"&Str="&Str&"'>"&Str&"</a>"
'===========================
%>
<%
SQL="select * from deeptree where parentid="&id&" order by id"
set Rs=conn.execute(SQL)
if not Rs.eof then
while not Rs.eof
ListC=ListC+"| <a href='ProductsListC.asp?PPid="&Pid&"&PPStr="&PStr&"&Pid="&id&"&PStr="&Str&"&id="&Rs("id")&"&Str="&Rs("content")&"'><font color='#003EBD'>"&Rs("content")&"</font></a> |"
Rs.movenext
wend
end if
Rs.close
set Rs=nothing
'===========================
%>
<HTML>
<HEAD>
<TITLE>首页-产品展示|<%=SiteName%></TITLE>
<META http-equiv="Content-Type" content="text/html; charset=gb2312">
<META NAME="copyright" CONTENT="Copyright 2004-2005 - NWEB.CN-STUDIO-多来米">
<META NAME="Author" CONTENT="万博网络技术工作室,www.Nweb.cn">
<META NAME="Robots" CONTENT="all">
<META NAME="Keywords" CONTENT="<%=Keywords%>">
<META NAME="Description" CONTENT="<%=Description%>">
<link href="Images/CSS.css" type=text/css rel=stylesheet>
</HEAD>
<BODY >
<!--#include file="Top.asp" -->
<table width="868" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="190" height="96" valign="top" bgcolor="#F2F2F2" ><!--#include file="LeftNav.asp" -->
<!--#include file="ProductsLeft.asp" -->
</td>
<td width="5"></td>
<td width="673" valign="top" class="Index-Center"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="180" colspan="2" bgcolor="#FFFFFF"><img src="Images/Banner_01.jpg" alt="万博中小企业网站系统" width="499" height="180"></td>
<td colspan="2" align="right" bgcolor="#FFFFFF"><img src="Images/Banner_02.jpg" alt="万博中小企业网站系统" width="171" height="180"></td>
</tr>
<tr>
<td width="93" height="5" bgcolor="#FFFFFF"></td>
<td width="408" bgcolor="#FFFFFF"></td>
<td width="42" bgcolor="#FFFFFF"></td>
<td width="130" bgcolor="#FFFFFF"></td>
</tr>
<tr>
<td height="30" align="right" bgcolor="#F2F2F2"><strong><font color="#1c529b"><img src="Images/Arrow-locality.gif" width="14" height="12" align="absmiddle"> 当前位置：</font></strong></td>
<td colspan="2" bgcolor="#F2F2F2" class="locality"><a href="index.asp">首 页</a> >> <a href="ProductsList.asp">产品展示</a> >> <a href="ProductsList.asp"></a>
<%=Locality%>
</td>
<td bgcolor="#F2F2F2"> </td>
</tr>
<tr>
<td height="5" align="center" bgcolor="#FFFFFF"></td>
<td colspan="2" align="center" bgcolor="#FFFFFF"></td>
<td align="center" bgcolor="#FFFFFF"></td>
</tr>
<tr>
<td height="20" colspan="4" align="center" bgcolor="#FFFFFF" class="locality"><%=ListC%></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0" >
<tr>
<td height="12"> </td>
<td></td>
<td></td>
</tr>
<tr>
<td width="28" height="30"> </td>
<td>
<%
SQL = "SELECT * FROM Products where LSort like '"&PidID&"%' and LPutout=true ORDER BY id DESC"
StyleCookies=Request.cookies("StyleCookies")
select case StyleCookies
case "StyleA"%>
<!--#include file="Style/StyleA.asp"-->
<% case "StyleB" %>
<!--#include file="Style/StyleB.asp"-->
<% case "StyleC" %>
<!--#include file="Style/StyleC.asp"-->
<% case else %>
<!--#include file="Style/StyleC.asp"-->
<% end select %></td>
<td width="28"></td>
</tr>
<tr>
<td height="18"> </td>
<td> </td>
<td></td>
</tr>
<tr>
<td height="30"> </td>
<td ><%
'=========产品展示样式==============
Response.Write"<table width='100%' class='Pagination' border='0' cellspacing='0' cellpadding='1' ><tr><td height='18'align='center' >当前页"&ipagecurrent&"/"&ipagecount&" 共有"&irecordcount&"条信息 每页"&ProductsShu&"条 "
if ipagecurrent=1 then
Response.Write" 首页 | "
else
Response.Write" <a href='ProductsList.asp?page=1'>首页</a> | "
end if
if ipagecurrent=1 then
Response.Write"上一页 | "
else
Response.Write"<a href='ProductsList.asp?page="&ipagecurrent-1&"'>上一页</a> | "
end if
if ipagecount>ipagecurrent then
Response.Write" <a href='ProductsList.asp?page="&ipagecurrent+1&"'>下一页</a> "
else
Response.Write" 下一页 "
end if
if ipagecount>ipagecurrent then
Response.Write"| <a href='ProductsList.asp?page="&ipagecount&"'>末页</a>"
else
Response.Write"| 末页"
end if
Response.Write" 转到第<select name='sel_page' onChange='javascript:location=this.options[this.selectedIndex].value;'>"
for i = 1 to ipagecount
if i = ipagecurrent then
Response.Write"<option value='ProductsList.asp?page="&i&"' selected>"&i&"</option>"
else
Response.Write"<option value='ProductsList.asp?page="&i&"'>"&i&"</option>"
end if
next
Response.Write"</select>页</td></tr></table>"
%></td>
<td></td>
</tr>
<tr>
<td height="30"> </td>
<td></td>
<td></td>
</tr>
</table></td>
</tr>
</table>
<!--#include file="Bot.asp" -->
</BODY>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -