использование ADO для excel->access

[jan]

Возникает Multiple-step OLE DB operation generated error
при использовании кода:
Set MyCon = New ADODB.Connection
MyCon.ConnectionString = "DSN=new"
MyCon.Open
Set MyRec = New ADODB.Recordset
MyRec.LockType = adLockOptimistic
MyRec.CursorType = adOpenKeyset
MyRec.Source = strSQL
Set MyRec.ActiveConnection = MyCon
MyRec.Open
'MyRec.Index = "IDtape"
Set MyRec2 = New ADODB.Recordset
MyRec2.LockType = adLockOptimistic
MyRec2.CursorType = adOpenKeyset
MyRec2.Source = strSQL
Set MyRec2.ActiveConnection = MyCon
MyRec2.Open
..далее добавляется в MyRec новая запись, запоминается её IDtape
.. потом добавляется в MyRec2 новая запись и её поле IDtape=запомненное IDtape MyRec - ВОТ здесь Multiple-step !!!
В чём ошибка?