📄 adminteacher.asp
字号:
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/function.asp"-->
<html>
<head>
<title>教务管理系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../css.css" rel="stylesheet" type="text/css">
</head>
<body style="background-color: #799AE1">
<table class="tableBorder" width="887" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#FFFFFF">
<tr>
<td colspan="6" align="center" background="images/admin_bg_1.gif" height="25"><b><font color="#ffffff">教务管理—</font></b><font color="#FFFFFF"><b>教师管理</b></font></td>
</tr>
<tr>
<td width="100%" bgcolor="#E8F1FF" align="center" colspan="6" height="25">
<font color="#0000FF">输入查询条件</font></td>
</tr>
<form name="searchstudent" method="post" action="adminteacher.asp?action=js">
<tr>
<td bgcolor="#E8F1FF" align="center" colspan="1">按教师查询：</td>
<td bgcolor="#E8F1FF" align="left" colspan="4">
编号：<input class="wenbenkuang" name="num" type="text" id="Topic" size="10">
姓名：<input class="wenbenkuang" name="name" type="text" id="Topic0" size="10">
性别：<input type="radio" value="男" name="xb">男 <input type="radio" value="女" name="xb">女
民族：<input class="wenbenkuang" name="mz" type="text" id="Topic2" size="7">
</td>
<td bgcolor="#E8F1FF" align="center" colspan="1">
<input class="go-wenbenkuang" name="submit" value=查询 type=submit>
</td>
</tr>
</form>
<form name="searchstudent" method="post" action="adminteacher.asp?action=sql">
<tr>
<td bgcolor="#E8F1FF" align="center" colspan="1">按SQL语句查询：</td>
<td bgcolor="#E8F1FF" align="left" colspan="4">
SQL语句：<input class="wenbenkuang" name="sql" type="text" id="Topic" size="72">
<font color="#FF0000">帮助</font></td>
<td bgcolor="#E8F1FF" align="center" colspan="1">
<input class="go-wenbenkuang" name="submit" value=查询 type=submit>
</td>
</tr>
</form>
<tr>
<td width="100%" bgcolor="#E8F1FF" align="center" colspan="6" height="25">
<font color="#0000FF">查询结果</font></td>
</tr>
<tr>
<td width="15%" bgcolor="#E8F1FF" align="center">序号</td>
<td width="20%" bgcolor="#E8F1FF" align="center">
姓名</td>
<td width="15%" bgcolor="#E8F1FF" align="center">
编号</td>
<td width="15%" bgcolor="#E8F1FF" align="center">
修改</td>
<td width="20%" bgcolor="#E8F1FF" align="center">
锁定</td>
<td width="15%" bgcolor="#E8F1FF" align="center">
删除</td>
</tr>
<%
action=request.querystring("action")
if action="js" then sql="select * from Jw_teacher where Num like '%"&request("num")&"%' and Name like '%"&request("name")&"%' and xb like '%"&request("xb")&"%' and mz like '%"&request("mz")&"%' order by num"
if action="sql" then
sql=request("sql")
if len(sql)<6 then
response.write "<script LANGUAGE='javascript'>alert('请输入正确的SQL语句！');history.go(-1);</script>"
response.end
end if
if left(sql,6)<>"select" then
response.write "<script LANGUAGE='javascript'>alert('只允许执行select语句！');history.go(-1);</script>"
response.end
end if
end if
if action="" then sql="select * from Jw_teacher order by num"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
if rs.RecordCount=0 then
%>
<tr>
<td width="100%" bgcolor="#E8F1FF" align="center" colspan="7"><font color=red>无记录</font></td>
</tr>
<%
else
rs.PageSize =10 '每页记录条数
iCount=rs.RecordCount '记录总数
iPageSize=rs.PageSize
maxpage=rs.PageCount
page=request("page")
if Not IsNumeric(page) or page="" then
page=1
else
page=cint(page)
end if
if page<1 then
page=1
elseif page>maxpage then
page=maxpage
end if
rs.AbsolutePage=Page
if page=maxpage then
x=iCount-(maxpage-1)*iPageSize
else
x=iPageSize
end if
For i=1 To x
%>
<tr>
<td width="15%" bgcolor="#E8F1FF" align="center"><% =rs("ID")%></td>
<td width="20%" bgcolor="#E8F1FF" align="center"><% =rs("Name")%></td>
<td width="15%" bgcolor="#E8F1FF" align="center"><% =rs("Num")%></td>
<td width="15%" bgcolor="#E8F1FF" align="center"><a href="addteacher.asp?action=edit&ID=<% =rs("ID")%>">修改</a></td>
<% If rs("lock") = 0 Then%>
<td width="20%" bgcolor="#E8F1FF" align="center"><a href="addteacher.asp?action=lock&ID=<% =rs("ID")%>">锁定</a></td>
<% Else%>
<td width="20%" bgcolor="#E8F1FF" align="center"><a href="addteacher.asp?action=unlock&ID=<% =rs("ID")%>">解除锁定</a></td>
<% End If%>
<td width="15%" bgcolor="#E8F1FF" align="center"><a href="addteacher.asp?action=del&ID=<% =rs("ID")%>">删除</a></td>
</tr>
<%
rs.movenext
next
rs.close
set rs=nothing
conn.close
set conn=nothing
end if
%>
<TR>
<td bgcolor="#ffffff" height="25" align="center" colspan="6"><% call PageControl(iCount,maxpage,page,"border=0 align=center","<p align=center>")%></td>
</tr>
</table>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -