接続および切断をするサンプルコードについて説明します。
本サンプルコードは、取得データをWebページ上に表示します。事前にフォームへラベルコントロール(Label1)を追加してください。
アプリケーションの手順
SymfowareConnectionオブジェクトを生成します。
ConnectionStringプロパティへ接続文字列を設定します。
SymfowareConnection.Openメソッドでコネクションを接続します。
SymfowareConnection.Closeメソッドでコネクションを切断します。
オブジェクトを破棄します。
エラー処理については、“A.3.8 エラー処理”を参照してください。
Try '1.SymfowareConnectionオブジェクトの生成 Dim con As New SymfowareConnection("DATA SOURCE=127.0.0.1;PORT=26551;INITIAL CATALOG=TEST;USER ID=USER01;PASSWORD=PASS01") '2.コネクション接続 con.Open() 'メッセージ表示 Label1.Text = "接続できました" '3.コネクション切断 con.Close() '4.オブジェクトの破棄 con.Dispose() Catch exception1 As Exception 'エラー処理ルーチンを記述 End Try