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

📄 main_list_category.asp

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

<%	
	if(Request.QueryString("type") == 'del')
	{
		if(Request.QueryString("field") == 'CAT')
		{
			var strSQL = "Execute sp_delSubCat '', " + parseInt(Request.QueryString('catID')) + ", ''";
			oConn.Execute(strSQL);
		    Response.Redirect("admin_done.asp?mess=Nhóm hàng đã được xóa!!!&gourl=main_List_Category.asp");
		}
		
		if(Request.QueryString("field") == "SUB")
		{
			var strSQL = "Execute sp_delSubCat 'SUB', '', " + parseInt(Request.QueryString('subID'));
			oConn.Execute(strSQL);
		    Response.Redirect("admin_done.asp?mess=Loại hàng đã được xóa!!!&gourl=main_List_Category.asp");
		}
	}

	var oRsCat=Server.CreateObject("ADODB.Recordset");
	var strSQLcat;
	strSQLcat="Select Distinct CatName, CatOrder, CatID From vwSubCat Where CatDelete=1 Order by CatOrder ASC";
	oRsCat.Open(strSQLcat,oConn,3,1);
	
	if(Request.Form('sx')=="Cập nhật sắp xếp")
	{
		var cOrder=String(Request.Form('cbCatOrder'));
		cOrder=cOrder.split(",");
		var sOrder=String(Request.Form('cbSubOrder'));
		sOrder=sOrder.split(",");
		var CID=String(Request.Form('CID'));
		CID=CID.split(",");
		var SID=String(Request.Form('SID'));
		SID=SID.split(",");
		
		for(var k=0;k<CID.length;k++)
		{
			var strSQL = "Execute sp_sapxep '', " +  parseInt(cOrder[k]) + ", " + parseInt(CID[k]) + ", ''";
			oConn.Execute(strSQL);
		}
		
		for(var j=0;j<SID.length;j++)
		{
			var strSQL = "Execute sp_sapxep 'SUB', " +  parseInt(sOrder[j]) + ", '', " + parseInt(SID[j]);
			oConn.Execute(strSQL);
		}
		Response.Redirect("Admin_done.asp?mess=Đã cập nhật xong!&gourl=main_List_Category.asp");
	}
 %>

