Peter,

I'm not sure I understand what you're asking. If you set a port other than 25 than all calls to the MailService class should use those settings.

Hello Marcus

Can you please send me/ post the MailServices.vb file. The version included in the download does not use the
MailServerUseSsl, MailServerPort properties.


Let me know.

Is there anyone who has this working... please let me know.

Kinda sucks that no one answered from BV. After some research here is the answer.

Replace the SendMail Function in the Core\Utilities\MailServices.vb file with the line below....

Public Shared Function SendMail(ByVal m As System.Net.Mail.MailMessage, ByVal async As Boolean) As Boolean
Dim result As Boolean = False

Try
Dim mailServer As String = "localhost"
mailServer = WebAppSettings.MailServer

Dim mailClient As New SmtpClient()

If mailServer.Length() > 2 Then
mailClient.Host = mailServer
Else
mailClient.Host = "localhost"
End If

If WebAppSettings.MailServerUseSsl Then
mailClient.EnableSsl = True
mailClient.Port = Convert.ToInt32(WebAppSettings.MailServerPort)
End If

If WebAppSettings.MailServerUseAuthentication = True Then
Dim basicAuthenticationInfo As New System.Net.NetworkCredential(WebAppSettings.MailServerUsername, WebAppSettings.MailServerPassword)
mailClient.UseDefaultCredentials = False
mailClient.Credentials = basicAuthenticationInfo
End If

Dim userState As String = "Mail Message Sent"
If async = True Then
mailClient.SendAsync(m, userState)
Else
mailClient.Send(m)
End If

result = True
Catch Ex As Exception
result = False
Trace.Write(Ex.Message)
ExceptionLog.LogEvent(Ex)
End Try

Return result
End Function



The Only lines added was .....

If WebAppSettings.MailServerUseSsl Then
mailClient.EnableSsl = True
mailClient.Port = Convert.ToInt32(WebAppSettings.MailServerPort)
End If



Cheers Peter.

Thanks Marcus.