<%
for i=1 to 5
title=request("title"&i)
content=request("content"&i)
conn.execute("insert into 表名 (title,content) values ('"&title&"','"&content&"')")
next
%>
或者
rs.open sql,conn,1,3
for i=1 to 5
title=request("title"&i)
content=request("content"&i)
rs.addnew
rs("title")=title
rs("content")=content
rs.update
%>
给另一个方法:
<%
dim ka, frag, cnt, sql '定义变量
sql="select * from cs" 'SQL查询语句
cnt=request.Form("ka").count '得到添加记录的条数
set rs=server.CreateObject("ADODB.recordset") '创建记录集
rs.open sql,conn,1,3
for i=1 to cnt '使用一个循环语句向记录集写入数据
ka=request.Form("ka")(i) '将表单传递的值分次传递给变量,注意后面的(i)一定不能少。
frag=request.Form("frag")(i) '如果少了(i),就一次性把值全给你变量。
rs.addnew '开使添加
rs("cs_ka")=ka
rs("cs_d_f")=frag
rs("cs_date")=date()
rs.update '把对记录的修改写入数据库
next '循环
rs.close '关闭记录集释放资源
%>
以上就是asp 如何同时提交多条记录进行保存的详细内容,更多信息请关注OD云其它相关文章!

喜 欢 420