附加.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
|