1、如果是同一数据库,使用的是不同表,最好使用SQL语句,速度极快
insert into 表2 select 学号,姓名,成绩 from 表1 where 分数>=80 and 分数<90
2、如果是不同的数据库,可以使用循环
do while adodc1.recordset.eof
adodc2.recordset.addnew
adodc2.recordset.fields("学号").value=adodc1.recordset.fields("学号").value
adodc2.recordset.fields("姓名").value=adodc1.recordset.fields("姓名").value
adodc2.recordset.fields("成绩").value=adodc1.recordset.fields("成绩").value
adodc2.recordset.update