表格动态添加行后里面的值怎么传
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%><!--#include file="../Connections/cc.asp" -->
<%
Dim Recordset1
Dim Recordset1_cmd
Dim Recordset1_numRows
Set Recordset1_cmd = Server.CreateObject (")
Recordset1_cmd.ActiveConnection = MM_cc_STRING
Recordset1_ = "SELECT workthingsname FROM workthings_type ORDER BY autoid ASC"
Recordset1_cmd.Prepared = true
Set Recordset1 = Recordset1_cmd.Execute
Recordset1_numRows = 0
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.
<html xmlns="http://www.
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<script LANGUAGE="JavaScript">
function newRow()
{
var row= tbl.insertRow(-1); //添加行
row.height="28"; //设置行高
var cell1= row.insertCell(0); //添加列
var cell2= row.insertCell(1); //添加列
var cell3= row.insertCell(2);
var cell4= row.insertCell(3);
var cell5= row.insertCell(4);
cell1.innerHTML="<center>"+"请选择"+"</center>";
cell2.innerHTML="<center>"+"<select id='select1'>"+" <% While (NOT Recordset1.EOF) %><option value='<%=(Recordset1.Fields.Item("workthingsname").Value)%>'><%=(Recordset1.Fields.Item("workthingsname").Value)%>"+"</option><%
Recordset1.MoveNext()
Wend
If (Recordset1.CursorType > 0) Then
Recordset1.MoveFirst
Else
Recordset1.Requery
End If
%>"+"</select>"+"</center>";
cell3.innerHTML="<center>"+"<input name='textfield' type='text' id='textfield' size='5'/>"+"</center>";
cell4.innerHTML=" ";
cell5.innerHTML=" ";
}
</script>
</head>
<body>
<form name="applicantTable" action="sectionCheckPage.asp" method="post">
<table width="840" border="1" cellpadding="0" cellspacing="0" bordercolor="#000000" id="tbl" align="center">
<!--DWLayoutTable-->
<tr>
<td height="43" colspan="5" align="center" valign="middle"><span class="STYLE6">办公用品申请单</span></td>
</tr>
<tr>
<td width="110" height="30" align="center" valign="middle"><span class="STYLE5">申请人姓名</span></td>
<td colspan="2" align="center" valign="middle"><span class="STYLE5">申请物品</span></td>
<td width="163" align="center" valign="middle"><span class="STYLE5">所属部门</span></td>
<td width="136" align="center" valign="middle"><span class="STYLE5">申请时间</span></td>
</tr>
<tr>
<td height="28" align="center" valign="middle"><!--DWLayoutEmptyCell--> </td>
<td width="326" align="center" valign="middle"><span class="STYLE5">品种
<label></label>
</span> <span class="STYLE8">
<label></label>
</span> <label></label></td>
<td width="105" align="center" valign="middle"><span class="STYLE5">数量</span></td>
<td align="center" valign="middle"><!--DWLayoutEmptyCell--> </td>
<td align="center" valign="middle"><!--DWLayoutEmptyCell--> </td>
</tr>
<tr>
<td height="28" align="center" valign="middle">请选择</td>
<td align="center" valign="middle"><label>
<select name="select1" id="select1">
<%
While (NOT Recordset1.EOF)
%>
<option value="<%=(Recordset1.Fields.Item("workthingsname").Value)%>"><%=(Recordset1.Fields.Item("workthingsname").Value)%></option>
<%
Recordset1.MoveNext()
Wend
If (Recordset1.CursorType > 0) Then
Recordset1.MoveFirst
Else
Recordset1.Requery
End If
%>
</select>
</label></td>
<td align="center" valign="middle"><label>
<input name="textfield1" type="text" id="textfield1" size="5" align="middle" />
</label></td>
<td colspan="2" align="center" valign="middle">添加请按<strong>→</strong>
<label>
<input type="button" name="button" id="button" value="添加" onclick="newRow()"/>
</label></td>
</tr>
</table>
<p></p>
<div align="center">
<input type="submit" value="提交" />
<input type="reset" value="作废" />
</div>
</form>
</body>
</html>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>
请问新添加的行里的内容如何传值到其他页面？
