📄 kc_edit.asp
字号:
<HTML><HEAD><TITLE>x学校网上选课系统</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK
href="images/css.css" type=text/css rel=stylesheet>
<script language="JavaScript" type="text/JavaScript">
<!--
function chkform1(form){
if (form.zsxm.value.length<2 || form.zsxm.value.length>16){
alert("请输入您的真实姓名，以便确认身份！");
form.zsxm.focus();
return false;
}
if (form.Spwd.value.length<3 || form.Spwd.value.length>16){
alert("请填写你的密码！（必须是3位以上）");
form.Spwd.focus();
return false;
}
if (form.Srepwd.value!=form.Spwd.value){
alert("两次输入的密码不一样！");
form.Srepwd.focus();
return false;
}
if (form.Squestion.value.length<1 || form.Squestion.value.length>50){
alert("请填写忘记密码时的提示问题，用于取回密码！");
form.Squestion.focus();
return false;
}
if (form.Sanswer.value==form.Squestion.value){
alert("为了您的安全！提示问题不能和提示答案一样!");
form.Sanswer.focus();
return false;
}
if (form.Sanswer.value.length<1 || form.Sanswer.value.length>50){
alert("请填写示问题的答案，答案正确才能取回密码!");
form.Sanswer.focus();
return false;
}
if (form.TeZhang.value.length<1){
alert("请填写您的专长爱好！");
form.TeZhang.focus();
return false;
}
if (form.kcmc.value.length<1){
alert("请填写课程名称！");
form.kcmc.focus();
return false;
}
if (form.zxss.value.length<1){
alert("请填写总学时数！");
form.zxss.focus();
return false;
}
if (form.kcxf.value.length<1){
alert("请填写课程学分！");
form.kcxf.focus();
return false;
}
if (form.xzrs.value.length<1){
alert("请填写限制人数！");
form.xzrs.focus();
return false;
}
if (form.skdd.value.length<1){
alert("请填写上课地点！");
form.skdd.focus();
return false;
}
if (form.jxfs.value.length<1){
alert("请填写教学方式！");
form.jxfs.focus();
return false;
}
if (form.khfs.value.length<1){
alert("请填写考核方式！");
form.khfs.focus();
return false;
}
if (form.sxsb.value.length<1){
alert("教学所需设备！");
form.sxsb.focus();
return false;
}
if (form.jxmb.value.length<1){
alert("课程教学目标！");
form.jxmb.focus();
return false;
}
if (form.nrzy.value.length<1){
alert("课程内容摘要");
form.nrzy.focus();
return false;
}
if (form.ssjh.value.length<1){
alert("课程实施计划");
form.ssjh.focus();
return false;
}
return true;
}
-->
</script>
</HEAD>
<BODY bgColor=#f0f0f0 leftMargin=0 topMargin=0 MARGINWIDTH="0" MARGINHEIGHT="0">
<!--#include file="top1.asp"-->
<%
ID=SafeRequest("kid",1)
if ID="" then
%>
<script language="javascript">
<!--
alert("错误参数！");
history.back(-1);
//-->
</script>
<%
response.end
end if
set RS=Server.CreateObject("ADODB.RecordSet")
infolist="select * from 教师表_teacher where id="&id
RS.open infolist,conn,1,1
if rs.eof then
else
%>
<TABLE id=table2 height=303 cellSpacing=0 cellPadding=0 width=770 align=center
border=0>
<TBODY>
<TR>
<TD width=770 background="images/line_1.gif" height=18></TD></TR>
<TR>
<TD vAlign=top bgColor=#ffffff height=271>
<DIV align=center>
<TABLE id=table7 height=33 cellSpacing=0 cellPadding=0 width=770
border=0>
<TBODY>
<TR>
<TD width=770 colSpan=2>
<P align=center><FONT size=2><B>校本课程《<%=RS("kcmc")%>》 修改</B></FONT></P></TD></TR>
</TBODY></TABLE></DIV>
<TABLE id=table7 height=203 cellSpacing=0 cellPadding=0 width="100%"
border=0>
<form name="formReg" method="post" action="kc_edit_save.asp" onSubmit="return chkform1(formReg)">
<input name="id" type="hidden" value=<%=id%> "><TR>
<TD>
<DIV align=center>
<table width="100%" height="100%" border="0" align="center" cellpadding="3" cellspacing="1" class="tab">
<tr>
<td colspan="3" bgcolor="#99cc00"><dd>请填写你的相关信息：以下都为必填项 <font color="#FF0000">请务必记牢您的密码 </font></td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8">真 实 姓 名</td>
<td width="42%" bgcolor="#f8f8f8"><input name="zsxm" type="text" value=<%=RS("zsxm")%> id="zsxm" size="20" maxlength="16">
<font color="#FF0000">*</font></td>
<td width="36%" bgcolor="#eeeeee">填写你的真实姓名</td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8">登 录 密 码</td>
<td width="42%" bgcolor="#f8f8f8"><input name="Spwd" type="text" id="Spwd" size="20" maxlength="16" value=<%=RS("pwd")%>>
<font color="#FF0000">*</font></td>
<td width="36%" bgcolor="#eeeeee">填写你的登录密码，只有密码正确才能登录；位数必须是<font color=red>3</font>位以上</td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8">密 码 确 认</td>
<td width="42%" bgcolor="#f8f8f8"><input name="Srepwd" type="text" id="Srepwd" size="20" maxlength="16" value=<%=RS("pwd")%>>
<font color="#FF0000">*</font></td>
<td width="36%" bgcolor="#eeeeee">请再次输入登录密码，确保两次输入的同一性</td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8">提 示 问 题</td>
<td width="42%" bgcolor="#f8f8f8"><input name="Squestion" type="text" value=<%=RS("question")%> size="20" maxlength="10" value=><font color="#FF0000">*</font></td>
<td bgcolor="#eeeeee">忘记密码时的提示问题，用于取回密码</td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8">提 示 答 案</td>
<td width="42%" bgcolor="#f8f8f8"><input name="Sanswer" type="text" value=<%=RS("answer")%> size="20" maxlength="10" value=><font color="#FF0000">*</font></td>
<td bgcolor="#eeeeee">提示问题的答案，答案正确才能取回密码</td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8">所 任 课 程</td>
<td width="42%" bgcolor="#f8f8f8">
<select name="srkc" id="srkc">
<%
session("tjzc")=1
set RS_KCLB=Server.CreateObject("ADODB.Recordset")
RS_KCLB_SQL="select * from KCLB ORDER BY KCLBID ASC"
RS_KCLB.open RS_KCLB_SQL,conn,1,1
if RS_KCLB.Recordcount<>0 then
do while not RS_KCLB.eof
%>
<option value="<%=RS_KCLB("KCLB")%>" <% if RS("srkc")=RS_KCLB("KCLB") then%>selected<%end if%> >－－－<%=RS_KCLB("KCLB")%>－－－</option>
<%
RS_KCLB.movenext
loop
RS_KCLB.close
set RS_KCLB=nothing
end if
%>
</select> </td>
<td bgcolor="#eeeeee">填写你所任教的课程</td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8">职称</td>
<td width="42%" bgcolor="#f8f8f8">
<select name="zhicheng" id="zhicheng">
<%
set RS_KCLB=Server.CreateObject("ADODB.Recordset")
RS_KCLB_SQL="select * from zclb ORDER BY KCLBID ASC"
RS_KCLB.open RS_KCLB_SQL,conn,1,1
if RS_KCLB.Recordcount<>0 then
do while not RS_KCLB.eof
%>
<option value="<%=RS_KCLB("KCLB")%>" <% if RS("zhicheng")=RS_KCLB("KCLB") then%>selected<%end if%>>－－－<%=RS_KCLB("KCLB")%>－－－</option>
<%
RS_KCLB.movenext
loop
RS_KCLB.close
set RS_KCLB=nothing
end if
%>
</select>
<font color="#FF0000">*</font> </td>
<td bgcolor="#eeeeee">你的职称</td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8">研究范围、爱好特长</td>
<td colspan="2" bgcolor="#f8f8f8"><textarea name="TeZhang" cols="70" rows="5" ><%=htmlencode22(RS("tezhang"))%></textarea>
<font color="#FF0000">*</font></td>
</tr>
<tr>
<td width="22%" height="31" align="center" bgcolor="#f8f8f8"><p>课程分类</p>
</td>
<td width="42%" bgcolor="#f8f8f8">
<select name="kcfl" id="kcfl">
<%
set RS_KCLB=Server.CreateObject("ADODB.Recordset")
RS_KCLB_SQL="select * from kcfl ORDER BY KCLBID ASC"
RS_KCLB.open RS_KCLB_SQL,conn,1,1
if RS_KCLB.Recordcount<>0 then
do while not RS_KCLB.eof
%>
<option value="<%=RS_KCLB("KCLBID")%>" <% if RS("kcfl")=RS_KCLB("KCLBID") then%>selected<%end if%>>－－－<%=RS_KCLB("KCLB")%>－－－</option>
<%
RS_KCLB.movenext
loop
RS_KCLB.close
set RS_KCLB=nothing
end if
'call CloseDatabase()
%>
</select> </td>
<td bgcolor="#eeeeee"> </td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8">课程名称</td>
<td width="42%" bgcolor="#f8f8f8"><input name="kcmc" type="text" value=<%=RS("kcmc")%> id="kcmc" size="30" maxlength="30">
<font color="#FF0000">*</font> </td>
<td bgcolor="#eeeeee"> </td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8">总学时数</td>
<td width="42%" bgcolor="#f8f8f8"><input onKeyUp="value=value.replace(/[^0-9]/g,'')" onMouseOver="value=value.replace(/[^0-9]/g,'')" onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^0-9]/g,''))" name="zxss" type="text" value=<%=RS("zxss")%> id="zxss" size="5" maxlength="2">
<font color="#FF0000">*</font>此处填数字 </td>
<td bgcolor="#eeeeee"> </td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8">课程学分</td>
<td width="42%" bgcolor="#f8f8f8"><input name="kcxf" onKeyUp="value=value.replace(/[^0-9]/g,'')" onMouseOver="value=value.replace(/[^0-9]/g,'')" onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^0-9]/g,''))" type="text" value=<%=RS("kcxf")%> id="kcxf" size="5" maxlength="2">
学分<font color="#FF0000" >*</font> 此处填数字</td>
<td bgcolor="#eeeeee"> </td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8">限制人数</td>
<td width="42%" bgcolor="#f8f8f8"><input name="xzrs" onKeyUp="value=value.replace(/[^0-9]/g,'')" onMouseOver="value=value.replace(/[^0-9]/g,'')" onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^0-9]/g,''))" type="text" value=<%=RS("xzrs")%> id="xzrs" size="5" maxlength="3">
个人数<font color="#FF0000">*</font> 此处填数字</td>
<td bgcolor="#eeeeee"> </td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8">上课地点</td>
<td width="42%" bgcolor="#f8f8f8"><input name="skdd" type="text" value=<%=RS("skdd")%> id="skdd" size="30" maxlength="30">
<font color="#FF0000">*</font> </td>
<td bgcolor="#eeeeee"> </td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8">教学方式</td>
<td width="42%" bgcolor="#f8f8f8"><input name="jxfs" type="text" value=<%=RS("jxfs")%> id="jxfs" size="30" maxlength="30">
<font color="#FF0000">*</font></td>
<td bgcolor="#eeeeee"> </td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8">考核方式</td>
<td width="42%" bgcolor="#f8f8f8"><input name="khfs" type="text" value=<%=RS("khfs")%> id="khfs" size="30" maxlength="30">
<font color="#FF0000">*</font></td>
<td bgcolor="#eeeeee"> </td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8"><P style="MARGIN-TOP: 6px; MARGIN-BOTTOM: 6px" align=center>教学所需设备</P> </td>
<td colspan="2" bgcolor="#f8f8f8"><textarea name="sxsb" cols="70" rows="6" id="sxsb" ><%=htmlencode22(RS("sxsb"))%></textarea><font color="#FF0000">*</font></td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8"><P style="MARGIN-TOP: 6px; MARGIN-BOTTOM: 6px" align=center>课程教学目标</P> </td>
<td colspan="2" bgcolor="#f8f8f8"><textarea name="jxmb" cols="70" rows="6" id="jxmb" ><%=htmlencode22(RS("jxmb"))%></textarea><font color="#FF0000">*</font></td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8"><P style="MARGIN-TOP: 6px; MARGIN-BOTTOM: 6px" align=center>课程内容摘要</P> </td>
<td colspan="2" bgcolor="#f8f8f8"><textarea name="nrzy" cols="70" rows="6" id="nrzy"><%=htmlencode22(RS("nrzy"))%></textarea>
<font color="#FF0000">*</font></td>
</tr>
<tr>
<td width="22%" align="center" bgcolor="#f8f8f8"><P style="MARGIN-TOP: 6px; MARGIN-BOTTOM: 6px" align=center>课程实施计划</P> </td>
<td colspan="2" bgcolor="#f8f8f8"><textarea name="ssjh" cols="70" rows="6" id="ssjh"><%=htmlencode22(RS("ssjh"))%></textarea>
<font color="#FF0000">*</font></td>
</tr> <tr>
<td colspan="3" align="center" bgcolor="#eeeeee"><input type="submit" name="Submit" value="确 认 提 交">
<input type="reset" name="Submit2" value="重 新 填 写"></td>
</tr>
</table>
</DIV></TD>
</TR> </form>
</TABLE>
</TD></TR>
<TR>
<TD background="images/line_2.gif" bgColor=#ffffff
height=12> </TD></TR></TBODY></TABLE>
<%
end if
%>
<!--#include file="dibu.asp"-->
</BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -