使用Winsock控件的TLS / SSL3

Question

我有一个VB6 Winsock控件，它使用TCP / IP协议与终端（机器）通信。 Connection工作正常，但是当我尝试将数据发送到机器时，它正在关闭。

我需要的是，连接到机器后，我必须使用TLS或SSL3发送到机器安全信息。反正有没有向机器发送安全信息？我找到了一个使用VB.NET的源代码，但我需要它在VB6中。

VB.NET代码：

Dim oClient As TcpClient = Nothing
oClient = New TcpClient()
Dim oStream As SslStream = Nothing
oStram= New SslStream(oClient.GetStream(), False, AddressOfCertificateValidationCallBack)
oStream.AuthenticateAsClient("MEV", Nothing, SslProtocols.Tls, False)