怎样复制上一条记录？

Question

insert into table1 select top 1 * from table1 order by id desc

Answer 1

insert into table1 
select top 1 字段1，字段2，字段3，字段4... from table1 order by id desc

Answer 2

If Not Adodc1.Recordset.BOF Then
Adodc1.Recordset.MoveLast
   cp(1) = Adodc1.Recordset.Fields("帐户")
   cp(2) = Adodc1.Recordset.Fields("日期")
Adodc1.Recordset.AddNew
   Adodc1.Recordset.Fields("帐户") = cp(1)
   Adodc1.Recordset.Fields("日期") = cp(2)
   
End If
不会让我用这么繁琐的代码吧！？