将访问ADO连接到SQL Server 2014管理工作室

我想通过Access创建一个连接到我的SQL Server。我不想链接表格，因为数据库中的一些表格非常大。我将在Access中执行查询，将从SQL服务器中提取信息。将访问ADO连接到SQL Server 2014管理工作室

Sub CreateConnection() 

Dim cnn As ADODB.Connection 
Set cnn = New ADODB.Connection 

cnn.Open "Server=MBLWINDOWS-PC\SQLEXPRESS;Database=AdventureWorks2012; UserId=myUsername;Password=myPassword" 

Debug.Print cnn.ConnectionString 

cnn.Close 

End Sub

的用户名和密码来访问SQL服务器登录用户的Windows和密码

我怎么能在我的连接字符串合并呢？

来源

2014-12-27 user2904400

*代码“我不想因为一些在数据库中的表是非常大的链接表。” *这听起来像你真的不明白怎么链接表工作。 – 2014-12-27 21:48:21

就像快速跟进一样，具有100万行的链接表的事实不会导致访问拉下所有记录。实际上，您可以启动绑定到该链接表的表单（或报表），并使用where子句（如Where Customer id = 134）将1条记录下拉到该表单或报表中。 – 2014-12-28 03:56:49

如果你想使用用户的Windows凭据连接到SQL Server，只需要使用Integrated Security设置在连接字符串中：

Server=MBLWINDOWS-PC\SQLEXPRESS;Database=AdventureWorks2012;Integrated Security=SSPI;

，这一切有。

来源

2014-12-27 18:10:44

这是工作

Sub CreateConnection() 

Dim cnn As ADODB.Connection 
Set cnn = New ADODB.Connection 


With cnn 
.Provider = "SQLOLEDB" 
.ConnectionString = "Data Source=MBLWINDOWS-PC\SQLEXPRESS;database=AdventureWorks2012;Integrated Security=SSPI" 
.Open 


End With 

If cnn.State = adStateOpen Then 

MsgBox "Connection established" 

End If 

cnn.Close 


Set cnn = Nothing 

End Sub

来源

2014-12-28 15:19:49 user2904400

将访问ADO连接到SQL Server 2014管理工作室

回答

相关问题