📄 subscription.asp
字号:
<%
fusername=request.form("username")
fpassword=request.form("password")
fclass=request.form("class")
fweek=request.form("week")
fmonth=request.form("month")
'fyear= left(now(),4)
fyear=request.form("year")
connstr = "DBQ="+server.mappath("classroom.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;ImplicitCommitSync=Yes;MaxBufferSize=512;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UserCommitSync=Yes;"
Set Conn = Server.CreateObject("ADODB.Connection")
set rs=server.createobject("adodb.recordset")
conn.open connstr
sql="select * from userpwd where username='"&trim(fusername)&"'"
rs.open sql,Conn,1,1
if rs.recordcount=0 then
errormessage="对不起，你输入的用户名不存在!"
error=1
else
if rs("password")<>trim(fpassword) then
errormessage="对不起，你输入的密码不正确!"
error=1
end if
end if
connstr = "DBQ="+server.mappath("classroom.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;ImplicitCommitSync=Yes;MaxBufferSize=512;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UserCommitSync=Yes;"
Set Conn = Server.CreateObject("ADODB.Connection")
set rs=server.createobject("adodb.recordset")
Conn.open connstr
sql="select * from "&trim(fclass)&" where week='"&trim(fweek)&"' and month='"&trim(fmonth)&"' and year='"&fyear&"'"
'response.Write(sql)
rs.open sql,Conn,1,1
if rs.recordcount=0 then
dim instr
instr="insert into "&trim(fclass)&"(year,month,week)values('"&fyear&"','"&trim(fmonth)&"','"&trim(fweek)&"')"
'response.Write(instr)
conn.execute(instr)
rs.close
rs.open sql,Conn,1,1
end if
'if rs.recordcount=0 then
' errormessage="对不起，你选择的第几周不存在!"
' error=1
' end if
if error=1 then
response.write "<center>"&errormessage&"</center><br><br>"
response.write "<center><a href='javascript:history.go(-1);'>请重新输入</a></center>"
else
fyear=rs("year")
fmonth= rs("month")
fweek=rs("week")
fa1=rs("a1")
fa2=rs("a2")
fa3=rs("a3")
fa4=rs("a4")
fa5=rs("a5")
fa6=rs("a6")
fa7=rs("a7")
fa8=rs("a8")
fa9=rs("a9")
fa10=rs("a10")
fa11=rs("a11")
fa12=rs("a12")
fa13=rs("a13")
fb1=rs("b1")
fb2=rs("b2")
fb3=rs("b3")
fb4=rs("b4")
fb5=rs("b5")
fb6=rs("b6")
fb7=rs("b7")
fb8=rs("b8")
fb9=rs("b9")
fb10=rs("b10")
fb11=rs("b11")
fb12=rs("b12")
fb13=rs("b13")
fc1=rs("c1")
fc2=rs("c2")
fc3=rs("c3")
fc4=rs("c4")
fc5=rs("c5")
fc6=rs("c6")
fc7=rs("c7")
fc8=rs("c8")
fc9=rs("c9")
fc10=rs("c10")
fc11=rs("c11")
fc12=rs("c12")
fc13=rs("c13")
fd1=rs("d1")
fd2=rs("d2")
fd3=rs("d3")
fd4=rs("d4")
fd5=rs("d5")
fd6=rs("d6")
fd7=rs("d7")
fd8=rs("d8")
fd9=rs("d9")
fd10=rs("d10")
fd11=rs("d11")
fd12=rs("d12")
fd13=rs("d13")
fe1=rs("e1")
fe2=rs("e2")
fe3=rs("e3")
fe4=rs("e4")
fe5=rs("e5")
fe6=rs("e6")
fe7=rs("e7")
fe8=rs("e8")
fe9=rs("e9")
fe10=rs("e10")
fe11=rs("e11")
fe12=rs("e12")
fe13=rs("e13")
ff1=rs("f1")
ff2=rs("f2")
ff3=rs("f3")
ff4=rs("f4")
ff5=rs("f5")
ff6=rs("f6")
ff7=rs("f7")
ff8=rs("f8")
ff9=rs("f9")
ff10=rs("f10")
ff11=rs("f11")
ff12=rs("f12")
ff13=rs("f13")
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>会议室预约</title>
<script language="JavaScript">
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -->
</script>
<style type="text/css">
<!--
@import url("css.css");
.STYLE1 {
font-size: 12px;
font-weight: bold;
}
.STYLE2 { color: #0000FF;
font-size: 16px;
}
-->
</style>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<META content="Microsoft FrontPage 4.0" name=GENERATOR>
<META content=FrontPage.Editor.Document name=ProgId>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
<script language="JavaScript">
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -->
</script>
<script language="JavaScript">
<!--
var caution = false
function setCookie(name, value, expires, path, domain, secure) {
var curCookie = name + "=" + escape(value) +
((expires) ? "; expires=" + expires.toGMTString() : "") +
((path) ? "; path=" + path : "") +
((domain) ? "; domain=" + domain : "") +
((secure) ? "; secure" : "")
if (!caution || (name + "=" + escape(value)).length <= 4000)
document.cookie = curCookie
else
if (confirm("Cookie exceeds 4KB and will be cut!"))
document.cookie = curCookie
}
function getCookie(name) {
var prefix = name + "="
var cookieStartIndex = document.cookie.indexOf(prefix)
if (cookieStartIndex == -1)
return null
var cookieEndIndex = document.cookie.indexOf(";", cookieStartIndex + prefix.length)
if (cookieEndIndex == -1)
cookieEndIndex = document.cookie.length
return unescape(document.cookie.substring(cookieStartIndex + prefix.length, cookieEndIndex))
}
function deleteCookie(name, path, domain) {
if (getCookie(name)) {
document.cookie = name + "=" +
((path) ? "; path=" + path : "") +
((domain) ? "; domain=" + domain : "") +
"; expires=Thu, 01-Jan-70 00:00:01 GMT"
}
}
function fixDate(date) {
var base = new Date(0)
var skew = base.getTime()
if (skew > 0)
date.setTime(date.getTime() - skew)
}
var now = new Date()
fixDate(now)
now.setTime(now.getTime() + 365 * 24 * 60 * 60 * 1000)
// -->
</script>
</head>
<body bgcolor=#ffffff marginheight=5 leftmargin=5 marginwidth=5>
<div align="center"><img src="IMAGES/logo.jpg" width="440" height="150">
<br>
<script language="JavaScript">
today=new Date();
function initArray(){
this.length=initArray.arguments.length
for(var i=0;i<this.length;i++)
this[i+1]=initArray.arguments[i] }
var d=new initArray(
"星期日",
"星期一",
"星期二",
"星期三",
"星期四",
"星期五",
"星期六");
document.write(
"<font color=##FF90C0 style='font-size:10pt;font-family: 宋体'> ",
today.getYear(),"年",
today.getMonth()+1,"月",
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -