stmodcl.asp

这是用asp做的一个网上考试题库系统

             <input type="checkbox" name="stxx" value="B" >  
           <%end if%>  
          B</div>  
      </td>  
      <td width="54%"><%=Session("stzwB")%></td>  
    </tr>  
    <% elseif (Session("stwjB" )<>"") then%>   
    <tr>   
      <td width="20%" nowrap>   
        <div align="center">   
         <%if Request.QueryString("type")=1 then%>  
             <input type="radio" name="stxx" value="B" >  
           <% else %>  
             <input type="checkbox" name="stxx" value="B" >  
           <%end if%>  
          B</div>  
      </td>  
      <td width="54%">   
        <p>   
          <a href="<%=tt%><%=Session("stwjB")%>" target="_blank" >选项B附件</a>  
        </p>  
      </td>  
    </tr>  
    <%end if%> <%if ((Session("stzwB" )<>"")and (Session("stwjB")<>"")) then%>   
    <tr>   
      <td width="20%" nowrap>&nbsp;</td>  
      <td width="54%">   
        <p>   
           <a href="<%=tt%><%=Session("stwjB")%>" target="_blank" >选项B附件</a>   
        </p>  
      </td>  
    </tr>  
    <tr>   
      <td width="20%" nowrap>&nbsp;</td>  
      <td width="54%">&nbsp;</td>  
    </tr>  
    <%end if%> <%if (Session("stzwC" )<>"") then%>   
    <tr>   
      <td width="20%" nowrap>   
        <div align="center">   
           <%if Request.QueryString("type")=1 then%>  
             <input type="radio" name="stxx" value="C" >  
           <% else %>  
             <input type="checkbox" name="stxx" value="C" >  
           <%end if%>  
          C</div>  
      </td>  
      <td width="54%"><%=Session("stzwC")%></td>  
    </tr>  
    <% elseif (Session("stwjC" )<>"") then%>   
    <tr>   
      <td width="20%" nowrap>   
        <div align="center">   
           <%if Request.QueryString("type")=1 then%>  
             <input type="radio" name="stxx" value="C" >  
           <% else %>  
             <input type="checkbox" name="stxx" value="C" >  
           <%end if%>  
          C</div>  
      </td>  
      <td width="54%">   
        <p>   
           <a href="<%=tt%><%=Session("stwjC")%>" target="_blank" >选项C附件</a>  
        </p>  
      </td>  
    </tr>  
    <%end if%> <%if ((Session("stzwC" )<>"")and(Session("stwjC")<>"")) then%>   
    <tr>   
      <td width="20%" nowrap>&nbsp;</td>  
      <td width="54%">   
        <p>   
          <a href="<%=tt%><%=Session("stwjC")%>" target="_blank" >选项C附件</a>
        </p>  
      </td>  
    </tr>  
    <tr>   
      <td width="20%" nowrap>&nbsp;</td>  
      <td width="54%">&nbsp;</td>  
    </tr>  
    <%end if%> <%if (Session("stzwD" )<>"") then%>   
    <tr>   
      <td width="20%" nowrap>   
        <div align="center">   
          <%if Request.QueryString("type")=1 then%>  
             <input type="radio" name="stxx" value="D" >  
           <% else %>  
             <input type="checkbox" name="stxx" value="D" >  
           <%end if%>  
          D</div>  
      </td>  
      <td width="54%"><%=Session("stzwD")%></td>  
    </tr>  
    <% elseif (Session("stwjD" )<>"") then%>   
    <tr>   
      <td width="20%" nowrap>   
        <div align="center">   
           <%if Request.QueryString("type")=1 then%>  
             <input type="radio" name="stxx" value="D" >  
           <% else %>  
             <input type="checkbox" name="stxx" value="D" >  
           <%end if%>  
  
          D</div>  
      </td>  
      <td width="54%">   
        <p>   
          <a href="<%=tt%><%=Session("stwjD")%>" target="_blank" >选项D附件</a> 
        </p>  
      </td>  
    </tr>  
    <%end if%> <%if ((Session("stzwD" )<>"")and(Session("stwjD")<>"")) then%>   
    <tr>   
      <td width="20%" nowrap>&nbsp;</td>  
      <td width="54%">   
        <p>   
          <a href="<%=tt%><%=Session("stwjD")%>" target="_blank" >选项D附件</a>
        </p>  
      </td>  
    </tr>  
    <tr>  
      <td width="20%" nowrap>&nbsp;</td>  
      <td width="54%">&nbsp;</td>  
    </tr>  
    <%end if%> <%if (Session("stzwE" )<>"") then%>   
    <tr>   
      <td width="20%" nowrap>   
        <div align="center">   
         <%if Request.QueryString("type")=1 then%>  
             <input type="radio" name="stxx" value="E" >  
           <% else %>  
             <input type="checkbox" name="stxx" value="E" >  
           <%end if%>  
          E</div>  
      </td>  
      <td width="54%"><%=Session("stzwE")%></td>  
    </tr>  
    <% elseif (Session("stwjE" )<>"") then%>   
    <tr>   
      <td width="20%" nowrap>   
        <div align="center">   
          <%if Request.QueryString("type")=1 then%>  
             <input type="radio" name="stxx" value="E" >  
           <% else %>  
             <input type="checkbox" name="stxx" value="E" >  
           <%end if%>  
          E</div>  
      </td>  
      <td width="54%">   
        <p>   
          <a href="<%=tt%><%=Session("stwjE")%>" target="_blank" >选项E附件</a> 
        </p>  
      </td>  
    </tr>  
    <%end if%> <%if ((Session("stzwE" )<>"")and(Session("stwjE")<>"")) then%>   
    <tr>   
      <td width="20%">&nbsp;</td>  
      <td width="54%">   
        <p>   
          <a href="<%=tt%><%=Session("stwjE")%>" target="_blank" >选项E附件</a>
        </p>  
      </td>  
    </tr>  
    <%end if%>   
   <%if Request.QueryString("type")=2 then %>   
     <%if (Session("stzwF" )<>"") then%>   
    <tr>   
      <td width="20%" nowrap>   
        <div align="center">   
          <input type="checkbox" name="stxx" value="F" >  
          F</div>  
      </td>  
      <td width="54%"><%=Session("stzwF")%></td>  
    </tr>  
    <% elseif (Session("stwjF" )<>"") then%>   
    <tr>   
      <td width="20%" nowrap>   
        <div align="center">   
          <input type="radio" name="stxx" value="E" >  
          F</div>  
      </td>  
      <td width="54%">   
        <p>   
          <a href="<%=tt%><%=Session("stwjF")%>" target="_blank" >选项F附件</a>
        </p>  
      </td>  
    </tr>  
    <%end if%>  
    <%if ((Session("stzwF" )<>"")and(Session("stwjF")<>"")) then%>   
    <tr>   
      <td width="20%">&nbsp;</td>  
      <td width="54%">   
        <p>   
          <a href="<%=tt%><%=Session("stwjF")%>" target="_blank" >选项F附件</a> 
        </p>  
      </td>  
    </tr>  
    <%end if%>   
  <%end if%>  
  </table>  
   
  <table width="97%" border="0">  
    <tr>   
      <td>   
        <hr>  
      </td>  
    </tr>  
  </table>  
  <%end if%>   
  <%if Request.QueryString ("tpye")=4 then%>  
   <table>  
    <tr>  
  <td width="13%" nowrap>&nbsp;</td>  
  <td>  
        <table width="75%" border="0" align="left">  
          <tr>   
            <td width="15%" nowrap>   
              <div align="left">   
                <input type="radio" name="pd" value="T" >  
                <font color="#3333FF" size="3">正确</font> </div>  
            </td>  
            <td width="3%" nowrap>   
              <div align="left"></div>  
            </td>  
            <td width="82%" nowrap>   
              <div align="left">   
                <input type="radio" name="pd" value="F">  
                <font color="#3333FF" size="3"> 错误 </font></div>  
            </td>  
          </tr>  
        </table>  
<% end if%>  
    
  <table width="93%" border="0">  
    <tr>   
      <td width="33%" nowrap>   
        <div align="center"><b><font color="#FF3333">答案：</font></b></div>  
      </td>  
     <%if Request.QueryString("type")<>4 then%>   
       <td width="67%"><%=Session("answer")%></td>  
     <%else%>  
       <td width="67%" nowrap><div align="left">   
      <%if Session("answer")="T" then%>   
        正确 <%else%>错误 <% end if%> </div>  
      </td>   
      <% end if%>  
      
  
    </tr>  
    <tr>   
      <td width="33%" nowrap>   
        <div align="center"><font color="#FF3333">答案解释：</font></div>  
      </td>  
      <td width="67%"> <%=Session("dajs")%></td>  
    </tr>  
  </table>  
  <table width="92%" border="0">  
    <tr>   
      <td width="43%" nowrap>   
        <div align="right">   
          <input type="button" name="xgst" value="返回上页" onClick="xg()">  
        </div>  
      </td>  
      <td width="17%" nowrap>   
        <div align="left">   
          <input type="submit" name="Submit" value="修改入库">  
        </div>  
      </td>  
     
    </tr>  
  </table>  
    
  </form>  
</html>