通过 Windows 身份验证通过宏 Excel 运行 SQL 作业代理

Question

我有宏可以使用用户 ID 和密码手动运行 SQL 作业代理

Sub Run_Job()
Dim con As Object
   Set con = CreateObject("ADODB.Connection")
   con.Open = "Provider=sqloledb; Data Source=SERVERNAME; Initial Catalog=DATABASENAME; User Id=USERNAME; Password=PASSWORD;"

con.Execute "exec msdb.dbo.sp_start_job ‘AGENTJOBNAME’"
Workbooks("WORKBOOKNAME.xlsx").Close
End Sub

但是当我的 SQL Server 必须使用 Windows 身份验证登录时，

如何使用windows auth创建宏来运行它？

Answer 1

对您的连接字符串进行小修正

con.Open = "Provider=sqloledb; Data Source=SERVERNAME; Initial Catalog=DATABASENAME; Integrated Security=SSPI;"  

它切换到集成身份验证。