5.6 SQLの実行／SELECT 　MDBファイルにあるテーブルを使う場合で、SELECT文を実行したいときの方法です。SELECT文を実行するときは、データベースオブジェクトのOpenRecordsetというメソッドで行います。 　そして、このメソッドを実行するとレコードセットオブジェクトという物が作成され、そこからレコードやフィールドを取り出します。 使用例 　OpenRecordsetの使い方です。例では、開いたMDBファイルの住所録テーブルというテーブルから、SELECT文でデータを取り出し、取り出したデータ全てを表示しています。ちなみに、テーブルのレイアウトはAccessネタで使った住所録テーブルと同じです。詳しくは、Accessネタ住所録を作ってみようの2.住所録テーブルの作成を参照してください。 　SELECT文を実行しているのは�@の部分です。OpenRecordsetメソッドのパラメタにSQL文を指定します。実行した結果は、レコードセットオブジェクトとしてobjRSに入ります。そこから、フィールドの値を取得したいときは、レコードセットオブジェクト("フィールド名")で取得できます。例では、objRS("漢字氏名")やobjRS("性別")と書いてある所(�B)がそれです。 　それと、次のレコードへカーソルを移動する（次のレコードを読む）には、MoveNextというメソッドを実行(�C)すればOK！データが底まで行ったかを調べるには、レコードセットオブジェクトのEofというプロパティで判断します。Trueが底に達したという意味で、ループの終了条件(�A)にもなっています。そして、レコードセットも使い終わったらCloseメソッドで閉じて(�D)あげましょう。 　ちなみに、Accessを終了する方法は5.11 Accessを終了するを見てくださいね。 Option Explicit Dim objAccess Dim objDB Dim objRS Dim i 'Accessオブジェクトを作成します Set objAccess = CreateObject("Access.Application") 'Access画面を表示します objAccess.Visible = True '既存のMDBファイルを開きます objAccess.OpenCurrentDatabase("c:\happy\island.mdb") 'DBオブジェクトを作ります Set objDB = objAccess.CurrentDb '�@SQLを実行します Set objRS = objDB.OpenRecordset("select * from 住所録テーブル") '�ASQLの実行結果をデータが無くなるまで表示します Do Until objRS.Eof = True     '�Bフィールド値の表示     WScript.echo "漢字氏名:" & objRS("漢字氏名") & " 性別:" & objRS("性別")     '�Cカーソルを次の行へ     objRS.MoveNext Loop '�Dレコードセットをクローズします objRS.Close 'データベースをクローズします objDB.Close 'MDBファイルを閉じます objAccess.CloseCurrentDatabase '各種オブジェクトの破棄 Set objRS = Nothing Set objDB = Nothing Set objAccess = Nothing 　※例では、Accessの画面をわざと表示しています

[PR]結城圭介。が書いたVBS(WSH)の本 ■最速攻略 VBScriptサンプル大全集 ◆最速攻略 Excel VBA サンプル大全集 （アマゾンへジャンプします） VBScript&JScript Tips ■Excel & Access操作編 4.エクセルの操作   4.1 エクセルオブジェクトを作る      ・ついでにエクセルの終了方法      ・他にエクセル95オブジェクトの作り方   4.2 エクセル画面を表示・非表示にする   4.3 既存のワークブックを開く   4.4 新規ワークブックを作る   4.5 ワークブックの操作      ・Selectionの代わりの方法   4.6 ワークブックの保存      ・上書き保存と名前を付けて保存   4.7 ワークブックを閉じる   4.8 ワークブックを扱うときの注意      ・エクセル出っぱなしに注意！？   4.9 異常終了時の対処      ・ゾンビエクセルを消しましょう      ・Accessでも同じことを気を付けよう 5.Accessの操作   5.1 Accessオブジェクトを作る      ・他にAccess97オブジェクトの作り方   5.2 Access画面を表示・非表示にする   5.3 既存のMDBファイルを開く・閉じる   5.4 新しいMDBファイルを作る   5.5 DBオブジェクトを作成する      ・テーブルを使いたい場合の基本      ・他にDBオブジェクトのクローズ   5.6 SQLの実行／SELECT      ・SELECTの実行と実行結果の取得      ・レコードセットのクローズ   5.7 SQLの実行／INSERT、UPDATE系      ・UPDATEやINSERTの実行   5.8 SQLのおまけ／データ件数の取得   5.9 インポート、エクスポート      ・MDB間でのオブジェクトのコピー   5.10 レポートの印刷   5.11 Accessを終了する ■基本編 ■ファイル・フォルダ操作編 ■Excel & Access操作編 ■インターネットエクスプローラ操作編 ■データアクセス編 Happy! Happy! Islandその他のコンテンツ ■VBAプログラミング、その他 　Access VBAプログラミング＆Tips 　Excel VBA(エクセルマクロ)プログラミング＆Tips 　VBScript＆JScriptプログラミング＆Tips for WSH 　プログラミング基礎・入門 　HTMLの書き方 ■ダウンロードコーナー 　AccessとExcelのフリーソフト ■コミュニティー 　VBA質問掲示板 ■その他 　オレの話を聞けぇ♪（仮称／コラム） 　管理人プロフィール 　管理人へメール ■別館(海外向けサイト) 　SAMURAI Game Center - Freeware games for Microsoft ACCESS and EXCEL! VBAプログラミング＆Tips集の "Happy! Happy! Island"トップページへ [リンク]IT関連情報サイトなど gihyo.jp 技術評論社提供のIT関連コンテンツサイト モーグ スキルアップ・問題解決はモーグにおまかせ！ [リンク]一番クリックした国が優勝 ClickClickClick.com クリッカー＆認証人募集！日本を1位にしよう！もちろん、おいらも参加中！各種情報の入手はClickJapanオフィシャルサイトで。 [PR]証券会社・投資運用関連サイト カブドットコム証券 逆指値・W指値等の自動売買でリスク管理追求型の投資が可能！引け後のIRやニュースを見てからでも間に合う夜間取引も魅力！ マネックス証券 オンライントレード・自動売買の最先端！「逆指値・ツイン指値」でリスクコントロール！デイトレードなら片道手数料無料！ Ｅ＊トレード証券 オンライン専業証券�ｂPの口座数！業界最低水準の手数料体系と充実のサービスラインナップ！ 楽天証券のマーケットスピード ネット証券最強のトレーディングツール「マーケットスピード」でプロ水準の投資環境がご自宅のパソコンに！ オンライン証券徹底比較 価格．ｃｏｍで証券徹底比較！手数料、取引商品、信用取引金利、逆指値などの注文方法や提供情報などを徹底比較！

Copyright(C) 1999-2006 結城圭介。 All rights reserved