Question

表单录入如何可以随意新建一行或者多行，并且可以删除，提交时asp检测录入数据是否为空。

用意是在线做一个数据单据录入，因为有时候一张收据，会开几行不同的配件单价
如果在提交表格时，自动把新建的每行的数据都写入数据库。有时候是一行，有时候是几行，刚学ASP，不知道如何写。

能提供一下代码就更好了。谢谢！

Answer 1

就是一次提交多个数据，楼主何不将此表单录提前设好，比如最多有5行，那就设5行，然后批量提交时检测下即可，有数据的就录入，空的就不录入。
这样的话更方便，代码也更容易。
下面的代码就可以实现，亲测成功，希望能帮到你。
<%
For i=1 To Request.form("pp").count '以哪个文本框计数，你可以选一个必填的文本框。
if Request.QueryString("Action")="add" and Request.form("pp").count =1 then
dim name,bid,checkked,xin,lao,ang,pp,liang,libo,bumen,renyuan,jz,fj
name= Trim(Request.Form("name"))
bid= Trim(Request.Form("bid"))
xin= Trim(Request.Form("xin"))
lao= Trim(Request.Form("lao"))
ang= Trim(Request.Form("ang"))
pp= Trim(Request.Form("pp"))
liang= Trim(Request.Form("liang"))
checkked= Trim(Request.Form("checkked"))
libo= Trim(Request.Form("libo"))
bumen= Trim(Request.Form("bumen"))
renyuan= Trim(Request.Form("renyuan"))
jz= Trim(Request.Form("jz"))
yuanli= Trim(Request.Form("yuanli"))
cdrom= Trim(Request.Form("cdrom"))
fj= Trim(Request.Form("fj"))

Else
pp = Replace(Request.form("pp")(i),"'","")
liang = Replace(Request.form("liang")(i),"'","")
name= Trim(Request.Form("name"))
bid= Trim(Request.Form("bid"))
xin= Trim(Request.Form("xin"))
lao= Trim(Request.Form("lao"))
ang= Trim(Request.Form("ang"))
checkked= Trim(Request.Form("checkked"))
libo= Trim(Request.Form("libo"))
bumen= Trim(Request.Form("bumen"))
renyuan= Trim(Request.Form("renyuan"))
jz= Trim(Request.Form("jz"))
yuanli= Trim(Request.Form("yuanli"))
cdrom= Trim(Request.Form("cdrom"))
fj= Trim(Request.Form("fj"))

if name="" or bid="" or checkked="" or xin="" or pp="" or bumen="" or renyuan="" then
Response.Write "<script language='javascript'>alert('带*号的必须填写!');history.go(-1);</script>"
Response.End()
else

end if

SQL="Select * from record"
set rs=server.createobject("Adodb.Recordset")
rs.open SQL,conn,3,2
rs.AddNew
rs("name")=name
rs("bid")=bid
rs("xin")=xin
rs("lao")=lao
rs("ang")=ang
rs("pp")=pp
rs("liang")=liang
rs("libo")=libo
rs("bumen")=bumen
rs("renyuan")=renyuan
rs("jz")=jz
rs("yuanli")=yuanli
rs("cdrom")=cdrom
rs("fj")=fj
rs("checkked")=checkked

rs.Update
rs.Close
Set rs=Nothing
%>

Answer 2

楼主百度一把powerTableEdit看看，或者参考以下地址
lab.why100000.com/docs/js_code/edit_table.htm
可使得表格里的单元格变成编辑状态，能变文本框或下拉菜单
可新建行，修改行和删除行
它操作的是客户端的JS+HTML代码，
对于ASP，只能是基于上面的JS+HTML手写代码了，不过这个客户端代码确实好用
楼主可试试

追问

那request.from如何判定你的那些行是有数据的。