お世話になります。
VB.NET2003とSQLServer2005にて開発を行っております。
Aテーブルからデータを取得してその取得データを元にBテーブルを参照する。
と、言うのがあるのですが、
Bテーブル参照時に「この接続に関連付けられている DataReader が既に開いています。この DataReader を最初に閉じる必要があります。」の
エラーとなってしまいます。
複数SQLを発行する場合、再度接続を行わなければならないのでしょうか?
同一接続内で複数のSQLを発行することは出来ないのでしょうか?
どなたかご存知でしたらお教え願います。
以下、ソース
' 変数宣言
Dim objDBConnect As SqlConnection
Dim objDBTran As SqlTransaction
Dim objSqlCmd As SqlCommand
Dim objSqlDRA As SqlDataReader
Dim objSqlDRB As SqlDataReader
' データベース接続
objDBConnect = New SqlConnection("接続文字列")
objDBConnect.Open()
' トランザクション開始
objDBTran = objDBConnect.BeginTransaction(IsolationLevel.ReadCommitted)
' SQL発行
objSqlCmd = New SqlCommand("SELECT * FROM A_TABLE", objDBConnect)
objSqlDRA = objSqlCmd.ExecuteReader()
While objSqlDRA.Read()
objSqlCmd = New SqlCommand("SELECT * FROM B_TABLE", objDBConnect)
objSqlDRB = objSqlCmd.ExecuteReader() ←ここで、エラーとなってしまいます。
End While
No.2ベストアンサー
- 回答日時:
#1です。
ごめんなさい。1接続に対して1つだけみたいです。
▼MSDN引用
DataReader の終了
DataReader を使い終えたら、Close メソッドを呼び出す必要があります。
Command に出力パラメータや戻り値が含まれていても、DataReader が終了するまでは使用できません。
DataReader が開いている間、Connection はその DataReader によって排他的に使用されています。元の DataReader が終了するまでは、その Connection に対してはどのコマンドも実行できません。別の DataReader を作成することもできません。
参考URL:http://msdn2.microsoft.com/ja-jp/library/haa3afy …
mahny様回答ありがとうございます。
>1接続に対して1つだけみたいです。
という事は、DataReader では出来ないという事ですね。
DataReaderを使用するなら、DataReaderから別な入れ物にコピーして再度、DataReaderにて取得を行う。 の方法でいくしかないでしょうか?
また、別な方法がありましたら教えて頂けませんでしょうか?
No.4
- 回答日時:
DataReaderは1つの接続に対して、1つしかopenできません。
なので、接続(SqlConnection)を2つ作るか、別な入れ物にコピーして…かのどちらかではないでしょうか。
別な入れ物にコピーする場合は、データセットを使うのがおすすめです。
No.3
- 回答日時:
素直に、DataAdapter/DataSetは使えないのでしょうか?
手元に例がないので、うろ覚えで書きますが、
Dim conn as Connection
Dim sql as String
Dim dad1 as DataAdapter
Dim dad2 as DataAdapter
Dim dSet as DataSet
conn = new Connection("Data Source=~~~")
sql = "SELECT ~ FROM TBL_A WHERE ~~~"
DataAdapter dad1 = new DataAdapter(sql, conn)
dad1.Fill(dSet, "TBL_A")
sql = "SELECT ~ FROM TBL_B WHERE ~~~"
DataAdapter dad2 = new DataAdapter(sql, conn)
dad2.Fill(dSet, "TBL_B")
こんな感じ
No.1
- 回答日時:
そんなことは無いと思います。
While objSqlDRA.Read()
objSqlCmd = New SqlCommand("SELECT * FROM B_TABLE",objDBConnect)
objSqlDRB = objSqlCmd.ExecuteReader() '←ここで、エラーとなってしまいます。
End While
手元にVB環境無いので勘で書きますが、
上記ループの2週目でエラーが発生していませんか?
だとすれば、1週目のループで objSqlDRB As DataReader が出来上がっているのに
そこにさらにDataReaderオブジェクトを重ねようとしたからじゃないですかね。。。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) access count数を変数に格納 2 2022/03/30 19:21
- Visual Basic(VBA) ExcelからAccessのテーブルに書き込む時に時間がかかる 1 2022/10/14 20:38
- Access(アクセス) アクセス 有効なフィールド名、または式として認識できませんのエラー 3 2022/08/19 11:53
- MySQL SQLです。こんな感じですか?あってますか? うまくいきません教えてくださいお願いします 1 2023/07/08 15:27
- CGI perlで書いたcgiでsqliteの使い方を教えてください 2 2023/05/08 21:29
- MySQL うまくいきません教えてくださいお願いしますSQLです。クエリ構文です。 1 2023/07/07 12:39
- SQL Server [SQLServer] テーブル名からカラム名を取得する 1 2022/08/23 21:20
- PostgreSQL SQLで検索結果の記事を表示したい 1 2022/04/28 21:03
- Ruby pandasでsqlite3にテーブル作成・追加・読み出しでindexの取り扱い方教えてください 5 2023/03/08 09:57
- Visual Basic(VBA) Vbaで数式をポーランド記法に変換するコードを作って実行しようとするとフリーズします。 1 2022/05/24 17:53
このQ&Aを見た人はこんなQ&Aも見ています
-
新NISA制度は今までと何が変わる?非課税枠の拡大や投資対象の変更などを解説!
少額から投資を行う人のための非課税制度であるNISAが、2024年に改正される。おすすめの銘柄や投資額の目安について教えてもらった。
-
SQLを連続発行する時の正しい(?)書き方は?
Visual Basic(VBA)
-
VB.NET DataReaderが開かれている
Visual Basic(VBA)
-
一つのトランザクションでSELECTとUPDATEできますか? (ADO.NET)
SQL Server
-
-
4
VB.NETで DataRow()を利用して、値からコードを取得したい。
Visual Basic(VBA)
-
5
日付型のフィールドに空白を入れる方法を教えてください
その他(データベース)
-
6
.NET SqlDataReader のレコード有無判定
Visual Basic(VBA)
-
7
VB.net 任意の例外を発生させるには・・・
Visual Basic(VBA)
-
8
SQLで同じDBに対し2つのコネクションをもてる?
SQL Server
-
9
CloseとDisposeの違い
Visual Basic(VBA)
-
10
2つのDataTableをJoin
Visual Basic(VBA)
-
11
テーブルの最後(最新)のレコードを抽出したい
MySQL
-
12
共通モジュールでDBへの接続と利用方法
Visual Basic(VBA)
-
13
String"から型'Double'への変換は無効です。 とエラーが出ます。
Visual Basic(VBA)
-
14
DataGridViewで入力チェック後、フォーカスをあてたい
Visual Basic(VBA)
-
15
VB.NET2005 TextBox 高さ(Height) 変更
Visual Basic(VBA)
-
16
visual studio でインデントを自動的に揃えるショートカットキー
その他(プログラミング・Web制作)
-
17
VBとアクセスでSQL文に変数を使いたいのですが
Visual Basic(VBA)
-
18
<VB.NET>INSERT文でDBにデータを入れたい
Visual Basic(VBA)
-
19
DBから取得した値を配列へ代入する
Visual Basic(VBA)
-
20
VB.NET DataGridView 縦スクロールバーを常に表示
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
初心者ですデータベースの形式 ...
-
【VB】コンボボックスにデータ...
-
VB6でデータベースを変えるとテ...
-
UPDATE時にSETしたい日本語文字...
-
名前'dbOpenDynaset'は宣言され...
-
複数SQL発行について
-
vb.netでデータベース(Access)...
-
ListviewにDB内容を表示し方に...
-
VBA 変数名に変数を使用したい。
-
DataTableに特定のフィールドが...
-
INT64対応のprintf系関数はあり...
-
C#でbyte配列から画像を表示さ...
-
VBAでアクセスDBからデータの取...
-
手動または分散トランザクショ...
-
COBOLの基本的な事なので...
-
VB6からの移行したいけど、VB.N...
-
『列名 '担当者CD' があいま...
-
VBAコンボボックスの内容が反映...
-
Accessのフィールド名に半角括...
-
vba フィルター 複数条件 3つ以...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【VB】コンボボックスにデータ...
-
UPDATE時にSETしたい日本語文字...
-
複数SQL発行について
-
VB6.0でSQLServerへ・・・Recor...
-
ListviewにDB内容を表示し方に...
-
データベースの接続ができない
-
初心者ですデータベースの形式 ...
-
ExcelVBAでのAccessデータベー...
-
vb.netでデータベース(Access)...
-
名前'dbOpenDynaset'は宣言され...
-
VBSでADOを使ってaccessのテー...
-
VB6.0とaccessのDBを接続する
-
ASP.NET(VB.NET)でADO.NETを使...
-
VB6でデータベースを変えるとテ...
-
OracleDataReaderについて…
-
レンタルサーバでのDB接続の件
-
エクセルVBAでアクセスのテーブ...
-
【VB】データグリッドコントロ...
-
PHP+ACCESSのデータベース接続...
-
VB2005でACCESSの処理
おすすめ情報