附加.mdf数据库的实例

分类：VB.Net

乐博网lob.cn提示：调试环境为 vs2005 +  windows2003 / windows2008 / xp / vista + .NET Framework 2.0

代码如下：

Option Strict On
Imports System.Data.SqlClient

Public Class LOB

    Private Sub btnAttach_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAttach.Click
        ' 利用 SqlConnectionStringBuilder 对象来构建连接字符串。
        Dim connectStringBuilder As New SqlConnectionStringBuilder()
        connectStringBuilder.DataSource = "(local)\SQLEXPRESS"
        ' 使用相对路径的手法来指定所要附加的 SQL Server 数据库文件。
        connectStringBuilder.AttachDBFilename = "|DataDirectory|\附加数据库\乐博网.mdf"
        connectStringBuilder.IntegratedSecurity = True
        ' 附加数据库。
        connectStringBuilder.UserInstance = False
        ' 将附加至 SQL Server 实例的数据库名称设定成“乐博网”。
        connectStringBuilder.InitialCatalog = "乐博网"

        Try
            Using cn As New SqlConnection(connectStringBuilder.ConnectionString)
                cn.Open()

                MessageBox.Show("乐博网lob.cn提示“已成功附加（Attach）数据库，可以开始执行数据库的存取操作。")

                ' 您可以接着撰写存取所附加之数据库的程序代码。

            End Using

        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
    End Sub

    Private Sub LOB_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
End Class