教育系统应用

开发平台：

HTML/CSS

top.asp：源码内容

							<%
if session("admin")="" or session("key")="" then
response.Write("<script>alert('您好!您还没有登陆');window.location.href('login.asp')</script>")
response.end
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>考试系统</title>
<link href="css/main.css" rel="stylesheet" type="text/css">
</head>
<body>
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="25" bgcolor="#0080C0" class="whitetext">&nbsp; <% =session("admin")%>您好，欢迎进入在线考试系统后台管理,您的级别是:
    <%
dim key
key=session("key")
select case key
case "1"
response.write "管理员"
case "2"
response.write "教师"
end select
%></td>
  </tr>
</table>
</body>
</html>

						