改正一下,好象是从1开始的:
b.asp
a=array("","元旦","春节","元宵节"...)
set dts=request("dt")
for i=1 to dts.count
sql="insert into table_name(节日,日期) values('"&a(i)&"','"&dts(i)&"')"
conn.execute sql
next
...
b.asp
a=array("元旦","春节","元宵节"...
set dts=request("dt")
for i=0 to dts.count - 1
sql="insert into table_name(节日,日期) values('"&a(i)&"','"&dts(i)&"')"
conn.execute sql
next
...
<form .... action=cc.asp>
<%for i=1 to 2%>
<input name=<% response.write"data1"&i %> type=text> '节日名称
<input name=<% response.write"data2"&i %> type=text> '节日时间
<%next%>
</form>
cc.asp
--------------
dim data(50,2)
for i= 1 to 2
for j= 1 to session("num")
mydata="data"+cstr(i)+cstr(j)
data(j,i)=request(mydata)
next
for i= 1 to 2
Set rs=SERVER.CreateObject("ADODB.Recordset")
rs.Open "busq",ac,3,3
rs.AddNew
rs("...")=data(i,2)
rs("...")=data(i,1)
rs.Update
rs.close
set rs=nothing