?? 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 + -