⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 adminfunction.asp

📁 一个网上的考试系统
💻 ASP
字号:
🔍 
<!--#include file ="../include.asp"-->

<!--<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE></TITLE>
</HEAD>
<link rel="stylesheet" type="text/css" href="../default.css">
<BODY  leftmargin=150  rightmargin=150 topmargin=30>
<IMG src="../images/title.JPG" border=0>
<hr>
<br>
-->
<% 
	StartPage "管理员功能页",2
	
	UserName = Request.Form ("UserName")
	PassWord = Request.Form ("PassWord")
	if UserName <> "" then
		set conn = Server.CreateObject ("adodb.connection")
		conn.Open "NetExamine","sa",""
		set userconn = Server.CreateObject ("adodb.recordset")	
		sqlstr = "select * from 管理员表 where 管理员名 = '" &UserName& "' and 密码 = '" &PassWord& "'"
		userconn.Open sqlstr,conn
	
		if userconn.EOF then
			Response.Write "<center><font size = 6 color=LightSkyBlue>您所输入的用户名或密码有错<br>请返回重新输入</font></center>"
			Response.Write"<br><br><center><a href =AdminLogin.asp>返回</a></center>"
			Response.Write"<br><hr><center>"
			Response.Write"<font  size=2>欢迎来到本网站，最佳分辨率：800×600<br>如果有困难请与我联系：FD_FYY@hotmail.com</font></center>"
			Response.End()
		end if
		userconn.Close ()
		set userconn = nothing
		conn.Close()
		set conn = nothing
	end if
%>
<table border="1" cellpadding="0" cellspacing="0" style="BORDER-COLLAPSE: collapse" bordercolor="lightskyblue" width="90%" align=center>
	<tr>
		<td  bgcolor=LightSkyBlue  height=20></td>
	</tr>
	
	<tr>
		<td  align=center>
			<table>
				<tr>
					<td  height=20><td>
				</tr>
				
			</table>	
			
			<table  border=1   width=80% cellpadding="0" cellspacing="0" style="BORDER-COLLAPSE: collapse" bordercolor="lightskyblue">
				<tr>
					<td  height=20  bgcolor=LightSkyBlue></td>
				</tr>
				
				<tr>
					<td  height=160　 align=center>
						<table>
							<tr>
								<td  align=center　 height=40  colspan=3><font  size=6  color=LightSkyBlue>扬帆网上考试系统管理员功能页</font></td>
							</tr>
							
							<tr  bgcolor=LightSkyBlue>
								<td align=center height=40>科目</td>
								<td align=center height=40>题目</td>
								<td align=center height=40>答案</td>
							</tr>
							
							<tr>
								<td align=center height=40><a  href=Add_Object.asp>增加科目</a></td>
								<td align=center height=40><a  href=Add_source.asp>增加题目</a></td>
								<td align=center height=40><a href = AddSubjectwarehouse.asp  target="resource window">增加答案</a></td>
							</tr>
							
							<tr>
								<td align=center height=40><a href =DeleteObject.asp>删除科目</a></td>
								<td align=center height=40><a href=DeleteSource.asp>删除题目</a></td>
								<td align=center height=40><a></a></td>
							</tr>
							
							<tr>
								<td align=center height=40><a href=../Index.asp>返回首页</a></td>
								<td align=center height=40><a href ="UpdataSource.asp">修改题目</a></td>
								<td align=center height=40><a></a></td>
							</tr>
						</table>
					</td>
				</tr>
				
				<tr>
					<td  height=20  bgcolor=LightSkyBlue></td>
				</tr>
			</table>
			
			<table>
				<tr>
					<td  height=20><td>
				</tr>
				
			</table>	
		</td>
	</tr>
</table>
<% 
	EndPage
%>
<!--<br>
<hr>
<center>
<font  size=2>
欢迎来到本网站，最佳分辨率：800×600
<br>如果有困难请与我联系：FD_FYY@hotmail.com
</font>
</center>
</BODY>
</HTML>-->

⌨️ 快捷键说明

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