📄 modcl.asp
字号:
<%if trim(objRS("CognizeClass"))=3 then%>
<input type="radio" name="rzhfl" value="3" id=rzhfl checked>
<%else%>
<input type="radio" name="rzhfl" value="3" id=rzhfl>
<% end if%>
<span style="FONT-FAMILY: 宋体; mso-bidi-font-size: 10.0pt; mso-ascii-font-family: Times New Roman; mso-hansi-font-family: Times New Roman; mso-bidi-font-family: Times New Roman; mso-font-kerning: 1.0pt; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA"><font size="3">运用，</font></span>
<%if trim(objRS("CognizeClass"))=4 then%>
<input type="radio" name="rzhfl" value="4" id=rzhfl checked>
<%else%>
<input type="radio" name="rzhfl" value="4" id=rzhfl>
<% end if%>
<span style="FONT-FAMILY: 宋体; mso-bidi-font-size: 10.0pt; mso-ascii-font-family: Times New Roman; mso-hansi-font-family: Times New Roman; mso-bidi-font-family: Times New Roman; mso-font-kerning: 1.0pt; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA"><font size="3">分析，</font></span>
<%if trim(objRS("CognizeClass"))=5 then%>
<input type="radio" name="rzhfl" value="5" id=rzhfl checked>
<%else%>
<input type="radio" name="rzhfl" value="5" id=rzhfl>
<%end if%>
<span style="FONT-FAMILY: 宋体; mso-bidi-font-size: 10.0pt; mso-ascii-font-family: Times New Roman; mso-hansi-font-family: Times New Roman; mso-bidi-font-family: Times New Roman; mso-font-kerning: 1.0pt; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA"><font size="3">综合，</font></span>
<%if trim(objRS("CognizeClass"))=6 then%>
<input type="radio" name="rzhfl" value="6" id=rzhfl checked>
<%else%>
<input type="radio" name="rzhfl" value="6" id=rzhfl>
<%end if%>
<span style="FONT-FAMILY: 宋体; mso-bidi-font-size: 10.0pt; mso-ascii-font-family: Times New Roman; mso-hansi-font-family: Times New Roman; mso-bidi-font-family: Times New Roman; mso-font-kerning: 1.0pt; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA"><font size="3">评价</font></span></td>
<tr>
<td width="136" align="right" nowrap>考试要求：</td>
<td colspan="5">
<input name="ksyq" size="80" value="<%=Request.Form("KID2")%>" >
</td>
</tr>
<tr>
<td width="136" align="right" nowrap>评分标准：</td>
<td colspan="5">
<input name="pjbzh" size="80" value="<%=objRS("standard")%>">
</td>
</tr>
<tr>
<td width="136" align="right" nowrap><b>建议的考试得分：</b></td>
<td colspan="2"><input name="jyfsh" size="34" value=<%=trim(objRS("SuggestScore"))%>> </td>
<td align="right" colspan="2" nowrap>建议的考试时间：</td>
<td width="135">
<input name="jyshj" size="18" value=<%=trim(objRS("SuggestTime"))%>>
秒</td>
</tr>
<tr>
<td width="136" align="right" nowrap><b>出 题 人：</b></td>
<td colspan="2"> <input name="chtr" size="34" value=<%=trim(objRS("WriteSubjectID"))%>> </td>
<td align="right" colspan="2" nowrap><b>出题日期：</b></td>
<td width="135"> <input name="chtrq" size="28" value=<%=date()%> ></td>
</tr>
<tr>
<td width="136" align="right" nowrap><b>审 订 人：</b></td>
<td colspan="2"> <input name="shdr" size="34" value=<%=trim(objRS("ExamineID"))%>></td>
<th align="right" colspan="2"><b>审订日期：</b></th>
<td width="135"> <input name="shdrq" size="28" value=<%=date()%> > </td>
</tr>
</table>
<%if objRS("Itemtype")<3 then%>
<table width="100%" border="0" height="60" cellspacing="0" align="center">
<tr>
<td width="11%" height="40" nowrap>
<div align="left">试题内容：</div>
</td>
<td colspan=3>
<textarea name="zwnr" cols="50" rows="1"><%=objRS("STNR")%></textarea>
</td>
</tr>
<tr>
<td width="11%" height="40"> 试题文件：</td>
<%if objRS("STWJ")<>"" then%>
<td width="11%" height="40"><a href="<%=objRS("STWJ")%>" target="_blank">试题附件 </a></td>
<%Session("zwwj")=objRS("STWJ")%>
<%else%>
<td width="11%" height="40">无试题附件 </td>
<% end if%>
<td colspan=2>
<input type="file" name="zwwj" size="45">
</td>
</tr>
</table>
<hr>
<table width="100%" border="0" height="8" bgcolor="#FFCCCC">
<tr bgcolor="#FFCCCC">
<td><b><font size="2" color="#0000FF">试题选项</font><font size="3" color="#0000FF">：</font></b></td>
</tr>
</table>
<table width="100%" border="0" height="110" cellspacing="0" align="center">
<tr>
<%if objRS("Itemtype")=1 then%>
<td width="7%" nowrap height="24">
<div align="center">
<%if objRS("DAAN")="A" then%>
<input type="radio" name="xx" value="A" checked>A
<%else%>
<input type="radio" name="xx" value="A">A
<%end if%>
</div>
</td>
<%elseif objRS("Itemtype")=2 then%>
<td width="7%" nowrap height="24">
<div align="center">
<% answer=objRS("DAAN")
LENDAAN=LEN(answer)
if LENDAAN<>0 then
curdaan=left(answer,1)
if curdaan="A" then%>
<input type="checkbox" name="xx1" value="A" checked>A
<%answer=Right(answer,(LENDAAN-1))
else%>
<input type="checkbox" name="xx1" value="A" >A
<%end if%>
<%else%>
<input type="checkbox" name="xx1" value="A" >A
<% end if%>
</div>
</td>
<%end if%>
<td colspan="2" height="21">
<textarea name="stzwA" cols="50" rows="1"><%=objRS("xxA")%></textarea>
</td>
</tr>
<tr>
<td width="7%" nowrap height="24"> </td>
<td width="10%" nowrap>
<%if objRS("xxAwj")<>"" then%>
<%Session("stwjA")=objRS("xxAwj")%>
<%if (objRS("Itemtype")=2) then%>
<a href="./Temp3/<%=objRS("xxAwj")%>" target="_blank">选项A附件</a>
<%else%>
<a href="./Temp1/<%=objRS("xxAwj")%>" target="_blank">选项A附件</a>
<%end if%>
<%else%>
选项A无附件
<%end if%>
</td>
<td width="83%">
<input type="file" name="stwjA">
</td>
</tr>
<tr>
<%if objRS("Itemtype")=1 then%>
<td width="7%" nowrap height="24">
<div align="center">
<%if objRS("DAAN")="B" then%>
<input type="radio" name="xx" value="B" checked>B
<%else%>
<input type="radio" name="xx" value="B">B
<%end if%>
</div>
</td>
<%elseif objRS("Itemtype")=2 then%>
<td width="7%" nowrap height="24">
<div align="center">
<%
LENDAAN=LEN(answer)
if LENDAAN<>0 then
curdaan=left(answer,1)
if curdaan="B" then%>
<input type="checkbox" name="xx2" value="B" checked>B
<%answer=Right(answer,(LENDAAN-1))
else%>
<input type="checkbox" name="xx2" value="B" >B
<%end if%>
<%else%>
<input type="checkbox" name="xx2" value="B" >B
<% end if%>
</div>
</td>
<%end if%>
<td colspan="2" height="21">
<textarea name="stzwB" cols="50" rows="1"><%=objRS("xxB")%></textarea>
</td>
</tr>
<tr>
<td width="7%" nowrap height="24"> </td>
<td width="10%" nowrap>
<%if objRS("xxBwj")<>"" then%>
<%Session("stwjB")=objRS("xxBwj")%>
<%if (objRS("Itemtype")=2) then%>
<a href="./Temp3/<%=objRS("xxBwj")%>" target="_blank">选项B附件</a>
<%else%>
<a href="./Temp1/<%=objRS("xxBwj")%>" target="_blank">选项B附件</a>
<%end if%>
<%else%>
选项B无附件
<%end if%>
</td>
<td width="83%">
<input type="file" name="stwjB">
</td>
</tr>
<tr>
<%if objRS("Itemtype")=1 then%>
<td width="7%" nowrap height="24">
<div align="center">
<%if objRS("DAAN")="C" then%>
<input type="radio" name="xx" value="C" checked>C
<%else%>
<input type="radio" name="xx" value="C">C
<%end if%>
</div>
</td>
<%elseif objRS("Itemtype")=2 then%>
<td width="7%" nowrap height="24">
<div align="center">
<%
LENDAAN=LEN(answer)
if LENDAAN<>0 then
curdaan=left(answer,1)
if curdaan="C" then%>
<input type="checkbox" name="xx3" value="C" checked>C
<%answer=Right(answer,(LENDAAN-1))
else%>
<input type="checkbox" name="xx3" value="C" >C
<%end if%>
<%else%>
<input type="checkbox" name="xx3" value="C" >C
<% end if%>
</div>
</td>
<%end if%>
<td colspan="2" height="21">
<textarea name="stzwC" cols="50" rows="1"><%=objRS("xxC")%></textarea>
</td>
</tr>
<tr>
<td width="7%" nowrap height="24"> </td>
<td width="10%" nowrap>
<%if objRS("xxCwj")<>"" then%>
<%Session("stwjC")=objRS("xxCwj")%>
<%if (objRS("Itemtype")=2) then%>
<a href="./Temp3/<%=objRS("xxCwj")%>" target="_blank">选项C附件</a>
<%else%>
<a href="./Temp1/<%=objRS("xxCwj")%>" target="_blank">选项C附件</a>
<%end if%>
<%else%>
选项C无附件
<%end if%>
</td>
<td width="83%">
<input type="file" name="stwjC">
</td>
</tr>
<tr>
<%if objRS("Itemtype")=1 then%>
<td width="7%" nowrap height="24">
<div align="center">
<%if objRS("DAAN")="D" then%>
<input type="radio" name="xx" value="D" checked>D
<%else%>
<input type="radio" name="xx" value="D">D
<%end if%>
</div>
</td>
<%elseif objRS("Itemtype")=2 then%>
<td width="7%" nowrap height="24">
<div align="center">
<%
LENDAAN=LEN(answer)
if LENDAAN<>0 then
curdaan=left(answer,1)
if curdaan="D" then%>
<input type="checkbox" name="xx4" value="D" checked>D
<%answer=Right(answer,(LENDAAN-1))
else%>
<input type="checkbox" name="xx4" value="D" >D
<%end if%>
<%else%>
<input type="checkbox" name="xx4" value="D" >D
<% end if%>
</div>
</td>
<%end if%>
<td colspan="2" height="21">
<textarea name="stzwD" cols="50" rows="1"><%=objRS("xxD")%></textarea>
</td>
</tr>
<tr>
<td width="7%" nowrap height="24"> </td>
<td width="10%" nowrap>
<%if objRS("xxDwj")<>"" then%>
<%Session("stwjD")=objRS("xxDwj")%>
<%if (objRS("Itemtype")=2) then%>
<a href="./Temp3/<%=objRS("xxDwj")%>" target="_blank">选项D附件</a>
<%else%>
<a href="./Temp1/<%=objRS("xxDwj")%>" target="_blank">选项D附件</a>
<%end if%>
<%else%>
选项D无附件
<%end if%>
</td>
<td width="83%">
<input type="file" name="stwjD">
</td>
</tr>
<tr>
<%if objRS("Itemtype")=1 then%>
<td width="7%" nowrap height="24">
<div align="center">
<%if objRS("DAAN")="E" then%>
<input type="radio" name="xx" value="E" checked>E
<%else%>
<input type="radio" name="xx" value="E">E
<%end if%>
</div>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -