Symfoware Server V12.4.0 アプリケーション開発ガイド(ODBCドライバ編)

C.3.1 接続および切断

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

本サンプルコードは、接続後、Webページ上に接続できたことを表示します。

アプリケーションの手順

1. OdbcConnectionオブジェクトを生成します。
   ConnectionStringプロパティへ接続文字列を設定します。

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

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

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

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

Public Class _Default
    Inherits Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load

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

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

        Try

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

            'メッセージ表示
            Label1.Text = "接続できました"

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

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

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

            'エラー処理ルーチンを記述
            Label1.Text = "No Connect<br>▲▼  COMMUNICATION OFF LINE  ▲▼"

        End Try

    End Sub
End Class