循环显示文本框，再用form批量提交给另一文件，可是文本框里的值提交不过去. - 编程论坛

yms1232012-02-12 11:52

class.asp(显示文本框并填值的文件)：
<body >
  <form name="add" method="post" action="classsave.asp">
  <table >
  <%
  Set rs4=Server.CreateObject("ADODB.RecordSet")
  sql4="select * from 表 order by 字段1"
  rs4.open sql4,conn,1,3
  do Until rs4.eof
  %>
   <tr >
    <td>
      <input name="sl" type="text" class="input" size="16">
    </td>
    <td>
      <input name="dj" type="text" class="input" size="16">
   </td>
   </tr>
  <%
     rs4.movenext
    loop
  'end if
  %>
  <tr>
     <td>
      <input type="submit" name="Submit" value="提交">  
      <input type="reset" name="Submit2" value="重置">
     </td>
    </tr>
</table>
  </form>

classsave.asp(取class.asp中的值并提交给数据库的文件)：
<%
if request("act")="add" then
   set rs=server.CreateObject("ADODB.RecordSet")
   sql="select * from 表名"
   rs.open sql,conn,3,2
   Dim i
   For i=0 To Request.Form("sl").Count
       rs.addnew
       rs("HCMC")=0
       rs("RKSL")=request.form("sl")(i)
       rs("JG")=request.form("dj")(i)
       rs("RKRQ")=date()
       rs.update
   loop
   rs.close
   set rs=nothing
   conn.close
   set conn=nothing
   response.redirect "class.asp"
end if
%>
同名表单元素可以这样循环，注意用了name就不要用id