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

📄 productlist.asp

📁 asp源码 图片ASP整站
💻 ASP
📖 第 1 页 / 共 2 页
字号:
	this.Selected=Selected;
}
function EditContent()
{
	var SelectedContent='',SelectContentObj=null;
	for (i=0;i<ListObjArray.length;i++)
	{
		if (ListObjArray[i].Selected==true)
		{
			if (ListObjArray[i].Obj.ContentID!=null)
			{
				if (SelectedContent=='') SelectedContent=ListObjArray[i].Obj.ContentID;
				else  SelectedContent=SelectedContent+'***'+ListObjArray[i].Obj.ContentID;
			}
			SelectContentObj=ListObjArray[i].Obj;
		}
	}
	if (SelectedContent!='')
	{
		if (SelectedContent.indexOf('***')==-1)
		{
			if (SelectContentObj.ContentTypeStr!=null)
			{
				location='../mall/mall_AddProducts.asp?ID='+SelectedContent+'&ClassID='+ClassID;
			}
		}
		else alert('一次只能够修改一条新闻');
	}
	else alert('请选择要修改的新闻');
}
function Audit(Action)
{
	var SelectedContent='',SelectContentObj=null;
	for (i=0;i<ListObjArray.length;i++)
	{
		if (ListObjArray[i].Selected==true)
		{
			if (ListObjArray[i].Obj.ContentID!=null)
			{
				if (SelectedContent=='') SelectedContent=ListObjArray[i].Obj.ContentID;
				else  SelectedContent=SelectedContent+','+ListObjArray[i].Obj.ContentID;
			}
			SelectContentObj=ListObjArray[i].Obj;
		}
	}
	if (SelectedContent!='')
	{
		if (SelectContentObj.ContentTypeStr!=null)
		{
			if (Action==true)
			{
				location='ProductList.asp?Action=Check&ID='+SelectedContent+'&ClassID='+ClassID;
			}
			else
				location='ProductList.asp?Action=Lock&ID='+SelectedContent+'&ClassID='+ClassID;
		}
	}
	else alert('请选择要操作的商品');
}
function PreviewNews()
{
	var SelectedContent='',SelectedTF=false;
	for (i=0;i<ListObjArray.length;i++)
	{
		if (ListObjArray[i].Selected==true)
		{
			SelectedTF=true;
			window.open('Read.asp?Table=Product&ID='+ListObjArray[i].Obj.ContentID);
		}
	}
	if (!SelectedTF) alert('请选择要预览的内容!');
}
function DelContent()
{
	var SelectedProduct='';
	for (i=0;i<ListObjArray.length;i++)
	{
		if (ListObjArray[i].Selected==true)
		{
			if ((ListObjArray[i].Obj.ContentID!=null)&&(ListObjArray[i].Obj.ContentTypeStr!=null))
			{
				if (SelectedProduct=='') SelectedProduct=ListObjArray[i].Obj.ContentID;
				else  SelectedProduct=SelectedProduct+'***'+ListObjArray[i].Obj.ContentID;
			}
		}
	}
	if (SelectedProduct!='')
	{
		if(confirm('确认删除吗?\n删除后不可恢复!'))
			location = '../mall/Mall_DelProduct.asp?action=del&ProductsID='+SelectedProduct+'&ClassID='+ClassID;
	}
	else
	{
		alert('请选择删除内容');
	}
}
function ReViewManage()
{
	var SelectedProduct='';
	for (i=0;i<ListObjArray.length;i++)
	{
		if (ListObjArray[i].Selected==true)
		{
			if ((ListObjArray[i].Obj.ContentID!=null)&&(ListObjArray[i].Obj.ContentTypeStr!=null))
			{
				if (SelectedProduct=='') SelectedProduct=ListObjArray[i].Obj.ContentID;
				else  SelectedProduct=SelectedProduct+'***'+ListObjArray[i].Obj.ContentID;
			}
		}
	}
	location='../mall/mall_comment.asp?ID='+SelectedProduct;
}
function RefreshProducts()
{
	var SelectedProduct='',SelectContentObj=null;
	for (i=0;i<ListObjArray.length;i++)
	{
		if (ListObjArray[i].Selected==true)
		{
			if (ListObjArray[i].Obj.ContentID!=null)
			{
				if (SelectedProduct=='') SelectedProduct=ListObjArray[i].Obj.ContentID;
				else  SelectedProduct=SelectedProduct+'***'+ListObjArray[i].Obj.ContentID;
			}
		}
	}
	if (SelectedProduct!='') 
	{
		OpenWindow('Frame.asp?FileName=NewsRefresh.asp&PageTitle=生成&ProductID='+SelectedProduct,220,105,window);
	}
	else alert('请选择要生成的内容');
}
function AddToSpec()
{
	var SelectedProduct='';
	for (i=0;i<ListObjArray.length;i++)
	{
		if (ListObjArray[i].Selected==true)
		{
			if ((ListObjArray[i].Obj.ContentID!=null)&&(ListObjArray[i].Obj.ContentTypeStr!=null))
			{
				if (SelectedProduct=='') SelectedProduct=ListObjArray[i].Obj.ContentID;
				else  SelectedProduct=SelectedProduct+'***'+ListObjArray[i].Obj.ContentID;
			}
		}
	}
	if (SelectedProduct!='')
	{
//		location='../mall/mall_productsmanage.asp?action=del&ProductsID='+SelectedProduct+'&ClassID='+ClassID;
		OpenWindow('Frame.asp?FileName=ProductToSpecial.asp&PageTitle=添加到专区&ProductID='+SelectedProduct,350,120,window);
		location.href=location.href;
	}
	else
	{
		alert('请选择要加入专区的内容');
	}
}

function ShowAddMenu()
{
	var MenuObj=document.all.AddContentMenu;
	var el=event.srcElement;
	MenuObj.style.display='';
	MenuObj.style.posLeft=el.offsetLeft;
	MenuObj.style.posTop=el.offsetHeight;
	MenuObj.className="menushow";
	MenuObj.setCapture();
}
function MouseOverRightMenu() 
{   
	var el=event.srcElement;
	if (el.tagName!='TD') return;
	if (el.ExeFunction==null) return;
	if (el.style.backgroundColor=="highlight") {el.style.backgroundColor='';el.style.color='black';}
	else {el.style.backgroundColor="highlight";el.style.color='white';}
}
function ClickMenu(MenuObj)
{
	var CurrObj=null;
	var IMGObj=document.body.getElementsByTagName('IMG');
	for (var i=0;i<IMGObj.length;i++)
	{
		CurrObj=IMGObj(i);
		if (CurrObj.className=='BtnMouseOver') CurrObj.className='';
	}
	var el=event.srcElement;
	MenuObj.releaseCapture();
	MenuObj.className="menu";
	for (var i=0;i<MenuObj.children.length;i++)
	{
		var CurrObj=MenuObj.children(i);
		for (var j=0;j<CurrObj.children.length;j++)
		{
			if (CurrObj.children(j).className=='MenuShow') {CurrObj.children(j).className='Menu';}	
		}
	}
	if (el.ExeFunction!=null) eval(el.ExeFunction);
}
function AuditOneContent(NewsID,ProductID)
{
	OpenWindow('Frame.asp?FileName=CheckContent.asp&OperateType=Check&PageTitle=审核新闻&NewsID='+NewsID+'&ProductID='+ProductID,220,105,window);
	location.href=location.href;
}
function UnAuditOneContent(NewsID,ProductID)
{
	OpenWindow('Frame.asp?FileName=CheckContent.asp&OperateType=UnCheck&PageTitle=q取消审核&NewsID='+NewsID+'&ProductID='+ProductID,220,105,window);
	location.href=location.href;
}
</script>
<body topmargin="2" leftmargin="2" onclick="ClickNewsOrProduct(event);" onselectstart="return false;">
<table width="100%" border="0" cellpadding="1" cellspacing="1" bgcolor="#999999">
  <tr bgcolor="#EEEEEE"> 
    <td height="26" colspan="5" valign="middle">
      <table width="100%" height="20" border="0" cellpadding="0" cellspacing="0">
        <tr>
		  <td width=55 align="center" alt="添加栏目" onClick="top.GetEkMainObject().location='ClassAdd.asp?ParentID=<% = ClassID %>';" onMouseMove="BtnMouseOver(this);" onMouseOut="BtnMouseOver(this);" class="BtnMouseOut">添加栏目</td>
		  <td width=2 class="Gray">|</td>
		  <td width=55 align="center" alt="添加内容" onClick="ShowAddMenu();" onMouseMove="BtnMouseOver(this);//ShowAddMenu();" onMouseOut="BtnMouseOver(this);" class="BtnMouseOut">添加内容</td>
		  <td width=2 class="Gray">|</td>
		  <td width=55 align="center" alt="新闻列表" onClick="top.GetEkMainObject().location='NewsList.asp?ClassID=<% = ClassID %>';" onMouseMove="BtnMouseOver(this);//ShowAddMenu();" onMouseOut="BtnMouseOver(this);" class="BtnMouseOut">新闻列表</td>
		  <td width=2 class="Gray">|</td>
		  <td width=55 align="center" alt="下载列表" onClick="top.GetEkMainObject().location='DownloadList.asp?ClassID=<% = ClassID %>';" onMouseMove="BtnMouseOver(this);//ShowAddMenu();" onMouseOut="BtnMouseOver(this);" class="BtnMouseOut">下载列表</td>
		  <td width=2 class="Gray">|</td>
		  <td width=55 align="center" alt="加入专区" onClick="AddToSpec();" onMouseMove="BtnMouseOver(this);" onMouseOut="BtnMouseOver(this);" class="BtnMouseOut">加入专区</td>
		  <td width=2 class="Gray">|</td>
		  <td width=35 align="center" alt="预览" onClick="Audit(1);" onMouseMove="BtnMouseOver(this);" onMouseOut="BtnMouseOver(this);" class="BtnMouseOut">审核</td>
		  <td width=2 class="Gray">|</td>
		  <td width=35 align="center" alt="预览" onClick="Audit(0);" onMouseMove="BtnMouseOver(this);" onMouseOut="BtnMouseOver(this);" class="BtnMouseOut">锁定</td>
		  <td width=2 class="Gray">|</td>

		  <td width=35 align="center" alt="预览" onClick="PreviewNews();" onMouseMove="BtnMouseOver(this);" onMouseOut="BtnMouseOver(this);" class="BtnMouseOut">预览</td>
		  <td width=2 class="Gray">|</td>
		  <td width=55 align="center" alt="搜索" onClick="ReViewManage();" onMouseMove="BtnMouseOver(this);" onMouseOut="BtnMouseOver(this);" class="BtnMouseOut">评论管理</td>
 		  <td width=2 class="Gray" style="display:none">|</td>
		  <td width=55 align="center" style="display:none" alt="取消搜索"onClick="CancelSearch();" onMouseMove="BtnMouseOver(this);" onMouseOut="BtnMouseOver(this);" class="BtnMouseOut">取消搜索</td>
		  <td width=2 class="Gray">|</td>
		  <td width=35 align="center" alt="后退" onClick="top.GetEkMainObject().history.back();" onMouseMove="BtnMouseOver(this);" onMouseOut="BtnMouseOver(this);" class="BtnMouseOut">后退</td>
		  <td>&nbsp; </td>
        </tr>
      </table>
	  </td>
  </tr>
</table>
<table width="100%" height="95%" border="0" cellpadding="0" cellspacing="0">
  <tr>
  	<td colspan="5" height="2"></td>
  </tr>
 <tr>
    <td valign="top">
	<table width="100%" border="0" cellspacing="0" cellpadding="0" >
        <tr> 
          <td width="40%" height="26" class="ButtonListLeft"> <div align="center">商品名称</div></td>
          <td nowrap class="ButtonList"> <div align="center">发布时间</div></td>
          <td width="10%" height="26" class="ButtonList"> <div align="center">状态</div></td>
          <td width="10%" height="26" class="ButtonList"> <div align="center">商品编号</div></td>
          <td width="10%" class="ButtonList"><div align="center">销售量</div></td>
          <td width="15%" class="ButtonList"> <div align="center">库存</div></td>
        </tr>
        <%

	Dim ProductSql,RsProductObj,Product_For_Var
	ProductSql = "Select * from FS_Shop_Products where ClassID='" & ClassID & "' order by Products_AddTime desc"
	Set RsProductObj = Server.CreateObject(G_FS_RS)
	RsProductObj.Open ProductSql,Conn,1,1
	if Not RsProductObj.Eof then
		Dim Product_Page_Size,Product_Page_No,Product_Page_Total,Product_Record_All
		Product_Page_Size = Conn.Execute("Select PerPageNum from FS_Shop_Config")(0)
		If Product_Page_Size="" or IsNull(Product_Page_Size) then Product_Page_Size=15
		Product_Page_No = Request.Querystring("Product_Page_No")
		if Product_Page_No <= 0 or Product_Page_No = "" then Product_Page_No = 1
		RsProductObj.PageSize = Product_Page_Size
		Product_Page_Total = RsProductObj.PageCount
		if (Cint(Product_Page_No) > Product_Page_Total) then Product_Page_No = Product_Page_Total
		RsProductObj.AbsolutePage = Product_Page_No
		Product_Record_All = RsProductObj.RecordCount
		for Product_For_Var = 1 to RsProductObj.PageSize
			if RsProductObj.Eof then Exit For
%>
        <tr> 
          <td height="22" nowrap> <table border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td><img src="../../Images/Folder/Ffolderclosed.gif" width="21" height="15"></td>
                <td nowrap><span ContentTypeStr="5" AuditTF="" class="TempletItem" ContentID="<% = RsProductObj("ID") %>" align="center"> 
                  <% = Left(RsProductObj("Product_Name"),23) %>
                  </span> </td>
              </tr>
            </table></td>
          <td nowrap> <div align="center" class="TempletItem"><%=RsProductObj("Products_AddTime")%> </div></td>
          <td height="22" nowrap> <div align="center" class="TempletItem"> 
              <% if RsProductObj("IsLock")=0 then
			  response.Write("<font color=blue>开放</font>")
		  else
			  response.Write("<font color=red>锁定</font>")
		  end if
		  %>
            </div></td>
          <td height="22" nowrap> <div align="center" class="TempletItem"> 
              <% = RsProductObj("Products_serial") %>
            </div></td>
          <td height="22" nowrap><div align="center"><%=RsProductObj("SaleNum")%></div></td>
          <%If RsProductObj("Products_Stockpile")<= RsProductObj("MinNum") then%>
          <td><div align="center" class="TempletItem"><font color=red><a href="../Mall/AllData.asp"><img src="../../Images/MinNum.gif" alt="库存少于警戒库存" width="7" height="12" border="0"></a><%=RsProductObj("Products_Stockpile")%></font></a></div></td>
          <%Else%>
          <td><div align="center" class="TempletItem"><%=RsProductObj("Products_Stockpile")%></div></td>
          <%End If%>
        </tr>
        <%
			RsProductObj.MoveNext
		Next
end if
%>
      </table>
</td>
  </tr>
  <tr> 
    <td height="20" class="ButtonListLeft">
<table width="100%" height="100%" border="0" cellpadding="3" cellspacing="0">
        <tr> 
          <td><div align="right"><% = ProductPageStr %>
            </div></td>
        </tr>
      </table></td>
  </tr>
</table>
</body>
</html> 
<div id="AddContentMenu" class="menu" onMouseOver="MouseOverRightMenu();" onMouseOut="MouseOverRightMenu();" onClick="ClickMenu(this);" style="display:none;"> 
  <table width="100%;" height="80" border="0" cellspacing="0" cellpadding="0" bgcolor="#eeeeee">
  <tr align="center">
    <td height="20" style="cursor:hand;" ExeFunction="top.GetEkMainObject().location='NewsWords.asp?ClassID='+ClassID;">文字新闻</td>
  </tr>
  <tr align="center">
    <td height="20" ExeFunction="top.GetEkMainObject().location='NewsPic.asp?ClassID='+ClassID;">图片新闻</td>
  </tr>
  <tr align="center">
    <td height="20" ExeFunction="top.GetEkMainObject().location='NewsTitle.asp?ClassID='+ClassID;">标题新闻</td>
  </tr>
  <tr align="center">
    <td height="20" ExeFunction="top.GetEkMainObject().location='download.asp?ClassID='+ClassID;">下&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;载</td>
  </tr>
  <tr align="center">
    <td height="20" ExeFunction="top.GetEkMainObject().location='../mall/mall_addProducts.asp?ClassID='+ClassID;">商&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;品</td>
  </tr>

