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

📄 doviewsubs.asp

📁 订单管理系统
💻 ASP
字号:
<!--#include file="adminconn.inc" -->
<%
if request("searchsubs")="" then

if request("bigarea")="" and request("area")="" then
response.write"<SCRIPT language=JavaScript>alert('请至少选择商品所在主分类!');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.end
end if

end if
%>

<% 
if request("del")<>"" then 
conn.Execute("delete * from subs where id="&request("del"))
end if 
%> 
<html>
<head>
<title>腾科B2C购物系统-商品管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../inc/guhongying.css" type="text/css">
</head>
<body bgcolor="6699CC" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" border="0" cellspacing="1" cellpadding="2" bgcolor="#000000" vspace="0" hspace="0">
  <tr>
    <td bgcolor="#316395" height="27"><font color="#FFFFFF">.:: 您可以在这里删除或者修改商品资料</font></td>
  </tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="50">&nbsp;</td>
  </tr>
</table>
<SCRIPT LANGUAGE="JavaScript">
<!--//
function check()
{
   if (isNaN(go2to.page.value))
		alert("请正确填写转到页数!");
   else if (go2to.page.value=="") 
	     {
		alert("请输入转到页数!");
		 }
   else
		go2to.submit();
}
//-->
</SCRIPT>
<div align="center">
<% 
     set rs=server.createobject("adodb.recordset") 
     if not isempty(request("page")) then   
     pagecount=cint(request("page"))   
     else   
     pagecount=1   
     end if

key=request("searchsubs")
if key="" then

bigarea=request("bigarea")
area=request("area")
if area="" then
sql="select * from subs where bigarea='"&bigarea&"' order by id desc"
else
sql="select * from subs where bigarea='"&bigarea&"' and area='"&area&"' order by id desc"
end if

else
sql="select * from subs where subs like '%"&key&"%' order by id desc" 
end if


     'key=request("searchuser")
     'if key="" then
     'sql="select * from user order by id desc" 
     'else
     'sql="select * from user where username like '%"&key&"%' order by id desc" 
     'end if

	 rs.open sql,conn,1,1   
     if rs.eof and rs.bof then   
     response.write"<BR>" 
	 response.write"=== 暂无 ==="
     response.write"<BR><BR>"

	 response.end  
	 end if
     rs.pagesize=20
     if pagecount>rs.pagecount or pagecount<=0 then              
     pagecount=1              
     end if              
     rs.AbsolutePage=pagecount %> 
  <table border="0" cellpadding="0" cellspacing="0" width="85%" bordercolor="#FFFFFF" bordercolorlight="#FFFFFF" bordercolordark="#FFFFFF" class=ver>
      
        <tr>
		   <% if rs.pagecount=1 then %>
		    
      <td height="25" colspan="4"  class="ver"> <font class=ver>共有[<font color="#ff0000"><%=rs.recordcount%></font>]商品
        以下是[<font color="red">1~<%=rs.recordcount%></font>]个<a href="adduser.asp" target="mainFrame"> </a></font></td>             
        </tr>
        <tr>
         

