teachingclass.asp
来自「《动态网页设计基础教程》,胡杰,科学出版社」· ASP 代码 · 共 85 行
ASP
85 行
<html>
<head>
<link rel="stylesheet" href="comCSS.css">
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>查询教师信息</title>
<meta name="Microsoft Border" content="t, default">
</head>
<script language="vbscript" event="Onclick" for="B2">
history.back
</script>
<body><!--msnavigation--><table border="0" cellpadding="0" cellspacing="0" width="100%"><tr><td>
<p align="left"> </p>
</td></tr><!--msnavigation--></table><!--msnavigation--><table border="0" cellpadding="0" cellspacing="0" width="100%"><tr><!--msnavigation--><td valign="top">
<p> </p>
<p></p>
<!-- #include file="adoconn.asp" -->
<%
Certificate()
If request.form("B1")="选择授课院系和班级" then
session("Tid")=Request.form("T1")
session("Tname")=Request.form("T2")
sql="select * from Teachers where Tid='" & session("Tid") & "' and Tname='" & session("Tname") & "'"
set rs=GetRecordset(sql)
if rs.eof then
set adoconn=nothing
set rs=nothing
%>
<script language="vbscript">
msgbox "您尚未注册或输入信息有误!"
history.back
</script>
<%else
set adoconn=nothing
set rs=nothing
Response.redirect "collegechoice.asp"
end if
Else
%>
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr><td valign="top">
<p align="center"><font face="华文新魏" size="4" color="#000080">输入教师关键信息</font></p>
<form method="POST" action="TeachingClass.asp">
<div align="left">
<table border="1" width="51%" height="83" align="center">
<tr>
<td width="13%" height="23">
<p align="left">教师编号</p>
</td>
<td width="61%" height="23" align="center">
<p align="left"><input type="text" name="T1" size="20" style="border-style: solid; border-color: #FFFFFF" maxlength="18"></p>
</td>
</tr>
<tr>
<td width="13%" height="24">
<p align="left">姓 名</p>
</td>
<td width="61%" height="24" align="center">
<p align="left">
<input type="text" name="T2" size="20" style="border-style: solid; border-color: #FFFFFF"></p>
</td>
</tr>
</table>
</div>
<p align="center"><input type="submit" value="选择授课院系和班级" name="B1"><input type="button" value="返回" name="B2"></p>
</form>
</table>
<% End if %>
<!--msnavigation--></td></tr><!--msnavigation--></table></body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?