gusucode.com > ASP+ACCESS学生排课管理系统毕业设计(源代码+论文) > ASP+ACCESS学生排课管理系统毕业设计(源代码+论文)\ASP+SQL学生排课管理系统\ArrangeCourse\selectInterval\setInterval.asp
<!--#include file="../../include/keepHouse.asp"-->
<HTML>
<HEAD>
<TITLE>设定选课时间段</TITLE>
<script language="JavaScript">
<!--
function validate(field){
var Field = document.frmSetInterval.field.value;
if (Field==""){
alert("必须完整填写选课时间段");
return false;
}
}
-->
</script>
</HEAD>
<BODY>
<!--#include file="../../include/header.asp"-->
<%
if session("USER_TYPE")<>"Admin" then
Response.Redirect("../default.asp")
end if
%>
<br>
<form name="frmSetInterval" action="saveInterval.asp" method="POST"
onsubmit="javascript:(retrun validate(beginMon))&&(retrun validate(veginDate))
&&(retrun validate(endMon))&&(retrun validate(endDate))">
<TABLE cellSpacing=1 cellPadding=1 width="301" align=center border=0>
<TR>
<%
dim beginMon,beginDay,endMon,endDay,beginTime,endTime
sql="select * from CourseSelectInterval"
openDB
rs.open sql,conn,1,1
beginTime=rs("BEGIN_TIME")
endTime=rs("END_TIME")
closeDB
beginMon=Month(beginTime)
beginDay=Day(beginTime)
endMon=Month(endTime)
endDay=Day(endTime)
%>
<TD width="96">开始选课时间</TD>
<TD width="191"><input type="text" name="beginMon" size="9" value="<%=beginMon%>">月
<input type="text" name="beginDate" size="9" value="<%=beginDay%>">日</TD>
</TR>
<TR>
<TD width="96">结束选课时间</TD>
<TD width="191"><input type="text" name="endMon" size="9" value="<%=endMon%>">月
<input type="text" name="endDate" size="9" value="<%=endDay%>">日</TD>
</TR>
<TR>
<TD width="287" colspan="2">
<input type="submit" value="提交" name="B1">  
<input type="reset" value="重置" name="B2">
</TD>
</TR>
</TABLE>
</fom>
</form>
<br>
<!--#include file="../../include/footer.asp"-->
</BODY>
</HTML>