</table>
</div>
<%
Set RsProductObj = Nothing
Set Conn = Nothing
Function ProductPageStr()
	ProductPageStr = "位置:<b>"& Product_Page_No &"</b>/<b>"& Product_Page_Total &"</b>&nbsp;&nbsp;&nbsp;"
	if Product_Page_Total = 1 then
		ProductPageStr = ProductPageStr & "&nbsp;<img src=""../../images/FirstPage.gif"" border=0 alt=首页>&nbsp;" & Chr(13) & Chr(10)
		ProductPageStr = ProductPageStr & "&nbsp;<img src=""../../images/prePage.gif"" border=0 alt=上一页>&nbsp;" & Chr(13) & Chr(10)
		ProductPageStr = ProductPageStr & "&nbsp;<img src=""../../images/nextPage.gif"" border=0 alt=下一页>&nbsp;" & Chr(13) & Chr(10)
		ProductPageStr = ProductPageStr & "&nbsp;<img src=""../../images/endPage.gif"" border=0 alt=尾页>&nbsp;" & Chr(13) & Chr(10)
	else
		if cint(Product_Page_No) <> 1 and cint(Product_Page_No) <> Product_Page_Total then
			ProductPageStr = ProductPageStr & "&nbsp;<span onclick=""ChangePageNO('1','Products_Page_No');"" style=""cursor:hand;""><img src=""../../images/FirstPage.gif"" border=0 alt=首页></span>&nbsp;" & Chr(13) & Chr(10)
			ProductPageStr = ProductPageStr & "&nbsp;<span onclick=""ChangePageNO('" & Product_Page_No - 1 & "','Product_Page_No');"" style=""cursor:hand;""><img src=../../images/prePage.gif border=0 alt=上一页></span>&nbsp;" & Chr(13) & Chr(10)
			ProductPageStr = ProductPageStr & "&nbsp;<span onclick=""ChangePageNO('" & Product_Page_No + 1 & "','Product_Page_No');"" style=""cursor:hand;""><img src=../../images/nextPage.gif border=0 alt=下一页></span>&nbsp;" & Chr(13) & Chr(10)
			ProductPageStr = ProductPageStr & "&nbsp;<span onclick=""ChangePageNO('" & Product_Page_Total & "','Product_Page_No');"" style=""cursor:hand;""><img src=../../images/endPage.gif border=0 alt=尾页></span>&nbsp;" & Chr(13) & Chr(10)
		elseif cint(Product_Page_No) = 1 then
			ProductPageStr = ProductPageStr & "&nbsp;<img src=../../images/FirstPage.gif border=0 alt=首页>&nbsp;" & Chr(13) & Chr(10)
			ProductPageStr = ProductPageStr & "&nbsp;<img src=../../images/prePage.gif border=0 alt=上一页>&nbsp;" & Chr(13) & Chr(10)
			ProductPageStr = ProductPageStr & "&nbsp;<span onclick=""ChangePageNO('" & Product_Page_No + 1 & "','Product_Page_No');"" style=""cursor:hand;""><img src=../../images/nextPage.gif border=0 alt=下一页></span>&nbsp;" & Chr(13) & Chr(10)
			ProductPageStr = ProductPageStr & "&nbsp;<span onclick=""ChangePageNO('" & Product_Page_Total & "','Product_Page_No');"" style=""cursor:hand;""><img src=../../images/endpage.gif border=0 alt=尾页></span>&nbsp;" & Chr(13) & Chr(10)
		else
			ProductPageStr = ProductPageStr & "&nbsp;<span onclick=""ChangePageNO('1','Product_Page_No');"" style=""cursor:hand;""><img src=../../images/FirstPage.gif border=0 alt=首页></span>&nbsp;" & Chr(13) & Chr(10)
			ProductPageStr = ProductPageStr & "&nbsp;<span onclick=""ChangePageNO('" & Product_Page_No - 1 & "','Product_Page_No');"" style=""cursor:hand;""><img src=../../images/prePage.gif border=0 alt=上一页></span>&nbsp;" & Chr(13) & Chr(10)
			ProductPageStr = ProductPageStr & "&nbsp;<img src=../../images/nextPage.gif border=0 alt=下一页></span>&nbsp;" & Chr(13) & Chr(10)
			ProductPageStr = ProductPageStr & "&nbsp;<img src=../../images/endpage.gif border=0 alt=尾页>&nbsp;" & Chr(13) & Chr(10)
		end if
	end if
End Function
%>

⌨️ 快捷键说明

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