Nothing

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

          adodc1.recordset.movenext
      loop
以上代码未经验证，如有错误请自己分析解决