内部に複数の Recordset を含む Recordset オブジェクトを構築しようとしています。.NextRecordset メソッドを使用して実行しようとしていますが、問題が発生しています。具体的には、メソッドCurrent provider does not support returning multiple recordsets from a single execution.
の実行時にエラーが発生します.NextRecordset
。
Dim oRs As ADODB.Recordset
Set oRs = New ADODB.Recordset
oRs.CursorLocation = adUseClient
oRs.Fields.Append "hello1", adVarChar, 100, adFldUpdatable
oRs.Fields.Append "hello2", adVarChar, 100, adFldUpdatable
oRs.Open , , adOpenStatic, adLockOptimistic
oRs.AddNew
oRs.Fields("hello1") = "234"
oRs.Fields("hello2") = "234"
Set oRs = oRs.NextRecordset ' BLOWS UP
' Add some columns + rows to this recordset
追加の複雑さは、これを C# で (相互運用機能を介して) 行う必要があることですが、最初に VB6 で理解できれば幸いです。
それで、私がやりたいことをすることは可能ですか?