📄 storagelist.asp

📁 本系统是基于B/S结构的客户关系管理系统. 测试管理员和密码是super 用户名super 密码super 前台和后台是一次性同时登陆的系统工能介绍: 客户管理---------- 添

💻 ASP

字号:

<!--#include file="../function/connect.asp"-->
<%
	strsql="select p.*,c1.cat1_name,c2.cat2_name from products p,cat1 c1,cat2 c2 where product_cat1_id=cat1_id and product_cat2_id=cat2_id "
	Set objRs = Server.CreateObject("adodb.recordset")
	    objRs.Open strsql,objConn,1,1
%>
<html>
<head>
<title>产品</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="../cssD.css" rel=stylesheet>
<script>
	function checkNum()
	{
		rNum=0;
		var actID=document.all.IID;
		for(i=1;i<actID.length;i++){
			if(actID[i].checked==true){
				rNum=rNum +1 ;
			}
		}
		return rNum;
	}
	function checkAll()
	{
		var actID=document.all.IID;
		if(document.form1.checkall.checked==false){
			for(i=0;i<actID.length;i++){
				actID[i].checked=false;
			}
		}else{
			for(i=0;i<actID.length;i++){
				actID[i].checked=true;
			}
		}
	}
	function modify()
	{
		if(checkNum()!=1)
		{
			alert('修改的项目只能是一个.');
		}else{
			document.form1.action="editStorage.asp";
			document.form1.submit();
		}
	}
</script>
</head>

<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="103%" border="1" cellspacing="0" cellpadding="2" bordercolorlight='#000000' bordercolordark='#FFFFFF'>
 <form name="form1" method="post" action="editStorage.asp">
  <tr class="tablehead"> 
    <td width="4%"><input type="checkbox" name="checkall" value="1" onclick="checkAll();"><input type="checkbox" name="IID" value="0" disabled style="display:none;"></td>
    <td width="30%" nowrap> 
      <div align="center">产品名称</div>
    </td>
    <td width="10%" nowrap> 
      <div align="center">产品编码</div>
    </td>
     <td width="10%" nowrap> 
      <div align="center">产品规格</div>
    </td>
    <td width="10%" nowrap> 
      <div align="center">产品大类</div>
    </td>
    <td width="10%" nowrap> 
      <div align="center">产品小类</div>
    </td>
    <td width="10%" nowrap> 
      <div align="center">成本价</div>
    </td>
    <td width="10%" nowrap> 
      <div align="center">库存</div>
    </td>
  </tr>
  <%if not objrs.eof then
  	do while not objrs.eof
  %>
  <tr align="center"> 
        <td width="4%" class="tablehead">
        <input type="checkbox" name="IID" value="<%=objrs.fields("product_id")%>">
      </td>
    <td width="30%" nowrap>&nbsp;<a href="editproduct.asp?IID=<%=objrs.fields("product_id")%>"><%=objrs.fields("product_name")%></a></td>
    <td width="10%" nowrap>&nbsp;<%=objrs.fields("product_code")%></td>
    <td width="10%" nowrap>&nbsp;<%=objrs.fields("product_standard")%></td>
    <td width="10%" nowrap>&nbsp;<%=objrs.fields("cat1_name")%></td>
    <td width="10%" nowrap>&nbsp;<%=objrs.fields("cat2_name")%></td>
    <td width="10%" nowrap>&nbsp;<%=objrs.fields("product_cost")%></td>
    <td width="10%" nowrap>&nbsp;<%=objrs.fields("product_num")%></td>
  </tr>
  <%
  	objrs.movenext
  	loop
  else%>
  <tr align="center"> 
	  <td colspan="9">
	  	没有库存产品
	  </td>
  </tr>
  <%end if%>
    <input type="hidden" name="meth" value="del">

  <tr align="center"> 
	  <td colspan="9">
	  	<input type="button" value=" 修改库存 " class="button" onclick="modify();">
	  </td>
  </tr>
    </form>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -