こんにちは、水口＠昭栄通信工業株式会社です。

On Mon, 28 May 2001 10:44:28 +0900
しも <who@example.co.jp> wrote:

> 水口さんに指摘されて再度、見てみたのですがやはり非サポート
> みたいです。(FetchProgress、FetchComplete)
Formで直接サポートしているわけではありません。Formレベルの
ADODB.Recordset変数をWithEvents付きで宣言して、FormのOpenイベン
トかLoadイベントあたりでADODB.Recordsetを開き、Form.Recordsetに
Setするようにすれば、イベントは拾えるはずです。が、ADOとかイベン
ト付きオブジェクトの概念に慣れていないと難しいかもしれません。具
体的には、Formのデザインビューからコードビューを開き、

    Private WithEvents poRS As ADODB.Recordset

と宣言してコンパイルします。こうすれば、コードウインドウのオブジェ
クトボックスからpoRSが選択できるようになり、イベントを定義できま
すが、実際にイベントが拾えるかどうかまでは確認していません。また、
あるタイミングで

    Set poRS = Form.Recordset

としてやることでかなり手抜きはできそうですが、どのタイミングが適
当かは、よくわかりません。いずれにしろ、わたしのこの説明で理解で
きなければ、避けた方が賢明かもしれません。

> 一時テーブルはADPの立上げと同時に作成しています。
> CurrentProject.Connection.Execute "Create Table #TmpTable ( ・・・ ) ", ,
> adCmdText
> 私としてはCurrentProjectが終了した時点でセッション終了と思ってますが。
ヘルプには次の記述があります。「Connection プロパティは、実際に
は、アクティブなデータベースへの ActiveX Data Object (ADO) 接続
のコピーの参照を取得します。このため、Close メソッドを適用したり、
Connection オブジェクトのメソッドまたはプロパティを使って接続に
変更を加えようとしても、カレント データベースとの接続を保持する 
Access の実際の Connection オブジェクトに影響を与えることはあり
ません。」したがって、Connection プロパティを参照するたびに、新
しいセッションが作成される、と考えられなくもありません。

> エラー発生後にストアドで#TmpTableをSELECT文で表示すると正常に表示されるので
> まだ生きていることは確かな様です。
これは全く意味不明ですねぇ。件のエラーはテーブルがないために発生
していると思われるのですが。だから、やっぱり、コマンドボタンで一
時テーブルを削除したときには、別のセッションが開かれる場合がある、
としか思えませんね。

> エラー無視しても、正常に処理されないことには後の処理が続かないので何とか
> エラーにならないようにしたいのです。(T_T)
一時テーブルを##TmpTableとするのはだめですか？

よけいなお世話になりますが、今回のような問題は、Accessでアプリケー
ションを開発している限り、逃れられない問題だと思いますよ。Access
を使う以上、悩まずに作れるレベルで止めておかないと、最大のメリッ
トである「簡単に、短期間に」は満たせないのではないでしょうか？


-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  昭栄通信工業株式会社　情報システム部　SI課

  水口 敬唯 （みずぐち　ひろただ）
  HomePage: http://www.shoeicom.co.jp/
  E-Mail  : who@example.co.jp

 <<メッセージは等幅フォントを想定しています>>
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-