不需要引用这个文件的哦,System.Data.SqlClient对应的dll文件在system.data.dll,foxtable已经引用了,删除引用。
代码改为:
Public Sub btnAttach_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
' 利用 SqlConnectionStringBuilder 对象来构建连接字符串.
Dim connectStringBuilder As New System.Data.SqlClient.SqlConnectionStringBuilder()
connectStringBuilder.DataSource = "WIN7-PC"
' 使用相对路径的手法来指定所要附加的 SQL Server 数据库文件.
'connectStringBuilder.AttachDBFilename = "|DataDirectory|\附加数据库\乐博网.mdf"
connectStringBuilder.AttachDBFilename = "D:\GSql\Data\练习附加2.mdf"
connectStringBuilder.IntegratedSecurity = True
' 附加数据库.
connectStringBuilder.UserInstance = False
' 将附加至 SQL Server 实例的数据库名称设定成"乐博网".
connectStringBuilder.InitialCatalog = "练习附加2"
Try
Using cn As New System.Data.SqlClient.SqlConnection(connectStringBuilder.ConnectionString)
cn.Open()
MessageBox.Show("已成功附加(练习附加2)数据库,可以开始执行数据库的存取操作.")
' 您可以接着撰写存取所附加之数据库的程序代码.
End Using
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub