📄 e_reintj.asp
字号:
<!--#include file="../include/Pubconn.asp"-->
<%
year1=request("year1")
month1=request("month1")
date1=request("date1")
if year1<>"" and month1<>"" and date1<>"" then
total1=year1+"-"+month1+"-"+date1
end if
year2=request("year2")
month2=request("month2")
date2=request("date2")
if year2<>"" and month2<>"" and date2<>"" then
total2=year2+"-"+month2+"-"+date2
end if
'首先找出所有的部门
set rsbm=Server.CreateObject("ADODB.RecordSet")
sql="select * from A_DepartInfo where delflag<>'1'"
rsbm.open sql,Pubconn,1
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>单据查询</title><link href="../cread.css" rel="stylesheet" type="text/css">
</head>
<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="E_reintj.asp" name="myform">
<p>
<table border="0" cellspacing="0" width="100%" align="center" bgcolor="#F1E8DA">
<tr>
<td width="58" align="center" width="96" width="123" bgcolor="#F1E8DA">
<p align="right">
<font size="2">客诉日期
</font>
</p>
</td>
<td width="478" align="center" width="263" width="243" bgcolor="#F1E8DA">
<p align="left">
<font size="2">
<input type="text" size="4" name="year1" <%if year1<>"" then %> value="<%=year1%>" <%end if%> value="<%=year(date())%>">年
<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())%>">年<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>日
<input type="submit" value="查询" class="hand" style="background-color: #D1D1D1; border-style: solid; border-width: 1" >
</p>
</font>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -