asp在线考试的填空题提交

  <td>
   
                  &nbsp;&nbsp;答案:<input name=<%=rsTest(“id”)%>
     type=”text” onchange=”window.open (‘savetk.asp?answer=’+document.getElementById(‘<%=rsTest(“id”)%>’).value+’&id=<%=rsTest(“id”)%>’,’fraSaveAnswer’,’height=1,width=1′);this.focus()” >
   
     </td>

 

‘fraSaveAnswer’ 是新窗口的名字，在采用如下代码就可以实现窗口不弹出

<iframe name=”fraSaveAnswer” style=”visibility:hidden;height:0px” src=””></iframe>

直接给窗口加上样式就搞定了。

适用于动态表单生成的提交.!

 

上次在每个填空题后面加个‘提交’，想想自己也真够笨的。

 

信息系一个在线考试站内的代码 下面的代码是数据入库的操作

 

<%
dim intAnswer,intID,rs,str1Sql
intAnswer =request.querystring(“answer”)
intID = CInt(request.querystring(“id”))

set rs = server.createobject(“ADODB.Recordset”)
str1Sql = “select tanswer from prj_process where id =”& intID
    rs.open str1Sql,G_CONN,1,3
rs(“tanswer”)=intAnswer
    rs.update
rs.close
Set rs = Nothing
%>