⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 datebase.asp

📁 本系统适用于选择题(单选和多选)的练习和考试.主要有七大模块:学习信息、经验交流、学生练习、学生考试、试卷管理、题库操作、身份 资料、成绩查询、系统帮助。超级管理员还可进行系统设置
💻 ASP
📖 第 1 页 / 共 2 页
字号:
%>
                  
                  <td valign="top" class="unnamed14">&nbsp;</td>
                  <td>  <a href="select_upfile.asp?file_name=<%=file_name%>&direr=testimages" target="_blank"><span class="unnamed14">输入图片</span></a>  <font color="#FF0000"><span class="unnamed12">注意:只有图片格式才能正确显示</span></font></td>
                </tr>
                <tr> 
                  <td valign="middle" class="unnamed14"> 
                    <div align="right">答案A:</div></td>
                  <td class="unnamed12">  
                    <input name="da_a" type="text" id="da_a" size="52">
                    <font color="#FF0000">*</font></td>
                </tr>
                <tr> 
                  <td valign="middle" class="unnamed14"> 
                    <div align="right">答案B:</div></td>
                  <td class="unnamed12">  
                    <input name="da_b" type="text" id="da_b" size="52">
                    <font color="#FF0000">*</font></td>
                </tr>
                <tr> 
                  <td valign="middle" class="unnamed14"> 
                    <div align="right">答案C:</div></td>
                  <td class="unnamed12">  
                    <input name="da_c" type="text" id="da_c" size="52"></td>
                </tr>
                <tr> 
                  <td valign="middle" class="unnamed14"> 
                    <div align="right">答案D:</div></td>
                  <td class="unnamed12">  
                    <input name="da_d" type="text" id="da_d" size="52"></td>
                </tr>
                <tr> 
                  <td valign="middle" class="unnamed14"> 
                    <div align="right">答案E:</div></td>
                  <td class="unnamed12">  
                    <input name="da_e" type="text" id="da_e" size="52"></td>
                </tr>
                <tr> 
                  <td valign="middle" class="unnamed14"> 
                    <div align="right">答案F:</div></td>
                  <td class="unnamed12">  
                    <input name="da_f" type="text" id="da_f" size="52"></td>
                </tr>
                <tr> 
                  <td valign="middle" class="unnamed14">
<div align="right">正确答案:</div></td>
                  <td class="unnamed12">  
                    <input name="da_ok" type="radio" value="A" checked>
                    A; 
                    <input type="radio" name="da_ok" value="B">
                    B; 
                    <input type="radio" name="da_ok" value="C">
                    C; 
                    <input type="radio" name="da_ok" value="D">
                    D; 
                    <input type="radio" name="da_ok" value="E">
                    E; 
                    <input type="radio" name="da_ok" value="F">
                    F。</td>
                </tr>
                <tr valign="middle"> 
                  <td height="30" colspan="2" class="unnamed14"> 
                    <div align="center"> 
                      <input type="submit" name="Submit3" value="写入题库">
                           
                      <input type="reset" name="Submit4" value=" 重 填 ">
                    </div></td>
                </tr>
              </table>
              
              <div align="center"><font color="#FF0000"><span class="unnamed14"> 
                <%if msg<>"" then response.write msg end if%>
                
                </span> </font></div>
            </form></td>
        </tr>
      </table>
      <%end if%>
	  
	  
<%if in_test="many" then%> <%'写入题库操作 多项
  if doing="insert" then
     test_textd=request.form("test_textd")
     test_textd=replace(test_textd,chr(13),"<br>")
     test_textd=replace(test_textd," ","&nbsp;")
	 if test_textd="" then test_textd=" " end if
	 da_ad=trim(request.form("da_ad"))
	 da_bd=trim(request.form("da_bd"))
	 if da_ad="" or da_bd="" then
	      msg="答案A或答案B不能为空"
     else
	     if session("up_file_name")<>"" then imaged=session("up_file_name") else imaged=" " end if
		 da_cd=trim(request.form("da_cd"))
		 if da_cd="" then da_cd=" " end if
		 da_dd=trim(request.form("da_dd"))
		 if da_dd="" then da_dd=" " end if
		 da_ed=trim(request.form("da_ed"))
		 if da_ed="" then da_ed=" " end if
		 da_fd=trim(request.form("da_fd"))
		 if da_fd="" then da_fd=" " end if
		 sa=request.form("sa")
		 sb=request.form("sb")
		 sc=request.form("sc")
		 sd=request.form("sd")
		 se=request.form("se")
		 sf=request.form("sf")
		 if sa="a" then sa="1" else sa="0" end if
		 if sb="b" then sb="1" else sb="0" end if
		 if sc="c" then sc="1" else sc="0" end if
		 if sd="d" then sd="1" else sd="0" end if
		 if se="e" then se="1" else se="0" end if
		 if sf="f" then sf="1" else sf="0" end if
		 daok=sa&sb&sc&sd&se&sf
		 str="insert into "&session("select_tk")&"(tm_text,img_name,da_a,da_b,da_c,da_d,da_e,da_f,da,select_only) values('"&test_textd&"','"&imaged&"','"&da_ad&"','"&da_bd&"','"&da_cd&"','"&da_dd&"','"&da_ed&"','"&da_fd&"','"&daok&"',0)"
		 conn.execute(str)
	 end if
  end if
