⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 productsallxx.asp

📁 管理登录system 管理员:admin 密码:admin888 数据库链接文件: conn.asp 内容数据库前台链接文件 systemconn.asp 内容数据库后台链接文件 sy
💻 ASP
字号:
<!--#include file="siteinfo.asp"-->
<HTML>
<HEAD>
<TITLE><%=sitename%></TITLE>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<link href="images/CSS.css" type=text/css rel=stylesheet>
</HEAD>
<BODY >
<!--#include file="top.asp" -->
<table width="778" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td width="179" valign="top" background="images/BGline01.gif"><!--#include file="Productsleft.asp" --></td>
    <td width="598" valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
        <tr background="images/BGline04.gif">
          <td width="20" height="24" background="images/BGline04.gif">&nbsp;</td>
          <td background="images/BGline04.gif"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="76%"><span class="ABOUT_01"><img src="images/GO_03.gif" width="11" height="11" align="absmiddle"> 当前位置:<a href="index.asp">首页</a> &gt; <a href="productsall.asp">产品展厅</a> &gt;
                      <%
id=trim(request.QueryString("id"))
Str=trim(request.QueryString("Str"))
Pid=trim(request.QueryString("Pid"))
PStr=trim(request.QueryString("PStr"))
PPid=trim(request.QueryString("PPid"))
PPStr=trim(request.QueryString("PPStr"))
Response.Write"<a href='ProductsAllZ.asp?id="&PPid&"&Str="&PPStr&"'>"&PPStr&"</a>&nbsp;&gt;&nbsp;<a href='ProductsAllX.asp?Pid="&PPid&"&PStr="&PPStr&"&id="&Pid&"&Str="&PStr&"'>"&PStr&"</a>&nbsp;&gt;&nbsp;<a href='ProductsAllXX.asp?PPid="&PPid&"&PPStr="&PPStr&"&Pid="&Pid&"&PStr="&PStr&"&id="&id&"&Str="&Str&"'>"&Str&"</a>"
%>
                </span></td>
                <td width="24%"><span class="ABOUT_01">
                </span></td>
              </tr>
          </table></td>
          <td width="20" background="images/BGline04.gif">&nbsp;</td>
        </tr>
        <tr>
          <td width="20" height="24" background="images/BGline04.gif">&nbsp;</td>
          <td background="images/BGline04.gif"><!--#include file="menu2.asp" --></td>
          <td width="20" background="images/BGline04.gif">&nbsp;</td>
        </tr>
        <tr>
          <td height="20">&nbsp;</td>
          <td>&nbsp;</td>
          <td>&nbsp;</td>
        </tr>
        <tr>
          <td width="20" height="20">&nbsp;</td>
          <td><TABLE id=AutoNumber6 style="BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width=100% 
                  border=0>
              <TBODY>
                <TR>
                  <td width="100%" align="center" background="images/xc_4_bj.jpg"><%
ddd=Pid+"-"+id
sql = "SELECT id,LPattern,LName,LPrice,LPH,LManufacturer,LAddtime FROM Products where LSort like '%"&ddd&"%' and LPutout=true ORDER BY id DESC" 
StyleDD=Request.cookies("ProStyle")
select case StyleDD
%>
                      <% 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 %>
                      <%
'=========产品展示样式==============

Response.Write"<table width='100%' border='0' cellspacing='0' cellpadding='1' ><tr ><td height='18' background='images/BGline03.gif'></td></tr><tr><td height='18'align='center' >共有"&irecordcount&"个产品&nbsp;&nbsp;每页显示"&ProductsShu&"个&nbsp;&nbsp;当前页" &ipagecurrent& "/"&ipagecount&""
if ipagecurrent=1 then
Response.Write"&nbsp;&nbsp;首页&nbsp;|&nbsp;"
else
Response.Write"&nbsp;&nbsp;<a href='ProductsAllX.asp?page=1&Pid="&Pid&"&PStr="&PStr&"&id="&id&"&Str="&Str&"'>首页</a>&nbsp;|&nbsp;</a>"
end if
if ipagecurrent=1 then
Response.Write"上一页&nbsp;|&nbsp;"
else
Response.Write"<a href='ProductsAllX.asp?page="&ipagecurrent-1&"&Pid="&Pid&"&PStr="&PStr&"&id="&id&"&Str="&Str&"'>上一页</a>&nbsp;|&nbsp;"
end if
if ipagecount>ipagecurrent then
Response.Write"&nbsp;<a href='ProductsAllX.asp?page="&ipagecurrent+1&"&Pid="&Pid&"&PStr="&PStr&"&id="&id&"&Str="&Str&"'>下一页</a>&nbsp;"
else
Response.Write"&nbsp;下一页&nbsp;" 
end if
if ipagecount>ipagecurrent then
Response.Write"|&nbsp;<a href='ProductsAllX.asp?page="&ipagecount&"&Pid="&Pid&"&PStr="&PStr&"&id="&id&"&Str="&Str&"'>未页</a> "
else
Response.Write"|&nbsp;未页"
end if
%>
&nbsp;&nbsp;转到第
                    <select name="sel_page" onchange="javascript:location=this.options[this.selectedIndex].value;">
                      <%
 for i = 1 to ipagecount   
 if i = ipagecurrent then%>
                      <option value="ProductsAllX.asp?page=<%=i%>&Pid=<%=Pid%>&PStr=<%=PStr%>&id=<%=id%>&Str=<%=Str%>" selected><%=i%></option>
                      <%else%>
                      <option value="ProductsAllX.asp?page=<%=i%>&Pid=<%=Pid%>&PStr=<%=PStr%>&id=<%=id%>&Str=<%=Str%>"><%=i%></option>
                      <%
 end if
 next
%>
                    </select>
                    页 </td>
                </tr>
          </table></td>
          <td width="20">&nbsp;</td>
        </tr>
        <tr>
          <td width="20" height="40">&nbsp;</td>
          <td>&nbsp;</td>
          <td width="20">&nbsp;</td>
        </tr>
      </table>
        <TABLE id=AutoNumber6 style="BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 width=100% 
                  border=0>
          <TBODY>
            <TR></tr>
        </table></td>
    <td width="1" valign="top" background="images/BGline02.gif"></td>
  </tr>
</table>
<!--#include file="bot.asp" -->
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -