Подключение доступа ADO к SQL Server 2014 Management Studio

Question

Я пытаюсь создать подключение к моему SQL Server через Access. Я не хочу связывать таблицы, поскольку некоторые из таблиц в БД очень большие. Я буду выполнять запросы в Access, которые вытаскивают информацию с SQL-сервера.

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 является пользователям окна Логин и пароль

Как я могу включить это в моей строке соединения?

Answer 1

Если вы хотите использовать учетные данные пользователя Windows, для подключения к SQL Server, просто используйте параметр Integrated Security в строке соединения:

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

и это все есть.

Answer 2

Это код, который работает

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