将记录添加到表中有这种方法吗？

[for123]

将记录添加到表中，传统地
1 insert into table1(field1,field2,...) values(vaue1,value2,...)
2 insert into tablel select * from table2
如果要将一个记录添加到另一个表中，而只用rs这个记录的属性，如何实现？
如：
while not rs.eof
‘针对每个记录添加到另一个表table2中,要求只能用到rs的属性，要简便
insert into table2？？？？？？？？？？？？
rs.movenext
wend

[for123]

完全一样。
sql="nsert into table2,rs????"

[WHQ]

sql = "INSERT INTO Table2 VALUE( " +
rs("Field1") + "," + rs("Field2") + ")"

[TopHead]

dim str as string,fld as long
str="insert into table2 values("
while not rs.eof
for fld=0 to rs.fields.count-1
str=str & rs(fld) & ","
next
str=left(str,len(str)-1) & ")"
'执行此语句str
rs.movenext

不就行啦。

[TopHead]

rs 和 tabel 的字段之间的对应关系是怎么样的？

[zigzag]

打开两个表的记录集rs1,rs2
while not rs2.eof
rs1.AddNew
for fld=0 to rs.fields.count-1
rs1(fld)=rs2(fld)
next
rs2.movenext
rs1.update
wend