VBA'da bir kayıt kümesini çoğaltma veya kopyalama yolunu araştırıyorum. Ve demek istediğim, birbirinden bağımsız veriye sahip olmak.Derin Kopya veya VBA'da bir ADODB kayıt kümesini kopyalayın
Ben diğer modifiye etmeden bir kayıt modifiye olamaz
Set copyRS = origRS.Clone
Set copyRS = origRS
I yöntemlerden herhangi birini kullanmak
çalıştılar. Bu örnekte Yani:- Ben bir kayıt oluşturmak
- ben Recordset klon John
- adıyla kayıt doldurmak
- Ben klonlanmış bir
- Kontrol bir sonuç
Kod:
Dim origRS As Recordset, copyRS As Recordset
Set origRS = New Recordset
'Create field
origRS.Fields.Append "Name", adChar, 10, adFldUpdatable
origRS.Open
'Add name
origRS.AddNew "Name", "John"
'Clone/copy
Set copyRS = origRS.Clone
'Change record in cloned/copied recordset
copyRS.MoveFirst
copyRS!Name = "James"
'This should give me "JamesJohn"
MsgBox copyRS.Fields(0).Value & origRS.Fields(0)
Ama ne yazık ki benim için bu değiştirir hem recordsets
Sorum şu:
başka kayıt kümesinden bir kayıt kümesi kopyalama bir yolu var mı ve sonra (döngü olmadan) birbirinden bağımsız verileri değiştirmek?
Ben açıkça bir döngü üzerinden yapabilirsiniz biliyorum, ama başka yolu yoktur?
Parlak !! Bunu uzun zamandır arıyordum! –