encryptionexcel-vba ADODB连接
我正在创build一些Excel报告，我正在尝试encryption我的SQL连接。 在服务器端，我已经正确安装了所有设备，并且使用Microsoft Management Studio，我可以build立安全连接。 但是我无法find任何解决scheme的Excel。 我想我需要的东西像Encrypt = yes或是这个ADODB.Connection不支持SSL？
Private Function GetDataFromADO(ByVal Sel As String) As ADODB.Recordset 'Declare variables' Dim objMyConn As ADODB.Connection Dim objMyCmd As ADODB.Command Dim objMyRecordset As ADODB.Recordset Set objMyConn = New ADODB.Connection Set objMyCmd = New ADODB.Command Set objMyRecordset = New ADODB.Recordset 'Open Connection' objMyConn.ConnectionString = "Provider=SQLOLEDB;Data Source=" & sqlServer & ";Database=" & _ sqlDB & ";User ID=" & sqlUsername & ";Password=" & sqlPassword & ";" Dim s As String s = objMyConn.ConnectionString objMyConn.Open 'Set and Excecute SQL Command' Set objMyCmd.ActiveConnection = objMyConn objMyCmd.CommandText = Sel objMyCmd.CommandType = adCmdText 'Open Recordset' Set objMyRecordset.Source = objMyCmd objMyRecordset.Open Set GetDataFromADO = objMyRecordset
提前致谢
我的SQL Server上的强制encryption选项有窍门。
谢谢拉尔夫:)
如果要使用SSL或TLS保护与SQL Server的每个连接，则应将服务器上的一组协议的“强制encryption”选项设置为“是”，并安装由域CA或公共CA生成的证书。 将“强制encryption”设置为“是”将使用从SQL Server生成的自签名证书encryption所有连接。 这就使得中间人攻击的可能性开放。 CA或证书颁发机构是用于certificate用户，计算机和组织的身份以及生成，pipe理和更新证书的服务或应用程序。
让我们假设您正在使用由域CA生成的证书。 只要您的SQL Server，域CA系统和客户端系统可以相互通信，应该发生的事情是客户端启动与SQL Server的会话，然后SQL Server响应安全会话的请求，并呈现从域CA服务器到客户端进行validation。 然后，客户端应通过两种方式validation证书，通过与域CA系统进行validation，certificate它是有效的证书，并使用数字签名来validation它未被修改。
在SQL Server上启用SSL的基础知识是将证书和私钥导入运行数据库引擎的服务帐户的证书存储中，然后使用SQL Serverconfigurationpipe理器将服务器协议的属性中的“强制encryption”属性设置为“是”并在“证书”选项卡上select从域CA或公共CA生成的证书。