📄 admin_teacher_modi.asp
字号:
modi.LockType = 1
modi.Open()
modi_numRows = 0
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>修改个人信息-<%=WebName%></title>
<script language="JavaScript" src="ubbcode/ubbcode.js" type="text/JavaScript"></script>
<link rel="SHORTCUT ICON" href="favicon.ico"/>
<link href="<%= SysCss %>" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style1 {color: #FF0000}
body {
margin-left: 0px;
margin-top: 0px;
}
-->
</style>
</head>
<body>
<form ACTION="<%=MM_editAction%>" METHOD="POST" name="form1">
<script>function showimage(){document.images.tus.src="icon/"+document.form1.icon.options[document.form1.icon.selectedIndex].value+".gif";}</script>
<table width="750" border="1" align="center" cellpadding="5" cellspacing="3" bordercolorlight="#CCCCCC" bordercolordark="#FFFFFF" bgcolor="#FFFFFF">
<tr valign="baseline">
<td nowrap align="right">胸卡编号:</td>
<td>
<input name="Num" type="text" id="Num" value="<%=(modi.Fields.Item("studentnum").Value)%>" size="32"></td>
</tr>
<tr valign="baseline">
<td nowrap align="right">姓名:</td>
<td>
<input name="Name" type="text" id="Name" value="<%=(modi.Fields.Item("studentname").Value)%>" size="32"></td>
</tr>
<tr valign="baseline">
<td nowrap align="right">所在专业:</td>
<td>
<input name="Specia" type="text" id="Specia" value="<%=(modi.Fields.Item("Specia").Value)%>" size="32"></td>
</tr>
<tr valign="baseline">
<td nowrap align="right">所在班级:</td>
<td>
<input name="MasterClass" type="text" id="MasterClass" value="<%=(modi.Fields.Item("MasterClass").Value)%>" size="32"></td>
</tr>
<tr valign="baseline">
<td align="right" valign="top" nowrap>个人头像:</td>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="icon/<%if request.cookies("icon")<>"" then%><%=request.cookies("icon")%><%else%><%= modi.Fields.Item("HeadTopic").Value %><%end if%>.gif" name="tus" alt="当前头像"></td>
</tr>
<tr>
<td><select name="icon" onChange="showimage()">
<option value="<%if request.cookies("icon")<>"" then%><%=request.cookies("icon")%><%else%><%= modi.Fields.Item("HeadTopic").Value %><%end if%>" selected>选择头像</option>
<%for i=1 to 12%>
<option value="b_w<%=i%>">女孩<%=i%></option>
<%next%>
<%for i=1 to 12%>
<option value="b_m<%=i%>">男孩<%=i%></option>
<%next%>
</select></td>
</tr>
</table></td>
</tr>
<tr valign="baseline">
<td nowrap align="right">出生年月:</td>
<td><input type="text" name="Birth" value="<%=(modi.Fields.Item("Birth").Value)%>" size="32">
<span class="style2 style1">
<select name="SeeBirth" id="SeeBirth">
<option value="0" <%If (Not isNull((modi.Fields.Item("SeeBirth").Value))) Then If ("0" = CStr((modi.Fields.Item("SeeBirth").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←任何人都可以查看这内容</option>
<option value="1" <%If (Not isNull((modi.Fields.Item("SeeBirth").Value))) Then If ("1" = CStr((modi.Fields.Item("SeeBirth").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←只供同班教师查看这内容</option>
<option value="3" <%If (Not isNull((modi.Fields.Item("SeeBirth").Value))) Then If ("3" = CStr((modi.Fields.Item("SeeBirth").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←只供好友查看这内容</option>
<option value="4" <%If (Not isNull((modi.Fields.Item("SeeBirth").Value))) Then If ("4" = CStr((modi.Fields.Item("SeeBirth").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←不给任何人查看这内容</option>
</select>
＊</span>填写格式：2004－09－03 </td>
</tr>
<tr valign="baseline">
<td nowrap align="right">政治面貌:</td>
<td><select name="Member" id="Member">
<option value="共产党员" <%If (Not isNull((modi.Fields.Item("Member").Value))) Then If ("共产党员" = CStr((modi.Fields.Item("Member").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>共产党员</option>
<option value="共青团员" <%If (Not isNull((modi.Fields.Item("Member").Value))) Then If ("共青团员" = CStr((modi.Fields.Item("Member").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>共青团员</option>
<option value="人民群众" selected <%If (Not isNull((modi.Fields.Item("Member").Value))) Then If ("人民群众" = CStr((modi.Fields.Item("Member").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>人民群众</option>
</select>
<span class="style2 style1">
<select name="SeeMember" id="SeeMember">
<option value="0" <%If (Not isNull((modi.Fields.Item("SeeMember").Value))) Then If ("0" = CStr((modi.Fields.Item("SeeMember").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←任何人都可以查看这内容</option>
<option value="1" <%If (Not isNull((modi.Fields.Item("SeeMember").Value))) Then If ("1" = CStr((modi.Fields.Item("SeeMember").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←只供同班教师查看这内容</option>
<option value="3" <%If (Not isNull((modi.Fields.Item("SeeMember").Value))) Then If ("3" = CStr((modi.Fields.Item("SeeMember").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←只供好友查看这内容</option>
<option value="4" <%If (Not isNull((modi.Fields.Item("SeeMember").Value))) Then If ("4" = CStr((modi.Fields.Item("SeeMember").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←不给任何人查看这内容</option>
</select>
</span></td>
</tr>
<tr valign="baseline">
<td nowrap align="right">校园IC卡号码:</td>
<td><input name="ICNum" type="text" id="ICNum" value="<%=(modi.Fields.Item("ICNum").Value)%>" size="32">
<span class="style2 style1">
<select name="SeeICNum" id="SeeICNum">
<option value="0" <%If (Not isNull((modi.Fields.Item("SeeICNum").Value))) Then If ("0" = CStr((modi.Fields.Item("SeeICNum").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←任何人都可以查看这内容</option>
<option value="1" <%If (Not isNull((modi.Fields.Item("SeeICNum").Value))) Then If ("1" = CStr((modi.Fields.Item("SeeICNum").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←只供同班教师查看这内容</option>
<option value="3" <%If (Not isNull((modi.Fields.Item("SeeICNum").Value))) Then If ("3" = CStr((modi.Fields.Item("SeeICNum").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←只供好友查看这内容</option>
<option value="4" <%If (Not isNull((modi.Fields.Item("SeeICNum").Value))) Then If ("4" = CStr((modi.Fields.Item("SeeICNum").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←不给任何人查看这内容</option>
</select>
</span></td>
</tr>
<tr valign="baseline">
<td nowrap align="right">原毕业学校:</td>
<td><input name="GraduateSchool" type="text" id="GraduateSchool" value="<%=(modi.Fields.Item("GraduateSchool").Value)%>" size="32">
<span class="style2 style1">
<select name="SeeGraduateSchool" id="SeeGraduateSchool">
<option value="0" <%If (Not isNull((modi.Fields.Item("SeeGraduateSchool").Value))) Then If ("0" = CStr((modi.Fields.Item("SeeGraduateSchool").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←任何人都可以查看这内容</option>
<option value="1" <%If (Not isNull((modi.Fields.Item("SeeGraduateSchool").Value))) Then If ("1" = CStr((modi.Fields.Item("SeeGraduateSchool").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←只供同班教师查看这内容</option>
<option value="3" <%If (Not isNull((modi.Fields.Item("SeeGraduateSchool").Value))) Then If ("3" = CStr((modi.Fields.Item("SeeGraduateSchool").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←只供好友查看这内容</option>
<option value="4" <%If (Not isNull((modi.Fields.Item("SeeGraduateSchool").Value))) Then If ("4" = CStr((modi.Fields.Item("SeeGraduateSchool").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←不给任何人查看这内容</option>
</select>
</span></td>
</tr>
<tr valign="baseline">
<td nowrap align="right">所在宿舍:</td>
<td><input name="MasterDorm" type="text" id="MasterDorm" value="<%=(modi.Fields.Item("MasterDorm").Value)%>" size="32">
<span class="style2 style1">
<select name="SeeMasterDorm" id="SeeMasterDorm">
<option value="0" <%If (Not isNull((modi.Fields.Item("SeeMasterDorm").Value))) Then If ("0" = CStr((modi.Fields.Item("SeeMasterDorm").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←任何人都可以查看这内容</option>
<option value="1" <%If (Not isNull((modi.Fields.Item("SeeMasterDorm").Value))) Then If ("1" = CStr((modi.Fields.Item("SeeMasterDorm").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←只供同班教师查看这内容</option>
<option value="3" <%If (Not isNull((modi.Fields.Item("SeeMasterDorm").Value))) Then If ("3" = CStr((modi.Fields.Item("SeeMasterDorm").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←只供好友查看这内容</option>
<option value="4" <%If (Not isNull((modi.Fields.Item("SeeMasterDorm").Value))) Then If ("4" = CStr((modi.Fields.Item("SeeMasterDorm").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←不给任何人查看这内容</option>
</select>
</span></td>
</tr>
<tr valign="baseline">
<td nowrap align="right">宿舍电话号码:</td>
<td><input name="DormTelphone" type="text" id="DormTelphone" value="<%=(modi.Fields.Item("DormTelphone").Value)%>" size="32">
<span class="style2 style1">
<select name="SeeDormTelphone" id="SeeDormTelphone">
<option value="0" <%If (Not isNull((modi.Fields.Item("SeeDormTelphone").Value))) Then If ("0" = CStr((modi.Fields.Item("SeeDormTelphone").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←任何人都可以查看这内容</option>
<option value="1" <%If (Not isNull((modi.Fields.Item("SeeDormTelphone").Value))) Then If ("1" = CStr((modi.Fields.Item("SeeDormTelphone").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←只供同班教师查看这内容</option>
<option value="3" <%If (Not isNull((modi.Fields.Item("SeeDormTelphone").Value))) Then If ("3" = CStr((modi.Fields.Item("SeeDormTelphone").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←只供好友查看这内容</option>
<option value="4" <%If (Not isNull((modi.Fields.Item("SeeDormTelphone").Value))) Then If ("4" = CStr((modi.Fields.Item("SeeDormTelphone").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←不给任何人查看这内容</option>
</select>
</span></td>
</tr>
<tr valign="baseline">
<td nowrap align="right">家长姓名:</td>
<td><input type="text" name="ParentsName" value="<%=(modi.Fields.Item("ParentsName").Value)%>" size="32">
<span class="style2 style1">
<select name="SeeParentsName" id="SeeParentsName">
<option value="0" <%If (Not isNull((modi.Fields.Item("SeeParentsName").Value))) Then If ("0" = CStr((modi.Fields.Item("SeeParentsName").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←任何人都可以查看这内容</option>
<option value="1" <%If (Not isNull((modi.Fields.Item("SeeParentsName").Value))) Then If ("1" = CStr((modi.Fields.Item("SeeParentsName").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←只供同班教师查看这内容</option>
<option value="3" <%If (Not isNull((modi.Fields.Item("SeeParentsName").Value))) Then If ("3" = CStr((modi.Fields.Item("SeeParentsName").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←只供好友查看这内容</option>
<option value="4" <%If (Not isNull((modi.Fields.Item("SeeParentsName").Value))) Then If ("4" = CStr((modi.Fields.Item("SeeParentsName").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←不给任何人查看这内容</option>
</select>
</span> </td>
</tr>
<tr valign="baseline">
<td nowrap align="right">家庭住址邮编:</td>
<td><input type="text" name="HomeZipcode" value="<%=(modi.Fields.Item("HomeZipcode").Value)%>" size="32">
<span class="style2 style1">
<select name="SeeHomeZipcode" id="SeeHomeZipcode">
<option value="0" <%If (Not isNull((modi.Fields.Item("SeeHomeZipcode").Value))) Then If ("0" = CStr((modi.Fields.Item("SeeHomeZipcode").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←任何人都可以查看这内容</option>
<option value="1" <%If (Not isNull((modi.Fields.Item("SeeHomeZipcode").Value))) Then If ("1" = CStr((modi.Fields.Item("SeeHomeZipcode").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←只供同班教师查看这内容</option>
<option value="3" <%If (Not isNull((modi.Fields.Item("SeeHomeZipcode").Value))) Then If ("3" = CStr((modi.Fields.Item("SeeHomeZipcode").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←只供好友查看这内容</option>
<option value="4" <%If (Not isNull((modi.Fields.Item("SeeHomeZipcode").Value))) Then If ("4" = CStr((modi.Fields.Item("SeeHomeZipcode").Value))) Then Response.Write("SELECTED") : Response.Write("")%>>←不给任何人查看这内容</option>
</select>
</span> </td>
</tr>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -