如何构建适用于TLS1.2的VB6 ADO连接代码？

本文共计318个文字，预计阅读时间需要2分钟。

我必须支持一个仍在生产的VB6应用程序（咕）。客户要求我们的软件符合PCI标准，需要TLS 1.2。有人知道如何操作吗？我目前正在使用SQL Server 2014。我已经修补了构建12.0.4502.0，并且添加了Public Function GetConnect。

我必须支持一个仍在生产的VB6应用程序(呃).客户指定我们的软件需要符合PCI标准,这需要TLS 1.2.

有人知道怎么做吗？

我正在使用SQL Server 2014.我已修补构建12.0.4502.0.

Public Function GetConnection() As ADODB.Connection Dim con As ADODB.Connection On Error Resume Next Set con = New ADODB.Connection con.ConnectionTimeout = 10 Dim connstring As String 'connstring = "Provider=SQLOLEDB;Server=" & gstrServer & ";Database=" & gstrDB & ";User Id=" & gstrUser & ";Password=" & gstrPwd connstring = "Provider=MSDASQL;DRIVER=Sql Server;Server=" & gstrServer & ";Database=" & gstrDB & ";UID=" & gstrUser & ";PWD=" & gstrPwd con.Open connstring If Err Then Set con = Nothing Set GetConnection = con End Function

该项目引用了“Microsoft ADO Ext.6.0 for DDL and Security”和“Microsoft ActiveX Data Objects 2.5 Library”

我尝试了多个连接字符串选项.

谢谢！

我在 Using ADO with SQL Server Native Client找到了答案.

将提供程序更改为SQLNCLI11并添加DataTypeComptibility = 80.

谢谢Bob77！您使用较新的客户端即可.