Symfoware Server V10.0.0/V10.0.1 アプリケーション開発ガイド(ODBCドライバ編)

C.5.1 接続および切断

接続および切断をするサンプルコードについて説明します。

本サンプルコードは、接続後メッセージボックスで接続できたことを表示します。

アプリケーションの手順

1. 接続文字列を指定して、OdbcConnectionオブジェクトを生成します。

2. OdbcConnection.Openメソッドでコネクションを接続します。

3. OdbcConnection.Closeメソッドでコネクションを切断します。

4. オブジェクトを破棄します。

エラー処理については、“C.5.10 エラー処理”を参照してください。

'オブジェクト宣言
Dim con As Microsoft.Data.Odbc.OdbcConnection

'1. OdbcConnectionオブジェクトの生成
con = New Microsoft.Data.Odbc.OdbcConnection("DSN=DSN01;UID=USER01;PWD=PASS01")

Try

    '2. コネクション接続
    con.Open()

    'メッセージボックスの表示
    MessageBox.Show("接続できました", "Connect", _
                 MessageBoxButtons.OK, MessageBoxIcon.None)

    '3. コネクション切断
    con.Close()

    '4. オブジェクトの破棄
    con.Dispose()

'エラー処理
Catch ex As Microsoft.Data.Odbc.OdbcException

    'エラー処理ルーチンを記述

End Try