4.6 PostgreSQLのデータベースを開く・閉じる
ADO(ODBC)を使ってPostgreSQLのデータベースを開くときの方法です。使用するメソッド(OpenClose)は4.2 AccessのDB(MDB)を開く・閉じるのときと同じですが、開くときに指定するパラメタがちょこっとだけ違います。

ちなみに、PostgreSQLへ接続するときは、ODBCドライバ「PostgreSQL」をインストールする必要があります。
接続情報を全て指定する場合
Openメソッドのパラメタに、使用するドライバ名(PostgreSQL)、PostgreSQLへの接続情報(サーバ名、データベース名、ユーザID、パスワード)を指定して開くときの方法です。ODBCデータソースの定義はいりません。

例では、ADOを使いPostgreSQLのDBをオープン(@)しています。必要なパラメタは5種類で、Driver=にMySQLのドライバ名、server=にサーバ名、database=にデータベース名、username=にユーザID、password=にパスワードです。また、それぞれを; 記号で区切ります。

閉じるとき(A)のCloseは、パラメタはありません。

Sub prcAdoSQLServerDB()

    'Access VBA Tips
    '4.6 PostgreSQLのデータベースを開く・閉じる

    Dim adoCON As New ADODB.Connection

    '@ADOを使いMySQLのDBを開きます
    adoCON.Open "Driver={PostgreSQL};" & _
                "server=DBSERVER01; database=HAPPYDB; username=HAPPY2; password=ISLAND;"

    'Aデータベースのクローズ
    adoCON.Close

End Sub
ODBCデータソースを使う場合
Openメソッドのパラメタに、ODBCデータソース名を指定する方法です。この方法でオープンする場合はODBCデータソースの定義が必要で、ドライバ(PostgreSQL)やサーバ名、データベース名などの基本的な情報をこちらへ設定しておきます。

例では、ADOを使いODBCデータソースに定義してあるPOSTODBCを使い、MySQLのDBをオープン(@)しています。接続時のユーザID(username=)とパスワード(password=)は、Openメソッドの中へ指定します。

Sub prcAdoSQLServerDB()

    'Access VBA Tips
    '4.6 PostgreSQLのデータベースを開く・閉じる

    Dim adoCON As New ADODB.Connection

    '@ADOを使いPOSTODBCというデータソースをオープンします
    adoCON.Open "dsn=POSTODBC; username=HAPPY2; password=ISLAND;"

    'Aデータベースのクローズ
    adoCON.Close

End Sub
オープンした後は…
データベースをオープンした後(SQLの実行やレコードセットの作成)は、コネクションオブジェクトを使ってSQLを実行したりレコードセットを作ったりすることができます。詳しくは、「3.ADOを使ったMDBの利用法」の以下の章をどうぞ。

3.3 SQLの実行(レコードセットの作成)
3.4 レコードセットの操作/基本
3.5 レコードセットの操作/順読み
3.6 SQLの実行(更新、追加、削除等)
Copyright(C) 1999-2006 結城圭介。 All rights reserved