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

📄 main_list_product.asp

📁 Computer SHOP+DATABASE
💻 ASP
字号:
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="65001"%>
<!--#include file="admin_common.asp"-->
<!--#include file="../script/trimFunction.asp"-->

<%
	var rsP=Server.CreateObject("ADODB.Recordset");
	var ds;
	var strSearch;
	var listPro=Request("list");
	listPro=parseInt(listPro);
	ds = String(Request("ds"));
	strSearch = trim_str(String(Request("txtSearch")));	
		
	if(isNaN(listPro)||(listPro==0))
	{
		strSQL="Select PID, PBestSeller, PBestOrder, PName, PPrice, PImage, PWarranty, PDescription, PStatus, PBest, PNew, PCompany From vwProduct Where PDelete=1";
	}
	
	
	if(listPro>0)
	{
		strSQL="Select PID, PBestSeller, PBestOrder, PName, PImage, PPrice, PWarranty, PDescription, PStatus, PBest, PNew, PCompany From vwProduct Where PSubCatID=" + listPro + " AND PDelete=1";
	}
	
	if(strSearch != "")
	{
		if(ds == "code")
		{
			strSQL+= " AND PID Like N'%" + strSearch + "%' ";
		}
		if(ds == "name")
		{
			strSQL+= " AND PName Like N'%" + strSearch + "%' Or PDescription Like N'%" + strSearch + "%' ";
		}
	}
	
	strSQL+= " Order By CatOrder, SOrder, PID";
	rsP.Open(strSQL,oConn,3,1);
	rsP.PageSize=10;
	var totalPage=rsP.PageCount;
	
%>

<%
	if(Request.Form("delSome")=="Xóa sản phẩm")
	{
		var pCode=Request.Form("chkProID");
		var strSQL;
		var hdPage=parseInt(Request.Form('hdPage'));
		
		if(hdPage==totalPage)
		{
			hdPage=hdPage-1;
		}
		
		strSQL="Update tblProduct SET PDelete=0 Where PID IN (" + pCode + ")";
		oConn.Execute(strSQL);
		
		Response.Redirect("admin_done.asp?mess=Sản phẩm đã được xóa!!!&gourl=main_List_Product.asp?list=" + parseInt(Request.Form('hdList')) + "|page=" + hdPage);
	}
		
%>

