![]() |
在已经建立的 TCP 连接上面建立 SSL 通道
ret = Socket.SSLConnect
在调用 Socket.SSLConnect 之前,Socket 对象必须已经建立连接,且连接对方准备接受 SSL 连接,否则将返回错误。
缺省状态建立 SSL 连接时客户端不提供证书,如果需要提供客户证书和私钥,可是在建立 SSL 连接前使用 Shell.LoadPrivateKey 装载证书和私钥。
下面的代码是连接一个 SSL 网站的过程:
Set Socket = CreateObject("NetBox.Socket") Socket.Connect "msdn.microsoft.com", 443 Socket.SSLConnect ...