MDBデータベースへの接続の動的変更

Cappuccino 2004-09-01 20:30:06 No: 85362

いつも参考にさせていただいてます。早速ですが質問をさせていただきます。
DataEnvironmentを使ってADOでDBアプリを作っているのですが、リストビュー
コントロールに表示されているいくつかのMDBファイルのうち、クリックされたMDBファイルを動的に読み出す処理の場合、現在は
Private Sub ListView1_ItemClick(ByVal Item As MSComctlLib.ListItem)

With DE.Connection5

        If .State = adStateOpen Then

            .Close

            .ConnectionString = "provider=Microsoft.Jet.OLEDB.4.0;" & _                               "Data Source=" & Dir1.Path & "\" & _                                 Item & ";"

            .Open

            '読出データ表示処理
            call sShowData

        End If

    End With

End Sub
というようにやると、sShowData関数の中で
”この操作を実行するために接続を使用できません。このコンテキストで閉
じているかあるいは無効です。”
というエラーがでてしまうのですが、こういう場合動的にDBの接続を切り替
える方法はどうしたらいいんでしょうか。。どなたかにアドバイスいただけ
れば幸いです。よろしくお願いします。

Cappuccino 2004-09-01 20:34:13 No: 85363

すみません。追記です
環境は
VB : 6.0 SP5
OS : Windows XP
です。

たくまま 2004-09-03 22:22:31 No: 85364

はじめまして
＞call sShowData
の中身でどのようなコーディングをしてますか？
DE.Connection5はどこで定義しているのでしょうか？
DE.Connection5が＜sShowData＞の中で無効なのでは？