<td height="7" colspan="4" ></td>
        </tr>
        <%else%>
		<tr>
		    
      <td height="25" colspan="4" ><font class=ver> <% 
            page_start=(pagecount-1)*rs.pagesize
            if pagecount=1 then page_start=1
		    page_end=rs.pagesize*pagecount
		    if pagecount*rs.pagesize=>rs.recordcount then page_end=rs.recordcount end if%> 
        共有[<font color="#ff0000"><%=rs.recordcount%></font>]商品 以下是[<font color="red"><%=page_start%>~<%=page_end%></font>]</font><a href="adduser.asp" target="mainFrame"> </a></td>  

        </tr>
        <tr>
		    
      <td height="25" colspan="4" > <% response.write"<form name=go2to form method=Post action='doviewsubs.asp?key="+key+"&bigarea="+bigarea+"&area="+area+"'&bigarea="+bigarea+"&area="+area+">"
		     response.write "<font color=ffffff>◆&nbsp;</font>"                                              
		     if pagecount=1 then                                                        
			 response.write "<font class=ver>首页 上一页</font>&nbsp;"
			 else                                                        
             response.write "<a href=doviewsubs.asp?page=1&key="+key+"&bigarea="+bigarea+"&area="+area+"><font class=ver>首页</font></a>&nbsp;" 
	         response.write "<a href=doviewsubs.asp?page="+cstr(pagecount-1)+"&key="+key+"&bigarea="+bigarea+"&area="+area+"><font color='0000BE'>上一页</font></a>&nbsp;"
			 end if                                             
             if rs.PageCount-pagecount<1 then                                                        
             response.write "<font class=ver>下一页 尾页</font>"                                                    
			 else                                                        
             response.write "<a href=doviewsubs.asp?page="+cstr(pagecount+1)+"&key="+key+"&bigarea="+bigarea+"&area="+area+"><font class=ver>下一页</font></a>&nbsp;"
			 response.write "<a href=doviewsubs.asp?page="+cstr(rs.PageCount)+"&key="+key+"&bigarea="+bigarea+"&area="+area+"><font class=ver>尾页</font></a>"           
             end if 
			 response.write "<font class=ver>&nbsp;页次:<font class=ver>"&pagecount&"</font>/"&rs.pagecount&"页</font>" 
			response.write "<font class=ver> 转到第<input type='text' name='page' size=2 maxLength=3 style='font-size: 9pt; color:#00006A; position: relative; height: 18' value="&PageCount&">页</font>&nbsp;&nbsp;&nbsp;&nbsp;"                               
			response.write "<input class=button1 type='button' value='确 定' onclick=check() style='font-family: 宋体; font-size: 9pt; color: #000073; position: relative; height: 19'>" %> 
      </td>

        </tr>
	  <%end if%>
	</table>        
        
        
  <table border="0" cellspacing="1" cellpadding="4" bgcolor="#000000" width="85%">
    <tr bgcolor="7C96B8"> 
      <td width="8%" height="25" class=ver bgcolor="336699"> 
        <p align="center"><font color="ffffff">ID</font></p>
      </td>
      <td width="24%" bgcolor="7C96B8"> 
        <p align="center"><font color="ffffff">商品简称</font> 
      </td>
      <td bgcolor="336699" width="20%"> 
        <p align="center"><font color="ffffff">主分类</font> 
      </td>
      <td  class=ver width="20%"> 
        <div align="center"><font color="#FFFFFF">分类别</font></div>
      </td>
      <td  class=ver bgcolor="#336699"> 
        <div align="center"><font color="#FFFFFF">价格</font></div>
      </td>


      <td  width="18%" bgcolor="7C96B8"> 
        <p align="center"><font color="ffffff">- 操作 - </font> 
      </td>
    </tr>
    <% do while not rs.eof %> 
    <tr bgcolor="7C96B8"> 
      <td  height="25" class=ver bgcolor="336699"> 
        <p align="center"><font color=ffffff><%=rs("id")%></font></p>
      </td>
      <td  class=ver> 
        <p align="left"><font color="ffffff"><a href="editsubs.asp?searchsubs=<%=rs("subs")%>"><%=rs("subs")%></a></font></p>
      </td>
      <td  class=ver bgcolor="336699"> 
        <p align="left"><font color="ffffff"><%=rs("bigarea")%></font></p>
      </td>
      <td  class=ver><font color="ffffff">
<%
if rs("area")="" then
response.write "此商品为套装"
else
response.write rs("area")
end if
%>
</font></td>
      <td  class=ver bgcolor="#336699"><font color="ffffff"><%=rs("price")%></font></td>
      <td  class=ver> 
        <p align="center"><font color="ffffff">[</font><a href="editsubs.asp?searchsubs=<%=rs("subs")%>"><font class=ver>编/详/删</font></a><font color="ffffff">]</font> 
      </td>
    </tr>
    <% i=i+1                                                                                                  
          rs.movenext                                                                                                  
          if i>=rs.PageSize then exit do 
		  loop                                                                    
          rs.close                                                                                                
          set rs=nothing                                                                                                
          conn.close                                                                                                
          set conn=nothing 
%>
</table>
      </div>

<p>&nbsp;</p>
<center>
<font color="ffffff">建议使用 1024 X 768 及以上分辨率 </font>
</center>
</body>
</html>

⌨️ 快捷键说明

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