<html>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<title>List Product</title>
<script src="lib/checkAll.js"></script>
<body topmargin="0" rightmargin="0" leftmargin="0" bottommargin="0">
<div align="center">
  <table width="100%" border="0" cellspacing="0" cellpadding="0" background="images/menu_left_bg.gif">
    <tr>
      <td align="left" valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
        <tr align="left" valign="top">
          <td width="160" background="images/menu_left_bg.gif" style="background-repeat:repeat "><!--#include file="lib/inc_menuleft.asp"--></td>
          <td align="left" valign="top" bgcolor="#FFFFFF">
		  <table width="100%"  border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td align="left" valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td><table width="100%"  border="0" cellspacing="0" cellpadding="0">
          <tr>
                <td align="center" valign="top" bgcolor="#004182" style="padding-top:5px; padding-bottom:10px; ">
			      <strong><font color="#FFFFFF" face="arial, tahoma, verdana"; size="5">LIỆT KÊ SẢN PHẨM</font></strong>
			</td>
              </tr>
        </table></td>
      </tr>
     <tr>
	 <form name="frmlist" action="main_List_Product.asp" method="post">
	 	<td><table width="100%"  border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td align="left" valign="middle">
			<table width="100%"  border="0" cellspacing="0" cellpadding="0">
			<tr>
				<td height="8"></td>
				<td width="67%" height="8"></td>
			</tr>
              <tr>
                <td width="33%" align="right"><font face="arial, tahoma, verdana">
				<strong>..::&nbsp;<font face="arial, tahoma, verdana" size="2">Liệt kê sản phẩm theo</font></strong> 
				</font></td>
                <td style="padding-left:18px; "><select name="list" size="1" class="textbox" id="list" onChange="change();">
				  <option value="0" <%if(parseInt(listPro)==0){%> selected <%}%>>&nbsp;- &nbsp;Tất cả</option>
			<%
				var oRsCat=Server.CreateObject("ADODB.Recordset");
				var SQLcat="Select Distinct CatID, CatName, CatOrder From vwSubCat Where CatDelete=1 Order by CatOrder ASC";
				oRsCat.Open(SQLcat,oConn,3,1);
				while((!oRsCat.BOF)&&(!oRsCat.EOF))
				{
		    %>
			<optgroup label="<%=oRsCat.Fields("CatName")%>" style="background-color:#006600; color:#FFFFFF;"></optgroup>
				
			<%
					var oRsSub=Server.CreateObject("ADODB.Recordset");
					var SQLsub="Select SubID, SubName, SOrder From vwSubCat Where SDelete=1 AND SCatID=" + oRsCat.Fields("CatID") + " AND SDelete=1 Order by SOrder ASC";
					oRsSub.Open(SQLsub,oConn,3,1);
					while((!oRsSub.BOF)&&(!oRsSub.EOF))
					{
			%>
				<option value="<%=oRsSub.Fields("SubID")%>" <%if(parseInt(listPro)==oRsSub.Fields("SubID")){%>selected<%}%>>&nbsp;&nbsp;&nbsp;&nbsp;+ <%=oRsSub.Fields("SubName")%></option>
				<%
					oRsSub.MoveNext();
					}
					oRsSub.Close();
				%>
			<%
				oRsCat.MoveNext();
				}
				oRsCat.Close();
			%>
				
				
             </select>
			 <input type="hidden" name="hdPage" value="<%=Request.QueryString('page')%>">
			 <input type="hidden" name="hdList" value="<%=Request.QueryString('list')%>">
			 </td></tr>
            </table></td>
          </tr>
          
          <tr>
            <td style="padding-left:5px; padding-right:5px; "><table width="100%"  border="0" cellspacing="0" cellpadding="4">
              <tr>
                <td align="left" valign="top" style="padding-top:5px; " class="list">&nbsp;</td>
              </tr>
              <tr>
                <td align="left" valign="top" style="padding-top:5px; " class="list">
		<font face="arial, tahoma, verdana" size="2">Từ khóa tìm kiếm </font>&nbsp;&nbsp;
		<input type="text" size="18" class="textbox" name="txtSearch" value="<%=strSearch%>">&nbsp;&nbsp;
		<font face="arial, tahoma, verdana" size="2">Theo</font>&nbsp;&nbsp;
		<select name="ds" size="1" class="textbox">
			<option value="code" <%if(ds=='code'){%> selected <%}%>>Mã</option>
			<option value="name" <%if(ds=='name'){%> selected <%}%>>Tên</option>
		</select>
		<script language="jscript">
			function callReset()
			{
				document.frmlist.txtSearch.value = "";
			}
		</script>
		&nbsp;&nbsp;<input type="submit" name="btnSearch" value="Tìm kiếm">&nbsp;<input type="button" onClick="callReset();" value=" Xóa ">
				</td>
              </tr>
              <tr>
                <td align="right" valign="top" style="padding-top:5px; " class="list">&gt;&gt; Có <strong><%=rsP.RecordCount%></strong> sản phẩm trong CSDL </td>
              </tr>
				
				<%
					var intCurrentPage;
					var i;
					
					if(isNaN(Request.QueryString("page")))
					{	
						intCurrentPage = 1;
					}
					else
					{
						intCurrentPage = parseInt(Request.QueryString("page"));
					}
					
					if (totalPage > 0)
					{
						rsP.AbsolutePage = parseInt(intCurrentPage);
					}
					else
					{					
						intCurrentPage = 0;
					}
					i=1;

					var n=1;
					if(rsP.RecordCount==0)
					{

				%>
              <tr>
                <td align="center" valign="middle" style="padding-top:5px; " class="list">
				<%		
						Response.Write("<font size=3><strong>Không có sản phẩm nào trong mục này!</strong></font>");
				%>
				</td>
              </tr>
              <%}
              else
              {
              %>
              <tr>
                <td align="left" valign="top">
				<table style=" border:1px solid; border-collapse:collapse"  width="100%"  border="1" bordercolor="#0066CC" cellspacing="2" cellpadding="4">
                  <tr valign="top">
                    <td width="35" align="center"><strong><font face="arial, tahoma, verdana" size="2">Mã</font></strong></td>
                    <td width="441" align="center"><strong><font face="arial, tahoma, verdana" size="2">Tên sản phẩm</font></strong></td>
                    <td width="60" align="center"><strong><font face="arial, tahoma, verdana" size="2">Giá</font></strong><br> 
                      <font color="#FF0000" size="1" face="arial, tahoma, verdana">(USD)</font></td>
                    <td width="133" align="center"><strong><font face="arial, tahoma, verdana" size="2">Hãng sản xuất</font></strong></td>
                    <td width="73" align="center"><strong><font face="arial, tahoma, verdana" size="2">Bảo hành</font></strong><br>
                      <font size="1" color="#FF0000" face="arial, tahoma, verdana">(Tháng)</font></td>
                    <td width="49" align="center"><strong><font face="arial, tahoma, verdana" size="2">Đã bán</font></strong></td>
                    <td width="34" align="center" valign="middle" bgcolor="#FFFFFF"><input name="chkAll" <%if((rsP.BOF)&&(rsP.EOF)){%> disabled <%}%> type="checkbox" id="chkAll" value="checkbox" onClick="checkall();"></td>
                    <td width="49" align="center"><strong><font face="arial, tahoma, verdana" size="2">Sửa</font></strong></td>
                    </tr>
				<%
					while((!rsP.BOF)&&(!rsP.EOF))
					{
						if((n%2)==0)
						{
				%>
                  <tr>
                    <td align="left" valign="middle" class="list"><%=rsP.Fields("PID")%></td>
                    <td align="left" valign="top" class="list"><a href="#" onClick="JavaScript:openPopup('popup_ProductDetail.asp?proID=<%=rsP.Fields('PID')%>');" class="product"><%=rsP.Fields("PName")%><%if(rsP.Fields('PNew')==1){Response.Write('&nbsp;<img src="../images/new.gif" border=0>');}%></a></td>
                    <td align="center" valign="top" class="list"><%=rsP.Fields("PPrice")%></td>
                    <td width="133" align="center" valign="top" class="list"><%=rsP.Fields("PCompany")%></td>
                    <td width="73" align="center" valign="middle" class="list"><%=rsP.Fields("PWarranty")%></td>
                    <td align="center" valign="middle" class="list"><font color="#0066FF"><strong><%=rsP.Fields("PBestSeller")%></strong></font></td>
                    <td align="center" valign="middle" bgcolor="#FFFFFF" class="list"><input name="chkProID" type="checkbox" value="'<%=rsP.Fields("PID")%>'" onClick="docheckone();"></td>
                    <td align="center" valign="middle" class="list"><a title="Sửa mặt hàng" href="main_Edit_Product.asp?p_code=<%=rsP.Fields('PID')%>&list=<%=Request('list')%>&page=<%=Request.QueryString('page')%>&ds=<%=Request('ds')%>&txtSearch=<%=Request('txtSearch')%>" class="command"><img src="../images/icon_edit.gif" border="0"></a></td>
                    </tr>
					<%
						} else {
					%>
					
                  <tr bgcolor="#FFEFBF">
                    <td align="left" valign="middle" class="list"><%=rsP.Fields("PID")%></td>
                    <td align="left" valign="top" bgcolor="#FFEFBF" class="list"><a href="#" onClick="JavaScript:openPopup('popup_ProductDetail.asp?proID=<%=rsP.Fields('PID')%>');" class="product"><%=rsP.Fields("PName")%><%if(rsP.Fields('PNew')==1){Response.Write('&nbsp;<img src="../images/new.gif" border=0>');}%></a></td>
                    <td align="center" class="list"><%=rsP.Fields("PPrice")%></td>
                    <td width="133" align="center" valign="middle" class="list"><%=rsP.Fields("PCompany")%></td>
                    <td align="center" valign="middle" class="list"><%=rsP.Fields("PWarranty")%></td>
                    <td align="center" valign="middle" class="list"><font color="#FF0000"><strong><%=rsP.Fields("PBestSeller")%></strong></font></td>
                    <td align="center" valign="middle" class="list"><input name="chkProID" type="checkbox" value="'<%=rsP.Fields("PID")%>'" onClick="docheckone();"></td>
                    <td align="center" valign="middle" class="list"><a title="Sửa mặt hàng" href="main_Edit_Product.asp?p_code=<%=rsP.Fields('PID')%>&list=<%=Request('list')%>&page=<%=Request.QueryString('page')%>&ds=<%=Request('ds')%>&txtSearch=<%=Request('txtSearch')%>" class="command"><img src="../images/icon_edit.gif" border="0"></a></td>
                    </tr>
					<%
					}
					if(i==rsP.PageSize) 
					{
						break;
					}
					
						i++;
						
						n++;
					rsP.MoveNext();
					}
				}
					%>
                </table></td>
              </tr>
			  <tr>
			    <td></td>
			    </tr>
			  <tr>
			    <td align="right" valign="top">
				<input title="Xóa mặt hàng" name="delSome" type="submit" value="Xóa sản phẩm" <%if ((rsP.EOF)&&(rsP.BOF)){%> disabled <%}%> onClick="return checkInput(this);">
       				</td>
			   </tr>								
			    <%
				if (rsP.PageCount > 1){
				%>
				<tr>
					<td align="center" valign="bottom">
		         	<%
		         		var intCount;
						if(intCurrentPage>1)
							Response.Write("<a href=?page=" + (intCurrentPage-1) + "&list=" + parseInt(Request('list')) + "&ds=" + String(Request('ds')) + "&txtSearch=" + String(Request('txtSearch')) + ">Trước</a>" + "&nbsp;|");
						else						
							Response.Write("<font color='#999999' size='2'>Trước</font>&nbsp;|");
						for(intCount = 1;intCount<=rsP.PageCount;intCount++)
						{
							if (intCount == intCurrentPage)
								Response.Write("<font color='#DD0000' size='2'>" + "&nbsp;" + intCount + "</font>" + " | ");
							else{
								Response.Write("<a href=?page=" + intCount + "&list=" + parseInt(Request('list')) + "&ds=" + String(Request('ds')) + "&txtSearch=" + String(Request('txtSearch')) + ">" + "&nbsp;" + intCount + "</a> " + " | ");
							}
						}
						if(intCurrentPage!=rsP.PageCount)
							Response.Write("<a href=?page=" + (intCurrentPage+1) + "&list=" + parseInt(Request('list')) + "&ds=" + String(Request('ds')) + "&txtSearch=" + String(Request('txtSearch')) + ">Sau</a>");
						else						
							Response.Write("&nbsp;<font color='#999999' size='2'>Sau</font>");
					%>
					</td>														
				</tr>
				<tr>
				  <td align="center" valign="top">
					<font color="darkblue" face="arial, tahoma, verdana" size="2">Trang <%=intCurrentPage%> / <%=rsP.PageCount%></font>
				  </td>
				  </tr>
				<%
				}
				rsP.Close();
				oConn.Close();
				%>
            </table>
            </td>
          </tr>
        </table></td>
		</form>
	 </tr> 
    </table></td>
  </tr>
</table>
		  </td>
        </tr>
      </table></td>
    </tr>
  </table>
</div>
</body>
</html>

⌨️ 快捷键说明

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