<html>
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
-->
</style><head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<title>List Category</title>
<body topmargin="0" rightmargin="0" leftmargin="0" bottommargin="0">
<div align="center">
  <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 align="left" valign="top">
          <td width="160" background="images/menu_left_bg.gif"><!--#include file="lib/inc_menuleft.asp"--></td>
          <td>
		  <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Ê LOẠI SẢN PHẨM</font></strong>
			</td>
              </tr>
        </table></td>
      </tr>
     <tr>
	 <form name="frmlist" action="" method="post">
	 	<td><table width="100%"  border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td align="left" valign="middle">&nbsp;</td>
          </tr>
          <tr>
            <td style="padding-left:5px;"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td align="right" valign="top" style="padding-top:5px; " class="listCat">&gt;&gt; Có <strong><%=oRsCat.RecordCount%></strong> nhóm sản phẩm trong CSDL </td>
              </tr>
              <tr>
                <td align="left" valign="top">
				<table style=" border:1px solid; border-collapse:collapse"  width="100%"  border="1" bordercolor="#0066CC" cellspacing="1" cellpadding="1">
                  <tr align="center" valign="middle">
                    <td width="232"  style="padding-bottom:8px; padding-top:5px; "><strong><font face="arial, tahoma, verdana" size="2">Tên nhóm sản phẩm</font></strong></td>
                    <td  style="padding-bottom:8px; padding-top:5px; "><strong><font face="arial, tahoma, verdana" size="2">Tên loại sản phẩm</font></strong></td>
                    <td  style="padding-bottom:8px; padding-top:5px; "><strong><font face="arial, tahoma, verdana" size="2">Sắp xếp</font></strong></td>
                    <td width="80"  style="padding-bottom:8px; padding-top:5px; "><strong><font face="arial, tahoma, verdana" size="2">Command</font></strong></td>
                  </tr>
				
				  <%
						while((!oRsCat.BOF)&&(!oRsCat.EOF))
						{
				  %>
				  
					<tr>
                    <td align="right" valign="middle" class="listCat"><strong><%=oRsCat.Fields('CatName')%></strong></td>
                    <td width="289" align="left" valign="top" class="list">&nbsp;</td>
                    <td width="110" align="left" valign="top" class="list">
                    <select name="cbCatOrder" size="1" style="width:70px; ">
                    <%
                    	for(var dem=1;dem<=oRsCat.RecordCount;dem++)
                    	{
                    %>
                    <option value="<%=dem%>" <%if(dem==oRsCat('CatOrder')){%>Selected<%}%>><%=dem%></option>
                    <%}%>
                    </select><input type=hidden name=CID value=<%=oRsCat('CatID')%>></td>
                    <td align="center" valign="middle" class="list"><a title="Sửa nhóm hàng" href="main_Edit_Category.asp?field=CAT&catID=<%=oRsCat.Fields('CatID')%>" class="command">Edit</a> | <a title="Xóa nhóm hàng" href="javascript: askq('Có chắc xóa không?','main_List_Category.asp?type=del&field=CAT&catID=<%=oRsCat.Fields("CatID")%>');" class="command">Delete</a></td>
                    </tr>
					
					<%
						var oRsSub=Server.CreateObject("ADODB.Recordset");
						var strSQLsub;
						strSQLsub="Select Distinct SubName, SubID, SOrder From vwSubCat Where SDelete=1 AND SCatID=" + parseInt(oRsCat.Fields('CatID')) + " Order by SOrder ASC";
						oRsSub.Open(strSQLsub,oConn,3,1);

						while((!oRsSub.BOF)&&(!oRsSub.EOF))
						{
					%>
					<tr bgcolor="#FFEFBF">
                    <td align="left" valign="top" class="list"></td>
                    <td width="289" align="left" valign="middle" class="listCat"><font color="#000000"><strong><%=oRsSub.Fields('SubName')%></strong></font></td>
                    <td width="110" align="right" valign="top">
                    <input type=hidden name=SID value=<%=oRsSub('SubID')%>>
                    <select name="cbSubOrder" size="1" style="width:40; ">
                    <%
                    	for(var dem=1;dem<=oRsSub.RecordCount;dem++)
                    	{
                    %>
                    <option value="<%=dem%>" <%if(dem==oRsSub('SOrder')){%>Selected<%}%>><%=dem%></option>
                    <%}%>
                    </select>&nbsp;</td>
                    <td align="center" valign="middle" class="list"><a title="Sửa loại hàng" href="main_Edit_Category.asp?field=SUB&subID=<%=oRsSub.Fields('SubID')%>" class="command">Edit</a> | <a title="Xóa loại hàng" href="javascript: askq('Có chắc xóa không?','main_List_Category.asp?type=del&field=SUB&subID=<%=oRsSub.Fields("SubID")%>');" class="command">Delete</a></td>
                    </tr>
					
					<%
						oRsSub.MoveNext();
						} oRsSub.Close();
					oRsCat.MoveNext();
					}
					 oRsCat.Close();
					%>
									
                </table></td>
              </tr>
			  <tr>
			    <td align="right" valign="bottom">&nbsp;</td>
			  </tr>
			  <tr>
			    <td align="center" valign="bottom"><input type="submit" name="sx" value="Cập nhật sắp xếp" style="width:120px; "></td>
			    </tr>
            </table></td>
          </tr>
        </table></td>
		</form>
	 </tr> 
    </table></td>
  </tr>
</table>
		  </td>
        </tr>
      </table></td>
    </tr>
  </table>
</div>
</body>
</html>
<%oConn.Close();%>

⌨️ 快捷键说明

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