%> <table width="550" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td><form name="form2" method="post" action="datebase.asp?in_test=many&doing=insert">
              <table width="500" border="1" align="center" cellpadding="0" cellspacing="0">
                <tr> 
                  <td height="30" colspan="2" bgcolor="#CCCCCC" class="unnamed16"> 
                    <div align="center"><strong>增 加 <font color="#FF0000">多 顶</font> 
                      选 择 题  </strong><font color="#FF0000"><span class="unnamed14">当前题库:<%=session("select_tk")%></span></font></div></td>
                </tr>
                <tr> 
                  <td width="80" valign="top" class="unnamed14"> <div align="right">题目内容:</div></td>
                  <td width="420" class="unnamed12">  
                    <textarea style="font-family:宋体;font-size:14px" name="test_textd" cols="52" rows="10" id="test_textd"></textarea></td>
                </tr>
                <tr> 
                  <%
   file_name=year(now)
   if month(now)<10 then file_name=file_name&"0"&month(now) else file_name=file_name&month(now) end if
   if day(now)<10 then file_name=file_name&"0"&day(now) else file_name=file_name&day(now) end if
   if hour(now)<10 then file_name=file_name&"0"&hour(now) else file_name=file_name&hour(now) end if
   if minute(now)<10 then file_name=file_name&"0"&minute(now) else file_name=file_name&minute(now) end if
   if second(now)<10 then file_name=file_name&"0"&second(now) else file_name=file_name&second(now) end if
%>
                  
                  <td valign="top" class="unnamed14">&nbsp;</td>
                  <td>  <a href="select_upfile.asp?file_name=<%=file_name%>&direr=testimages" target="_blank"><span class="unnamed14">输入图片</span></a>  <font color="#FF0000"><span class="unnamed12">注意:只有图片格式才能正确显示</span></font></td>
                </tr>
                <tr> 
                  <td valign="middle" class="unnamed14"> <div align="right">答案A:</div></td>
                  <td class="unnamed12">  
                    <input name="da_ad" type="text" id="da_a7" size="52"> <font color="#FF0000">*</font></td>
                </tr>
                <tr> 
                  <td valign="middle" class="unnamed14"> <div align="right">答案B:</div></td>
                  <td class="unnamed12">  
                    <input name="da_bd" type="text" id="da_bd" size="52"> <font color="#FF0000">*</font></td>
                </tr>
                <tr> 
                  <td valign="middle" class="unnamed14"> <div align="right">答案C:</div></td>
                  <td class="unnamed12">  
                    <input name="da_cd" type="text" id="da_cd" size="52"></td>
                </tr>
                <tr> 
                  <td valign="middle" class="unnamed14"> <div align="right">答案D:</div></td>
                  <td class="unnamed12">  
                    <input name="da_dd" type="text" id="da_dd" size="52"></td>
                </tr>
                <tr> 
                  <td valign="middle" class="unnamed14"> <div align="right">答案E:</div></td>
                  <td class="unnamed12">  
                    <input name="da_ed" type="text" id="da_ed" size="52"></td>
                </tr>
                <tr> 
                  <td valign="middle" class="unnamed14"> <div align="right">答案F:</div></td>
                  <td class="unnamed12">  
                    <input name="da_fd" type="text" id="da_fd" size="52"></td>
                </tr>
                <tr> 
                  <td valign="middle" class="unnamed14"> <div align="right">正确答案:</div></td>
                  <td class="unnamed12">  
                    <input name="sa" type="checkbox" id="sa" value="a">
                    A; 
                    <input name="sb" type="checkbox" id="sb" value="b">
                    B; 
                    <input name="sc" type="checkbox" id="sc" value="c">
                    C; 
                    <input name="sd" type="checkbox" id="sd" value="d">
                    D ; 
                    <input name="se" type="checkbox" id="se" value="e">
                    E; 
                    <input name="sf" type="checkbox" id="sf" value="f">
                    F。</td>
                </tr>
                <tr valign="middle"> 
                  <td height="30" colspan="2" class="unnamed14"> <div align="center"> 
                      <input type="submit" name="Submit32" value="写入题库">
                           
                      <input type="reset" name="Submit42" value=" 重 填 ">
                    </div></td>
                </tr>
              </table>
              <div align="center"><font color="#FF0000"><span class="unnamed14"> 
                <%if msg<>"" then response.write msg end if%>
                
                </span> </font></div>
            </form></td>
        </tr>
      </table>
      <%end if%>
    </td>
  </tr>
</table>
<%else%>

<table width="600" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td class="unnamed4"> </td>
  </tr>
</table>
<!--#include file="index01.asp" -->
<%end if%>

<!--#include file="inc/bottom.asp" -->
<%conn.close%>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -