简单问题，就是搞不定，希望大家指点迷津！自动提交问题

吧<form.....></form>移到代码上面应该可以

解决方案 »

  1.   

    <form method="POST" action="createresult.asp"  name="testform" onsubmit="return submitit();">
    <input type=text name=ttt>
    </form>
    <script language="javascript"> 
    alert("确定开始考试并启动计时器！考试时间为2小时");
    var myh=0
    var mym=0;
    var mys=30;
    function lefttime(){
    mys--;
      if (mys<0)
      {
        mys=59;
        mym--;
      }
      if (mym<0)
      {
        mym=59;
        myh--;
        if (myh<0)
        {
        alert("考试时间到，确定查看成绩！");
        document.testform.submit()
        }
      }
    document.testform.ttt.value=myh+":"+mym+":"+mys;
    setTimeout("lefttime(myh)",1000);} 
    lefttime();function submitit(){
    if (confirm("未到交卷时间，您确定要提交么？")) 
      return true; 
    else 
      return false; 
    } 
    </script>这样可以运行呀。
      

  2.   

    <body>
    <form method="POST" action="createresult.asp"  id="testform">
    </form>
    <script language="javascript"> 
    alert("确定开始考试并启动计时器！考试时间为2小时");
    var myh=0
    var mym=0;
    var mys=1;
    function lefttime(){
    mys--;
      if (mys<0)
      {
        mys=59;
        mym--;
      }
      if (mym<0)
      {
        mym=59;
        myh--;
        if (myh<0)
        {
        alert("考试时间到，确定查看成绩！");
    if (submitit()) testform.submit();
        }
      }
    lefttime.value=myh+":"+mym+":"+mys;
    setTimeout("lefttime(myh)",1000);} 
    lefttime();function submitit(){
    if (confirm("未到交卷时间，您确定要提交么？")) 
      return true; 
    else 
      return false; 
    } 
    </script>
    </body>
    这个可以
      

  3.   

    谢谢大家的详细解答，你们的方法我都一一试过了，但是没有成功。
    提示信息还是一样：（出现运行期错误，是否纠正该错误？错误：对象不支持此属性或方法。）
    关键的地方是testform.submit()这句话执行不了，难道表单不支持submit（）方法？？？
    到底什么原因？？望高手们再予以指导。
      

  4.   

    如果<form>....</form>间是简单的<input type=text>的话，我试过了，是能够成功的。
    但是我的程序中<form>....</form>间的代码很长，可能是这些代码的影响，导致testform.submit()不能提交！！
      

  5.   

    <form method="POST" action="createresult.asp"  id="testform" onsubmit="return submitit();">
    <!--判断题-->
    <table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber3">
        <tr>
          <td width="100%" height="25"><b><font color="#000080" size="3">二、判断题(每题<%=judgeper%>分,共<%=judgenumber%>题。</font></b></td>
        </tr>  
      </table><%
    randomize
    for i=1 to judgenumber
    set rs=server.createobject("adodb.recordset")
    sql="select * from question where type='判断题' and haveselect=0 "
    rs.open sql,conn,3,2
    count=rs.recordcount
    temp=fix(count*rnd(10))
    rs.move temprs("haveselect")=1strid0=strid0 & rs("ID") & ","%>
      <table border="0" cellspacing="1" style="border-collapse: collapse" bordercolor="#C0C0C0" width="100%"  cellpadding="0">
        <tr>
          <td width="100%" bgcolor="#EFEFEF" height="20">&nbsp;&nbsp;<b><%=i%>、<%=rs("question")%></b></td>
        </tr>
     
        <tr>
          <td width="100%">&nbsp;&nbsp;&nbsp;&nbsp;<input type="radio" name="NO<%=rs("id")%>" value="对">对</td>
        </tr>
     
        <tr>
          <td width="100%">&nbsp;&nbsp;&nbsp;&nbsp;<input type="radio" name="NO<%=rs("id")%>" value="错">错</td>
        </tr>
     
       </table>
      <%  
      rs.update
    next
    rs.close
    set rs=nothing
    %><!--单项选择-->  
    <table border="0" cellspacing="0"  bordercolor="#111111" width="100%" >
        <tr>
          <td width="100%" height="25"><b><font size="3" color="#000080">一、单项选择题(每题<%=singleper%>分,共<%=singlenumber%>题)</font></b></td>
        </tr>
      </table>
      <%randomize
    for i=1 to singlenumber
    set rs=server.createobject("adodb.recordset")
    sql="select * from question where type='单选题' and haveselect=0 "
    rs.open sql,conn,3,2
    count=rs.recordcount
    temp=fix(count*rnd(10))
    rs.move temp
    rs("haveselect")=1strid1=strid1 & rs("ID") & ","%>
      <table border="0" cellspacing="1" style="border-collapse: collapse" bordercolor="#C0C0C0" width="100%"  cellpadding="0">
        <tr>
          <td width="100%" bgcolor="#EFEFEF" height="20">&nbsp;&nbsp;<b><%=i%>、<%=rs("question")%></b></td>
        </tr>
        <%
      if rs("A")<>"" then
      %>
        <tr>
          <td width="100%">&nbsp;&nbsp;&nbsp;&nbsp;<input type="radio" name="NO<%=rs("id")%>" value="A">A、<%=rs("A")%></td>
        </tr>
        <%
      end if
      %> <%
      if rs("B")<>"" then
      %>
        <tr>
          <td width="100%">&nbsp;&nbsp;&nbsp;&nbsp;<input type="radio" name="NO<%=rs("id")%>" value="B">B、<%=rs("B")%></td>
        </tr>
        <%
      end if
      %> <%
      if rs("C")<>"" then
      %>
        <tr>
          <td width="100%">&nbsp;&nbsp;&nbsp;&nbsp;<input type="radio" name="NO<%=rs("id")%>" value="C">C、<%=rs("C")%></td>
        </tr>
        <%
      end if
      %> <%
      if rs("D")<>"" then
      %>
        <tr>
          <td width="100%">&nbsp;&nbsp;&nbsp;&nbsp;<input type="radio" name="NO<%=rs("id")%>" value="D">D、<%=rs("D")%></td>
        </tr>
      <%
      end if
      %>   
      </table>
      <%  
      rs.update
    next
    rs.close
    set rs=nothing
    %>
    <!--填空题-->
    <table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber3">
        <tr>
          <td width="100%" height="25"><b><font color="#000080" size="3">二、填空题(每题<%'=tiankongper%>分,共<%=tiankongnum%>题)。</font></b></td>
        </tr>                                                                  
      </table><%randomize
    for i=1 to tiankongnum
    set rs=server.createobject("adodb.recordset")
    sql="select * from question where type='填空题' and haveselect=0 "
    rs.open sql,conn,3,2
    count=rs.recordcount
    temp=fix(count*rnd(10))
    rs.move temp
    rs("haveselect")=1strid4=strid4 & rs("ID") & ","%>
      <table border="0" cellspacing="1" style="border-collapse: collapse" bordercolor="#C0C0C0" width="100%"  cellpadding="0">
        <tr>
          <td width="100%" bgcolor="#EFEFEF" height="20">&nbsp;&nbsp;<b><%=i%>、<%=rs("question")%></b></td>
        </tr>
     
        <tr>
          <td width="100%">&nbsp;&nbsp;&nbsp;&nbsp;答案：<input type="text" name="NO<%=rs("id")%>"></td>
        </tr>
     
      </table>
      <%  
      rs.update
    next
    rs.close
    set rs=nothing
    %><!--问答题-->
    <table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber3">
        <tr>
          <td width="100%" height="25"><b><font color="#000080" size="3">二、问答题(共<%=wendanum%>题。不计入总分)</font></b></td>
        </tr>
      </table><%randomize
    for i=1 to wendanum
    set rs=server.createobject("adodb.recordset")
    sql="select * from question where type='问答题' and haveselect=0 "
    rs.open sql,conn,3,2
    count=rs.recordcount
    temp=fix(count*rnd(10))
    rs.move temp
    rs("haveselect")=1strid5=strid5 & rs("ID") & ","%>
      <table border="0" cellspacing="1" style="border-collapse: collapse" bordercolor="#C0C0C0" width="100%"  cellpadding="0">
        <tr>
          <td width="100%" bgcolor="#EFEFEF" height="20">&nbsp;&nbsp;<b><%=i%>、<%=rs("question")%></b></td>
        </tr>
     
        <tr>
          <td width="100%">&nbsp;&nbsp;&nbsp;&nbsp;答案：<textarea cols="73" row="10" name="NO<%=rs("id")%>" rows="1"></textarea></td>
        </tr>
     
      </table>
      <%  
      rs.update
    next
    rs.close
    set rs=nothing
    %>
    <%
    response.write("<input type='hidden' name='hidQuestID0' value=" & strID0 & ">")
    response.write("<input type='hidden' name='hidQuestID1' value=" & strID1 & ">")response.write("<input type='hidden' name='hidQuestID5' value=" & strID5 & ">")
    response.write("<input type='hidden' name='hidQuestID4' value=" & strID4 & ">")
    set rs=server.createobject("adodb.recordset")
    sql="select * from question where haveselect=1 "
    rs.open sql,conn,3,2
    rs.movefirst
     do while  not rs.eof  
       rs("haveselect")=0
       rs.update
       rs.movenext
     loop
    rs.close
    set rs=nothing
    call endConnection()%> 
    <p align=center><input type="submit" value="交卷" name="submit" ></p>
    </form>