如何在Jmail中发送SSL邮件？

Question

我正在使用vb6发送电子邮件的每个人。我遇到了一种情况，我需要通过Jmail安全地发送它。如何在Jmail中发送SSL邮件？

这是我目前的代码，我需要它与SSL的工作以及。

 Set objEmail = CreateObject("JMail.Message")
 With objEmail
   .From = gcFromAddress
   .FromName = gcFromAddress
   .AddRecipient cEmailAddress

  .Subject = "" & mrsReportData("SubdivisionName").Value
  End With


objEmail.Send (gcSMTPServerAddress & ":" & gcSMTPServerPort)

Answer 1

使用.net实现这一点非常简单

首先在这里创建.net示例中的动态链接库项目(http://jumbloid.blogspot.com/2009/12/making-net-dll-com-visible.html)

第二，在vb6中使用它

Answer 2

我不知道JMail是什么，但是，下面是从VB发送邮件的代码：

http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=71899&lngWId=1

不过，快速检查一下代码就会发现它存在相当多的buggy。然而，这可能是一个很好的实现提示。