gusucode.com > ASP+ACCESS学生排课管理系统毕业设计(源代码+论文) > ASP+ACCESS学生排课管理系统毕业设计(源代码+论文)\ASP+SQL学生排课管理系统\ArrangeCourse\selectInterval\saveInterval.asp
<!--#include file="../../include/ADOVBS.asp"--> <!--#include file="../../include/keepHouse.asp"--> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title>保存设置</title> </head> <body> <% dim beginYear,beginMon,beginDate,endYear,endMon,endDate,beginTime,endTime beginMon=request.form("beginMon") beginDate=request.form("beginDate") endMon=request.form("endMon") endDate=request.form("endDate") if(beginMon="" or beginDate="" or endMon="" or endDate="") then trigErr end if beginYear=Year(Date) endYear=beginYear beginTime=beginYear&"-"&beginMon&"-"&beginDate endTime=endYear&"-"&endMon&"-"&endDate beginTime=Cdate(beginTime) endTime=Cdate(endTime) openDB sql="EXEC setSelectInterval '"&beginTime&"','"&endTime&"',1" conn.execute(sql) closeDB showmsg("设置成功!") %> </body> </html>