📄 storagechecklist.asp
字号:
<!--#include file="../function/connect.asp"-->
<%
meth=request("meth")
if meth="del" and request("IID")<>"" then
strsql="delete from Storages_Check where Storage_Check_ID in (" & request("IID") &")"
objConn.execute strsql
end if
strsql="select p.*,s.*,c1.cat1_name,c2.cat2_name from products p,cat1 c1,cat2 c2,Storages_Check s where Product_Category_ID=cat1_id and Product_CategoryII_ID=cat2_id and s.Product_ID=p.Product_ID order by Create_Date desc"
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="editStorageCheck.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="StorageChecklist.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>
<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("Storage_Check_ID")%>">
</td>
<td width="30%" nowrap> <%=objrs.fields("product_name")%></td>
<td width="10%" nowrap> <%=objrs.fields("product_code")%></td>
<td width="10%" nowrap> <%=objrs.fields("product_standard")%></td>
<td width="10%" nowrap> <%=objrs.fields("cat1_name")%></td>
<td width="10%" nowrap> <%=objrs.fields("cat2_name")%></td>
<td width="10%" nowrap>
<%if objrs.fields("Check_Flag")=0 then%>
盈余
<%else%>
散失
<%end if%>
</td>
<td width="10%" nowrap> <%=objrs.fields("Quantity")%></td>
<td width="10%" nowrap> <%=objrs.fields("Cost_Price")%></td>
<td width="10%" nowrap> <%=objrs.fields("Amount")%></td>
<td width="10%" nowrap> <%=objrs.fields("Note")%></td>
</tr>
<%
objrs.movenext
loop
else%>
<tr align="center">
<td colspan="11">
没有库存产品
</td>
</tr>
<%end if%>
<input type="hidden" name="meth" value="del">
<tr align="center">
<td colspan="11">
<input type="submit" value=" 删除 " class="button"> <input type="button" value=" 修改 " class="button" onclick="modify();">
</td>
</tr>
</form>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -