サンプルコード例メモ クエリ実行処理関連Public Sub BeginTransX2() 'recordset and connection variables Dim Cnxn As ADODB.Connection Dim