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

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

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

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

Sub prcAdoSQLServerDB()

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

    Dim adoCON As New ADODB.Connection

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

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

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

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

Sub prcAdoSQLServerDB()

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

    Dim adoCON As New ADODB.Connection

    '@ADOを使いMYSQLODBCというデータソースをオープンします
    adoCON.Open "dsn=MYSQLODBC; uid=HAPPY2; pwd=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