⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 frm_zsgcrb_form.asp

📁 一套石油公司内部的运营管理系统
💻 ASP
字号:
<!--#include virtual="/include/DBCon.inc"-->
<%
%>
<html>
<head>
<title>油田采油工艺综合管理系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="/css/oil.css" type="text/css">
<SCRIPT LANGUAGE=javascript>
<!--
function dateCh() {
	form1.submit();
}
-->
</SCRIPT>
</head>

<%
nowyear=year(now)
nowmonth=month(now)
if request("year")<>"" then
	nowyear=request("year")
end if
if request("month")<>"" then
	nowmonth=request("month")
end if
cy=nowyear
cm=nowmonth
fdate=cdate(nowyear & "-" & nowmonth& "-1")
if nowmonth=12 then
	nowmonth=1
	nowyear=nowyear+1
else
	nowmonth=nowmonth+1
end if
ldate=cdate(nowyear & "-" & nowmonth & "-1")-1
dayOfweek=datepart("w",fdate)
dayNum=ldate-fdate+1
start=0
%>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"><br>
	<span class="subject">注水工程日报</span> 
	<hr size="1" class=hr width="98%" align="center"><br>
	<form action="" method=post name=form1>
	<table width="90%" border=0 align="center" cellpadding="0" cellspacing="0">
	  <tr> 
		<td width="40%">&nbsp;<font color=black><%=cy%>年<%=cm%>月</td>
		<td width="60%" align=right>
		  <select name=year>
			<%for i=0 to 19%>
			<option value="<%=2000+i%>" <%if cint(cy)=cint(2000+i) then response.write "selected" end if%>><%=2000+i%></option>
			<%next%>
		  </select>年
		  <select name=month onchange=dateCh()>
			<%for i=0 to 11%>
			<option value="<%=i+1%>" <%if cint(cm)=cint(i+1) then response.write "selected" end if%>><%=i+1%></option>
			<%next%>
		  </select>月
		</td>
	  </tr>
	</table>
	<table width=90% border="1" cellspacing="0" cellpadding="2" bordercolordark="#F8EDEB" bordercolor="#000000" class=table2>
	<tr>
		<td width=14% height=40 class=title align=center><img src=/images/w7.gif width=75></td>
		<td width=14% class=title align=center><img src=/images/w1.gif width=75></td>
		<td width=14% class=title align=center><img src=/images/w2.gif width=75></td>
		<td width=14% class=title align=center><img src=/images/w3.gif width=75></td>
		<td width=14% class=title align=center><img src=/images/w4.gif width=75></td>
		<td width=14% class=title align=center><img src=/images/w5.gif width=75></td>
		<td width=14% class=title align=center><img src=/images/w6.gif width=75></td>
	</tr>
	<%for i=0 to 5%>
	<tr height=34>
		<%for j=i*7 to (i+1)*7-1%>
		<td align=center>
			<%
			if start=0 and j+1=dayOfweek then
				start=1
				response.write "<a href=frm_zsgcrb.asp?year=" &cy& "&month=" &cm& "&day=" &start& "><font style='COLOR: 000000; CURSOR: hand; FONT-FAMILY: Monotype Corsiva; FONT-SIZE: 18pt'>" & start & "</font></a>"
			else if start=0 or start>=dayNum then
				response.write "&nbsp"
				else if start>=1 then
						start=start+1
						response.write "<a href=frm_zsgcrb.asp?year=" &cy& "&month=" &cm& "&day=" &start& "><font style='COLOR: 000000; CURSOR: hand; FONT-FAMILY: Monotype Corsiva; FONT-SIZE: 18pt'>" &start & "</font></a>"
					  end if
			    end if
			end if
			%>
		</td>
		<%next%>
	</tr>
	<%next%>
	</table>
	</form>
</body>
</html>
<!--#include virtual="/include/DBClose.inc"-->

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -