saveinterval.asp

来自「一个学生选棵系统的毕业论文」· ASP 代码 · 共 33 行

ASP
33
字号
<!--#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>

⌨️ 快捷键说明

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