📄 tedit.asp
字号:
<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>
<base target="rbottom">
<meta name="Microsoft Border" content="t, default">
</head>
<script language="vbscript" for="B2" event="onclick">
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">
<!-- #include file="adoconn.asp" -->
<%
Dim LocalArray,ClassArray
Session("kind")="教师"
IF Session("EditFlag") = "MODIFY" then
LocalArray=Session("DataArray")
ClassArray=Session("ClassArray")
ELSE
Session("EditFlag")="INSERT"
Redim LocalArray(30)
Redim ClassArray(10)
Session("TCollege")=Request.form("D1")
END IF
%>
<!--webbot BOT="GeneratedScript" PREVIEW=" " startspan --><script Language="JavaScript"><!--
function FrontPage_Form1_Validator(theForm)
{
if (theForm.T1.value == "")
{
alert("请在 T1 域中输入值。");
theForm.T1.focus();
return (false);
}
if (theForm.T1.value.length < 1)
{
alert("在 T1 域中，请至少输入 1 个字符。");
theForm.T1.focus();
return (false);
}
if (theForm.T1.value.length > 18)
{
alert("在 T1 域中，请最多输入 18 个字符。");
theForm.T1.focus();
return (false);
}
if (theForm.T2.value == "")
{
alert("请在 T2 域中输入值。");
theForm.T2.focus();
return (false);
}
if (theForm.T2.value.length > 8)
{
alert("在 T2 域中，请最多输入 8 个字符。");
theForm.T2.focus();
return (false);
}
return (true);
}
//--></script><!--webbot BOT="GeneratedScript" endspan --><form method="POST" action="Twrite.asp" onsubmit="return FrontPage_Form1_Validator(this)" name="FrontPage_Form1" >
<p align="center"><b><font face="华文彩云" size="5">教师信息注册</font></b></p>
<table border="1" width="83%" bordercolorlight="#000080" bordercolordark="#000000" height="160" style="font-family: 宋体; font-size: 10pt">
<tr>
<td width="52%" height="30"><font size="2" face="宋体">编号：<!--webbot
bot="Validation" B-Value-Required="TRUE" I-Minimum-Length="1"
I-Maximum-Length="18" --><input type="text" name="T1" value="<%=Localarray(0)%>" size="19" style="background-color: #C0C0C0; border-style: inset" maxlength="18"><font color="#FF0000">*</font><span lang="en-gb"><font color="#FF0000">（可自编，并注意保存）</font></span></font></td>
<td width="51%" height="30"><font size="2" face="宋体">姓
名：<!--webbot bot="Validation" b-value-required="TRUE"
i-maximum-length="8" --><input type="text" name="T2" value="<%=Localarray(1)%>" size="12" style="background-color: #C0C0C0; border-style: inset" maxlength="8"><font color="#FF0000">*</font></font>
</td>
</tr>
<tr>
<td width="52%" height="23"><font size="2" face="宋体">性
别：
<%if localarray(2)="男" or localarray(2)="女" then %>
<input type="radio" value="男" <%if localarray(2)="男" then %> CHECKED <%end if %> name="R1">男
<input type="radio" value="女" <%if localarray(2)="女" then %> checked <%end if %> name="R1">女
<%else%>
<input type="radio" value="男" CHECKED name="R1">男
<input type="radio" value="女" name="R1">女
<%end if%>
</font>
</td>
<td width="51%" height="23"><font size="2" face="宋体">出生年月：<select size="1" name="D1">
<% if Localarray(3)<>"" then %>
<option selected><%=left(cstr(Localarray(3)),4)%></option>
<%end if %>
<%for y=1940 to 2000 %>
<option><%=(y)%></option>
<%next%>
</select>年<select size="1" name="D2">
<% if Localarray(3)<>"" then %>
<option selected><%=mid(cstr(Localarray(3)),6,2)%></option>
<% end if %>
<%for m=1 to 12
if m<10 then %>
<option><%=("0"&m)%></option>
<%else %>
<option><%=(m) %></option>
<%end if %>
<%next%>
</select>月<select size="1" name="D3">
<% if Localarray(3)<>"" then %>
<option selected><%=mid(cstr(Localarray(3)),9,2)%></option>
<% end if %>
<%for d=1 to 31
if d<10 then %>
<option><%=("0"&d)%></option>
<%else %>
<option><%=(d) %></option>
<%end if %>
<%next%>
</select>日</font>
</td>
</tr>
<tr>
<td width="52%" height="21"><font size="2" face="宋体">口
令：<input type="password" name="T3" value="<%=Localarray(4)%>" size="8" style="background-color: #C0C0C0; border-style: inset" maxlength="6"></font></td>
<td width="51%" height="21"><font size="2" face="宋体"> 所在部门：<select size="1" name="D5" style="background-color: #C0C0C0; border-style: inset">
<%
listItem("select department from Departments where college='" & session("Tcollege") & "'")
%>
<option selected><%=Localarray(6)%></option>
<% for recordi=0 to Itemcount-1%>
<option><%=ItemArray(0,recordi)%></option>
<%next%>
</select><font color="#FF0000">*</font> </font>
</td>
</tr>
<tr>
<td width="52%" height="1"><font face="宋体">职
称：<select size="1" name="D6">
<option selected><%=Localarray(7)%></option>
<option>教授</option>
<option>副教授</option>
<option>正高工</option>
<option>研究员</option>
<option>副高工</option>
<option>讲师</option>
<option>助教</option>
<option>高级政工师</option>
<option>高级财会师</option>
<option>会计师</option>
<option>助理会计师</option>
<option>其它</option>
</select></font></td>
<td width="51%" height="1"><font face="宋体" size="2">职
务：<select size="1" name="D7">
<option selected><%=Localarray(8)%></option>
<option>处长（或处级干部）</option>
<option>副处长（或副处级干部）</option>
<option>系（分院）主任</option>
<option>系（分院）书记</option>
<option>系（分院）副主任</option>
<option>系（分院）副书记</option>
<option>工会主席</option>
<option>工会副主席</option>
<option>教研室主任</option>
<option>教研室副主任</option>
<option>其它</option>
<option>无</option>
</select> </font>
</td>
</tr>
<tr>
<td width="52%" height="25"><font size="2" face="宋体">岗 位:
<select size="1" name="D8" >
<option selected><%=Localarray(9)%></option>
<option selected>教师</option>
<option>干部</option>
<option>职员</option>
</select>
</font></td>
<td width="51%" height="25"><font color="#000080"><input type="submit" value="保存并选择授课班级" name="B1" style="color: #FF0000"></font><font color="#000080">
<input type="button" value="返回" name="B2"></font>
</td>
</tr>
</table>
<p><font color="#FF0000">*</font><font color="#000000">标注项必填</font> <font color="#000080">
</font>
</form>
<!--msnavigation--></td></tr><!--msnavigation--></table></body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -