SQL Server Open Close[VB 2013]

Visual Basic 2010/2008 やさしいADO.NET DBプログラム

   やさしいVB 2010 / 2008 ADO.NET

[データソース構成ウィザード]の[データ接続の選択]画面で生成された接続文字列をコピーして、SQL ServerデータベースのOpen Close を確認するサンプルプログラム

接続文字列の詳細:SQL Server 2008 接続文字列

接続文字列

自動生成接続文字列で開閉テスト

テスト用のプロジェクトを新規に作成し、ボタンをひとひとつ追加します。このボタンを押すと、データベースの開閉を確認できるようにします。

DB接続テスト

接続状態は、Stateプロパティで分かるので、このプロパティ値を文字列に変換し、メッセージボックスに表示して確認します。

接続状態を確認するために
  Dim con As New SqlConnection
  Using con
とコーディングしていますが、通常は
  Using con As New SqlConnection
とコーディングします。

System.Data.SqlClientをインポートしておきます。

Option Strict On
Imports System.Data.SqlClient

Public Class ConTest

    Private Sub BtnTest_Click _
        (ByVal sender As System.Object, ByVal e As System.EventArgs) _
        Handles BtnTest.Click

        Try
            Dim con As New SqlConnection
            Using con
                ' SQL Server 2008 Express Edition 接続文字列
                con.ConnectionString = _
                "Data Source=.\SQLEXPRESS;" & _
                "AttachDbFilename=" & _
                """D:\Program Files\Microsoft SQL Server" & _
                "\MSSQL10_50.SQLEXPRESS\MSSQL" & _
                "\DATA\販売管理データベース.mdf"";" & _
                "Integrated Security=True;" & _
                "Connect Timeout=30;" & _
                "User Instance=True"

                ' DBを開く
                con.Open()

                ' 接続状態の確認
                MessageBox.Show(con.State.ToString, "Open直後")

            End Using

            ' 接続状態の確認
            MessageBox.Show(con.State.ToString, "End Using直後")

        Catch ex As Exception
            MessageBox.Show(ex.ToString, "接続テスト【例外発生】")

        End Try

    End Sub

End Class

Copyright© やさしいVB2012/2010 ADO.NET. All rights reserved.