文書番号: 275089 - 最終更新日: 2006年2月6日 - リビジョン: 5.2

ストアド プロシージャや関数に連結したフォームやレポートに WHERE 条件が適用されない

お知らせお使いのオペレーティング システムには適用しない情報が含まれている場合があります。
この記事は、以前は次の ID で公開されていました: JP275089
難易度 : 中。基本的なマクロ、コーディング、相互運用性に関する知識が必要です。

この資料は Microsoft Access プロジェクト (.adp) についてのみ記述したものです。

目次

すべて展開する | すべて折りたたむ

現象

別の Access フォームなど、別のオブジェクトに表示される値を使用して Access のフォームやレポートをフィルタしようとしても、そのフィルタが適用されません。

解決方法

ストアド プロシージャや関数に連結したフォームやレポートにフィルタを適用できないという問題の解決には、複数の方法があります。解決方法の多くは、ストアド プロシージャや関数を、テーブル、ビュー、SQL ステートメントなど、他の種類のレコード ソースで置き換えるという方法です。

これに対し、以下の解決方法では、フォームのレコード ソースとしてストアド プロシージャを使用したまま、WHERE 条件またはフィルタを実装できます。

注意 : 以下の手順を実行すると、Access サンプル プロジェクト NorthwindCS.adp が変更されます。NorthwindCS.adp ファイルのバックアップ コピーを作成し、そのコピーに対してこれらの手順を実行することをお勧めします。

  1. サンプル プロジェクト NorthwindCS.adp を開きます。
  2. [データベース] ウィンドウで、[商品区分] テーブルをクリックして強調表示し、[挿入] メニューの [オートフォーム] をクリックします。
  3. このフォームをデザイン ビューで開きます。
  4. メイン フォームから [テーブル.商品] というラベルの付いたサブフォーム オブジェクトを削除し、フォームにコマンド ボタンを追加します。ウィザードが起動した場合は、[キャンセル] をクリックします。
  5. コマンド ボタンに次の各プロパティを設定します。
    名前 :       cmdFilterProducts
    標題 :       Filter Products
    クリック時 : [イベント プロシージャ]
    					
  6. このコマンド ボタンの "クリック時" プロパティに次のイベント プロシージャを設定します。
    Private Sub cmdFilterProducts_Click()
        DoCmd.OpenForm "商品", acNormal, , , acFormEdit, acWindowNormal
    End Sub
    					
  7. [ファイル] メニューの [終了して Microsoft Access へ戻る] をクリックします。
  8. [ファイル] メニューの [上書き保存] をクリックし、商品区分1 という名前でフォームを保存します。
  9. データベース ウィンドウで、[クエリ] をクリックし、[新規作成] をクリックします。
  10. [新しいクエリ] ダイアログ ボックスで [テキスト ストアド プロシージャの作成] をクリックし、[OK] をクリックします。
  11. 次の Transact-SQL ステートメントを入力するか貼り付けてから、ストアド プロシージャをデフォルトの spProducts という名前で保存します。
    CREATE PROCEDURE spProducts
    	@CatID int
    AS
    	SELECT * FROM 商品 WHERE 区分コード = @CatID
    RETURN 
    					
  12. [商品] フォームをデザイン ビューで開き、フォームのプロパティで "レコードソース" プロパティを [商品] から [spProducts] に変更します。
  13. フォームのプロパティで "入力パラメータ" の位置までスクロールし、このプロパティに次の値を設定します。
    @CatID int = Forms![商品区分1]![区分コード]
  14. [商品] フォームを閉じて保存し、[商品区分1] フォームを開きます。
  15. [区分名] に [調味料] を指定し、[Filter Products] をクリックします。[商品] フォームが開き、[区分名] が [調味料] である商品のみが表示されます。

状況

この動作は仕様です。

詳細

Access では、フォームやレポートに表示されるレコードの数を制限する場合が多くあります。これを行う方法として、WHERE 条件を使用してフォーム (またはレポート) のレコードにフィルタをかけ、条件値の指定に他のオブジェクトを使用する方法があります。たとえば、あるフォームで表示するレコードの数を制限するために使用される条件値を、別のフォームに表示できます。ただし、フィルタ処理を行うフォームのレコード ソースがストアド プロシージャや関数である場合、そのフィルタは無視されます。次の手順で、この現象を具体的に説明します。

注意 : 以下の手順を実行すると、Access サンプル プロジェクト NorthwindCS.adp が変更されます。NorthwindCS.adp ファイルのバックアップ コピーを作成し、そのコピーに対してこれらの手順を実行することをお勧めします。

現象の再現手順

  1. この資料の「解決方法」の手順 1. 〜 5. を実行します。
  2. コマンド ボタンの "クリック時" プロパティに次のイベント プロシージャを設定します。
    Private Sub cmdFilterProducts_Click()
        DoCmd.OpenForm "商品", acNormal, , "[区分コード] = " & Me!区分コード, acFormEdit, acWindowNormal
    End Sub
    					
  3. [ファイル] メニューの [終了して Microsoft Access へ戻る] をクリックします。
  4. [ファイル] メニューの [上書き保存] をクリックし、商品区分1 という名前でフォームを保存します。
  5. このフォームをフォーム ビューで開きます。
  6. [区分名] に [調味料] を指定し、[Filter Products] をクリックします。[商品] フォームが開き、[区分名] が [調味料] である商品のみが表示されます。
  7. [商品] フォームと [商品区分1] フォームを閉じます。
  8. [データベース] ウィンドウで、[クエリ] をクリックし、[新規作成] をクリックします。[テキスト ストアド プロシージャの作成] をクリックし、[OK] をクリックします。
  9. 次の Transact-SQL ステートメントを入力するか貼り付けてから、ストアド プロシージャをデフォルトの spProducts という名前で保存します。
    CREATE PROCEDURE spProducts
    AS
    	SELECT * FROM 商品
    RETURN 
    					
  10. [商品] フォームをデザイン ビューで開き、フォームのプロパティで "レコードソース" プロパティを [商品] から [spProducts] に変更します。
  11. [商品] フォームを閉じて保存し、[商品区分1] フォームを開きます。
  12. [区分名] に [調味料] を指定し、[Filter Products] をクリックします。[商品] フォームが開き、[区分名] が [調味料] の商品のみではなく、すべての商品が表示されます。

この資料は以下の製品について記述したものです。
  • Microsoft Office Access 2003
  • Microsoft Access 2002 Standard Edition
キーワード:?
kbvba kbprogramming kbclientserver kbnofix kbprb KB275089
"Microsoft Knowledge Baseに含まれている情報は、いかなる保証もない現状ベースで提供されるものです。Microsoft Corporation及びその関連会社は、市場性および特定の目的への適合性を含めて、明示的にも黙示的にも、一切の保証をいたしません。さらに、Microsoft Corporation及びその関連会社は、本文書に含まれている情報の使用及び使用結果につき、正確性、真実性等、いかなる表明・保証も行ないません。Microsoft Corporation、その関連会社及びこれらの権限ある代理人による口頭または書面による一切の情報提供またはアドバイスは、保証を意味するものではなく、かつ上記免責条項の範囲を狭めるものではありません。Microsoft Corporation、その関連会社 及びこれらの者の供給者は、直接的、間接的、偶発的、結果的損害、逸失利益、懲罰的損害、または特別損害を含む全ての損害に対して、状況のいかんを問わず一切責任を負いません。(Microsoft Corporation、その関連会社 またはこれらの者の供給者がかかる損害の発生可能性を了知している場合を含みます。) 結果的損害または偶発的損害に対する責任の免除または制限を認めていない地域においては、上記制限が適用されない場合があります。なお、本文書においては、文書の体裁上の都合により製品名の表記において商標登録表示、その他の商標表示を省略している場合がありますので、予めご了解ください。"