兩個Recordset之間數据轉入和轉出問題???. 高手請進......(一定給分)

[liulike]

問題如下:(SQL)
1.我從原來的PMC(這個系統中的數据不能修改)系統中讀取一些數据,生成OldRst
再將OldRst中的數据轉入到另外一個數据源的記錄集:(NewRst),然后進行一系列
計算.注:（NewRst中的字段比OldRst中的字段多2個,其它相同)

請問各位:有沒有方法,實現成批轉入數据.

[liulike]

等待各位,敬請關注.

[Brunhild]

Dim fld As ADODB.Field

Do While not oldRst.EOF
newRst.AddNew
For Each fld In oldRst.Fields
newRst.Fields(fld.Name).Value = fld.Value
Next
newRst.UpdateBatch adAffectCurrent

oldRst.MoveNext
Loop