📄 cukudan.asp
字号:
<!--#include file="../conn.asp"-->
<!--#include file="../Inc/syscode.asp"-->
<html>
<head>
<title>出货单据</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../css/test.css" rel="stylesheet" type="text/css">
<link href="../css/body.css" rel="stylesheet" type="text/css">
<link href="../css/calendar-blue.css" rel="stylesheet" type="text/css">
<script src="../Js/Calendar.js"></script>
<script language="JavaScript">
<!--
function ckmodi(){
if (document.ck_id.id.value==""){
alert('请选择要修改的记录！');
return false;
}
window.open("jdingdan_modi.asp?id=" + document.ck_id.id.value,"opener","width=750,height=385,resizable=no,scrollbars=no,statue=no,toolbar=no,menubar=no,location=no,left=150,top=80");
}
function ckview(id,bill_bh){
window.open("xiaoshou_view.asp?stockout_id="+id+"&bill_bh="+bill_bh,"_blank","height=385,width=750,resizable=no,scrollbars=no,statue=no,toolbar=no,menubar=no,location=no,left=150,top=80");
}
//-->
</script>
<style type="text/css">
<!--
.STYLE1 {color: #FF0000}
-->
</style>
</head>
<body topmargin="0" leftmargin="0">
<table width="100%" border="0" bgcolor="#E8E8E8">
<form name="form1" method="post" action="">
<tr>
<td width="18%" bgcolor="#FFFFFF"><span class="STYLE1">出仓单列表(双击看明细)</span></td>
<td width="14%" bgcolor="#FFFFFF">类型：
<select name="stockouttype_name" id="stockouttype_name">
<% set rstype=conn.execute("select * from ht_stockouttype ")
do while not rstype.eof
if rstype("stockouttype_name")=request("Stockouttype_name") then %>
<option value="<%=rstype("Stockouttype_name")%>" selected><%=rstype("Stockouttype_name")%></option>
<%
end if%>
<option value="<%=rstype("Stockouttype_name")%>"><%=rstype("Stockouttype_name")%></option>
<% rstype.movenext
loop
%>
</select>
</td>
<td width="68%" bgcolor="#FFFFFF">时间查询
<input name="fromtime" type="text" id="fromtime" readonly size="10" value="<%
if request("fromtime")="" then
response.Write date-30
else
response.Write request("fromtime")
end if
%>">
<span class="font"><A onClick="return showCalendar('fromtime', 'y-mm-dd');" href="#"><img src="../Images/Button.gif" id="IMG2" align="absMiddle" border="0" /></A></span> 到：
<input name="totime" type="text" readonly id="totime" size="10" value="<%
if request("totime")="" then
response.Write date()
else
response.Write request("totime")
end if
%>">
<span class="font"><A onClick="return showCalendar('totime', 'y-mm-dd');" href="#"><img src="../Images/Button.gif" id="IMG2" align="absMiddle" border="0" /></A></span>
<input name="chaxun" type="submit" id="chaxun" value="查询">
<input type="button" name="Submit" value="全部" onClick=location.href="cukudan.asp"></td>
</tr>
</form>
</table>
<table width="100%" height="24" border="0" align="center" cellspacing="0">
<tr align="center" class="borderon">
<td width="10%" class="borderon">出仓单号</td>
<td width="10%" class="borderon">日期</td>
<td width="10%" class="borderon">类型</td>
<td width="10%" class="borderon">发货仓库</td>
<td width="10%" class="borderon">收货仓库</td>
<td width="10%" class="borderon">总项数</td>
<td width="10%" class="borderon">总数量</td>
<td width="10%" class="borderon">总金额</td>
<td width="10%" class="borderon">发货人</td>
<td width="10%" class="borderon">收货人</td>
</tr>
</table>
<table width="100%" border="0" align="center" cellspacing="1" bgcolor="#E8E8E8" id="masterdiv">
<%
dim curpage,fromtime,totime
fromtime=request("fromtime")
totime=request("totime")
type_name=request("stockouttype_name")
if fromtime>totime then
response.Write("对不起，查询日期出错，请重新选择")
end if
if request("curpage")="" then
curpage=1
else
curpage=request("curpage")
end if
if not isnumeric(trim(request("curpage"))) then
curpage=1
end if
if cint(curpage)=0 then
curpage=1
end if
const numperpage=20
set rs=server.createobject("adodb.recordset")
if request("fromtime")<>"" then
sql="select * from ht_Stockoutmaster where type='"&type_name&"' and Stockout_date>=#"&fromtime&"# and Stockout_date<=#"&totime&"# order by stockout_date desc"
else
sql="select * from ht_stockoutmaster order by stockout_date desc"
end if
rs.open sql,conn,1,1
if rs.eof then
response.write "<table><tr><td><br></br><center>暂无数据，请添加！</center><br></br></td></tr></table>"
end if
if not rs.eof then
rs.pagesize=numperpage
dim totalpages
totalpages=rs.pagecount
if cint(curpage)>cint(totalpages) then
curpage=totalpages
end if
rs.absolutepage=curpage
end if
dim count
count=0
i=1
do while not rs.eof and count<numperpage
%>
<tr id=<%=i%> bgcolor="#FFFFFF" title="双击查看详细内容！" onDblClick="ckview('<%=trim(rs("stockout_id"))%>','<%=trim(rs("number"))%>')" onMouseOver=this.bgcolor="#FF0000">
<td width="10%"><div align="center"><%=trim(rs("stockout_id"))%></div></td>
<td width="10%"><div align="center"><%=trim(rs("stockout_date"))%></div></td>
<td width="10%"><div align="center"><%=trim(rs("type"))%></div></td>
<td width="10%"><div align="center"><%=trim(rs("storehouseout"))%></div></td>
<td width="10%"><div align="center"><%=trim(rs("storehousein"))%></div></td>
<td width="10%"><div align="center"><%=trim(rs("Totalitems"))%></div></td>
<td width="10%"><div align="center"><%=trim(rs("Totalnumber"))%></div></td>
<td width="10%"><div align="center"><%=trim(rs("Totalmoney"))%></div></td>
<td width="10%"><div align="center"><%=trim(rs("operator"))%></div></td>
<td width="10%"><div align="center"><%=trim(rs("Receiveman"))%></div></td>
</tr>
<%
rs.movenext
i=i+1
count=count+1
loop
rs.close
set rs=nothing
closedataconn
%>
</table>
<table width="100%" border="0" align="center">
<tr>
<td> <div align="center"><% call PageNum(curpage,totalpages,"?curpage=") %></div></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -