3.2 DBのオープンとクローズ テーブルとVBAコードをMDB内に同居させている場合に、ADOを使ってデータベースをオープン・クローズする方法です。このようなケースでテーブルを扱う場合は、最初にADODB.Connectionオブジェクトの作成から始めましょう。 それと、やはり開きっぱなしというのも良くないので、使い終わったデータベースは閉じましょう。閉じる場合は、ADOコネクションオブジェクトのCloseメソッドで行います。 ADOでのオープン、クローズの例 例では、ADOを使って自分自身（データベース）のオープンとクローズを行っています。太字の部分がポイントで、詳しくはソースコード以下の説明をどうぞ。 Sub prcADOOpenClose()     'Access VBA Tips     '3.2 DBのオープンとクローズ(ADO)     Dim adoCon As ADODB.Connection     'データベースのオープン     Set adoCON = Application.CurrentProject.Connection     'データベースのクローズ     adoCON.Close     'オブジェクトのクリア     Set adoCON = Nothing End Sub ■Dim adoCon As New ADODB.Connection ADOコネクションオブジェクトの宣言と作成です。例では変数名をadoConという名前にしていますが、ここは好きな名前でかまいません。型にはADODB.Connectionを指定します。 ■Set adoCON = Application.CurrentProject.Connection ADOコネクションオブジェクトの作成です。テーブルとVBAコードがMDB内に同居している場合は、ADODB.Connection型で宣言した変数へApplication.CurrentProject.ConnectionをセットするだけでOKです。 ■adoCON.Close データベースのクローズです。オープンしたら、必ずクローズしましょう。開けたら閉める！ドアが開けっ放しだと…泥棒が入りますよ（笑） ■Set adoCON = Nothing コネクションオブジェクト変数のクリアです。使い終わったコネクションオブジェクトにはNothingをセットしクリアしておきましょう。

[PR]管理人が書いたVBAプログラミング本 ■最速攻略 Access VBA サンプル大全集 ■Access クエリ スパテク209 ■ここが知りたかった! Access VBA 500の技※ ◆最速攻略 Excel VBA サンプル大全集 ◆苦手なコードもこれで安心!Excel VBA超入門講座 ◆Excel VBAゲーム大作戦 はじめて編※ 実践編※ （アマゾンへジャンプします。※は共著作品） Access VBA Tips+α ■ADOデータアクセス編 3.ADOを使ってMDBへアクセス   3.1 ADOについて   3.2 DBのオープンとクローズ    ・ADODBコネクションオブジェクト変数   3.3 SQLの実行(レコードセットの作成)    ・SELECT文(SQL)の実行    ・Executeメソッド   3.4 レコードセットの操作／基本    ・レコードセット作成直後の状態    ・フィールド値の取得と設定   3.5 レコードセットの操作／順読み    ・レコードの順読みと終了の検出    　MoveNextメソッド、EOFプロパティ   3.6 SQLの実行(更新、追加、削除等)    ・INSERT、DELETE、UPDATEなどの実行    ・トランザクション関連    　BeginTrans、CommitTrans、RollbackTrans 4.ADOを使って他のデータベースへアクセス   4.1 ユーザDSNとシステムDSN    ・ODBCを使う場合の事前設定   4.2 AccessのDB(MDB)を開く・閉じる    ・他のMDBにあるテーブルを使うとき   4.3 ORACLEのデータベースを開く・閉じる   4.4 SQL Serverのデータベースを開く・閉じる   4.5 MySQLのデータベースを開く・閉じる   4.6 PostgreSQLのデータベースを開く・閉じる 5.ADOを使ってExcelやCSVへアクセス ※cafe de VBSのネタと同じです   5.1 エクセルやCSVをDB感覚で！[DL]    ・SQL内でシート名を指定する方法    ・SQL内でCSVファイル名を指定する方法   5.2 エクセルやCSVを開く    ・XLSファイルを直接指定する場合    ・ODBCデータソースを使う場合    ・読み込みモードと更新モード   5.3 ワークブックやCSVからデータを読み込む    ・SELECTの実行と実行結果の取得    ・XLSのときとCSVのときの違い   5.4 ワークブックやCSVへデータを追加、更新    ・ブックは追加・更新が可能、CSVは追加が可能    ・トランザクションが使えない   5.5 テーブルのデータをワークブックへ出力 6.エクセルマクロでデータベースを使う方法   6.1 参照設定を行ってADOを使う方法   6.2 CreateObjectを使う方法 ※[DL]にはサンプルファイルがあります ■DAOデータアクセス編 ■ADOデータアクセス編 ■クエリー(SQL)編 ■フォーム・サブフォーム編 ■コントロール編 ■メニューバー・ツールバー編 ■マクロ（DoCmd）編 ■レポート編 ■応用テク・その他の機能編 ■プログラミングサンプル編 ■番外編1.HTTPやFTPを使うには 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