📄 k_intj.asp
字号:
end sub
</script>
<body bgcolor="#FFFFFF">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>
<td width="100%"><b><font size="3"><img border="0" src="../pic/it_22.gif"></font> <font size="2"> 入库统计查询
</font>
</b><hr width="40%" size="1" align="left">
</td>
</tr>
</table>
<form method="post" action="k_intj.asp" name="myform">
<table border="0" cellspacing="0" width="574" align="center" width="630" width="636">
<tr>
<td width="71" align="right" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA" >
<font size="2">出库日期
</font>
</td><td width="459" colspan="2" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA">
<font size="2">
<input type="text" size="4" name="year1" <%if year1<>"" then%> value="<%=year1%>" <%end if %> value="<%=year(date())%>" maxlength="4">年
<select name="month1" style="width: 51; height: 23" size="1">
<option value=""></option>
<%for i=1 to 9%>
<option value="<%="0"&i%>" <%
if month1<>"" then
if cint(month1)=i then
response.write ("selected")
end if
end if
%>
><%="0"&i%></option>
<%next%>
<%for i =10 to 12%>
<option value="<%=i%>" <%
if month1<>"" then
if cint(month1)=i then
response.write ("selected")
end if
end if
%>
><%=i%></option>
<%next%>
</select>月<select name="date1" style="width: 51; height: 23" size="1">
<option value=""></option>
<%for i=1 to 9%>
<option value="<%="0"&i%>" <%
if date1<>"" then
if cint(date1)=i then
response.write ("selected")
end if
end if
%>
><%="0"&i%></option>
<%next%>
<%for i =10 to 31%>
<option value="<%=i%>" <%
if date1<>"" then
if cint(date1)=i then
response.write ("selected")
end if
end if
%>
><%=i%></option>
<%next%>
</select>日 至
<input type="text" size="4" name="year2" <%if year2<>"" then%> value="<%=year2%>" <%end if %> value="<%=year(date())%>" maxlength="4">年
<select name="month2" style="width: 51; height: 23" size="1">
<option value=""></option>
<%for i=1 to 9%>
<option value="<%="0"&i%>" <%
if month2<>"" then
if cint(month2)=i then
response.write ("selected")
end if
end if
%>
><%="0"&i%></option>
<%next%>
<%for i =10 to 12%>
<option value="<%=i%>" <%
if month2<>"" then
if cint(month2)=i then
response.write ("selected")
end if
end if
%>
><%=i%></option>
<%next%>
</select>月<select name="date2" style="width: 51; height: 23" size="1">
<option value=""></option>
<%for i=1 to 9%>
<option value="<%="0"&i%>" <%
if date2<>"" then
if cint(date2)=i then
response.write ("selected")
end if
end if
%>
><%="0"&i%></option>
<%next%>
<%for i=10 to 31%>
<option value="<%=i%>" <%
if date2<>"" then
if cint(date2)=i then
response.write ("selected")
end if
end if
%>
><%=i%></option>
<%next%>
</select>日
</font>
</td>
</tr>
<tr>
<td width="71" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA" align="right">
<font size="2">
仓库
</font>
</td>
<td width="176" align="right" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA" >
<p align="left">
<font size="2">
<select size="1" name="ckxh" style="width: 131; height: 23">
<option value="">全部</option>
<%for i=0 to UBound(storemc) %>
<option value="<%=storemc(i)%>" <%if ckxh=storemc(i) then%> selected <%end if %>><%=storemc(i)%></option>
<%next %> </select>
</font>
</td>
<td width="283" align="right" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA" >
<p align="left">
<font size="2"><input type="submit" value="查询" class="hand" style="background-color: #D1D1D1; border-style: solid; border-width: 1" >
</font>
</td>
</tr>
</table>
<p align="center">
<%
if rstj.eof then%>
<font size="2">无记录！<font size="2"><a href="k_tjcx.htm">返回</a>
<%
response.end
else
if request.querystring("page")<>"" then
page=cint(request.querystring("page"))
else
page=1
end if
rstj.pagesize=10
if page>=rstj.pagecount then
page=rstj.pagecount
else
if page<1 then
page=1
end if
end if
rstj.absolutepage=page
%>
<div align="center" style="width: 655; height: 62">
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -