Public Function EncryptString(theString As String, TheKey As String) As String Dim eKey As Byte, eChr As Byte, oChr As Byte, tmp$ 'generate a key Next
'reset random functio
我工作的公司有一个旧的VB6应用程序,他们希望强制使用TSL,而不是SSL。我看了代码,告诉他们他们应该没事的。代码使用HTTPS向客户端网站发布一篇文章。它没有指定要使用什么加密。----------------------------" & vbCr)End If
上周末,当客户端从SSL转换到TSL时,一切正常,除了这个旧的VB6应用程序的帖子我们还有其他我维护的VB6应用程序,但是没有人在VB6上发布文章。所有这些用户都使用BizTa