?? main.asp
字號:
<%
if session("AdminUser")="" then
response.Redirect("index.asp")
end if
Set hdobj = Server.CreateObject("HD.comOpen")'請保證此行在最前面
Connkaa = hdobj.WeekaaConn()
BB=session("sqlName")
Set rss = Server.CreateObject("Adodb.RecordSet")
sqlch = "Select * From [school] where a='"&BB&"'"
rss.Open sqlch, Connkaa, 1, 3
session("SchoolName")=rss("b")
stuSum=0
Set ros = Server.CreateObject("Adodb.RecordSet")
sqlch = "Select * From [student]"
ros.Open sqlch, Connkaa, 1, 3
do while not ros.eof
stuSum=stuSum+1
classs=ros("b")
Set rcs = Server.CreateObject("Adodb.RecordSet")
sqlch = "Select * From [classs] where e='"&classs&"'"
rcs.Open sqlch, Connkaa, 1, 3
if rcs.eof then
rcs.addnew
rcs("a")="錯誤班級"
rcs("b")="錯誤班級"
rcs("c")="錯誤班級"
rcs("d")=0
rcs("e")=classs
rcs.update
end if
ros.movenext
loop
Los=" 本功能含有先進技術，為防止同行抄襲，暫不開放試用。歡迎來電來函，免費索取全功能正版系統光盤。電話：021-61023402"
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>學校信息化管理系統--控制中心</title>
<style type="text/css">
<!--
body,td,th {
font-size: 12px;
}
body {
background-color: #3399FD;
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
background-image: url(Image/bg.gif);
}
a:link {
text-decoration: none;
}
a:visited {
text-decoration: none;
}
a:hover {
text-decoration: none;
}
a:active {
text-decoration: none;
}
.STYLE1 {
font-size: 24px;
font-family: "宋體";
color: #FFFFFF;
}
.STYLE6 {color: #FFFFFF}
.STYLE15 {color: #FFFFFF;}
.STYLE16 {color: #FFFFFF;}
.STYLE18 {color: #FFFFFF; font-size: 16px; }
.STYLE20 {font-size: 18px; font-family: "黑體"; color: #FFFFFF; font-weight: bold; }
.B A:link {
FONT-SIZE: 12px; COLOR: #ffffff; TEXT-DECORATION: none
}
.B A:visited {
FONT-SIZE: 12px; COLOR: #ffffff; TEXT-DECORATION: none
}
.B A:hover {
FONT-SIZE: 12px; COLOR: #ffffff; TEXT-DECORATION: none
}
.B A:active {
FONT-SIZE: 12px; COLOR: #ffffff; TEXT-DECORATION: none
}
-->
</STYLE>
<script type="text/JavaScript">
<!--
function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
function MM_swapImgRestore() { //v3.0
var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}
function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}
function MM_swapImage() { //v3.0
var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
function MM_openBrWindow(theURL,winName,features) { //v2.0
window.open(theURL,winName,features);
}
//-->
</script>
</head>
<body onLoad="MM_preloadImages('Image/main/Ab.gif','Image/main/Wb.gif','Image/main/ZYb.gif')">
<table width="1003" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#3399FD">
<tr>
<td height="150" colspan="5"><p align="center" class="STYLE1"><img src="Image/bigbga.jpg" width="1003" height="150"></p></td>
</tr>
<tr>
<td height="28" colspan="5" align="center" background="Image/bg01a.jpg"> </td>
</tr>
<tr>
<td width="209" align="center" valign="bottom"> </td>
<td height="60"> </td>
<td width="356" valign="bottom" class="STYLE20"> <%=session("SchoolName")%></td>
<td width="117" valign="bottom" class="STYLE15">學生<%=stuSum%>人</td><a href="rl/cal.htm" target="_blank">
<td width="302" valign="bottom"><div class="STYLE15" id="linkweb"></div>
<script>setInterval("linkweb.innerHTML=new Date().toLocaleString()+' 星期'+'日一二三四五六'.charAt(new Date().getDay());",1000);
</script></td></a> </tr>
<tr>
<td height="500" align="right" valign="top"><table width="190" border="0" cellspacing="10" cellpadding="0">
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -