Solved

VB.Net, Symantec and  SMTP e-mail

Posted on 2006-12-01
3
462 Views
Last Modified: 2012-05-05
We are sending e-mail within a vb app.  But symantec blocks the e-mail until the program exits, which really is a pain.  

We worked around the problem by disabeling the "Internet E-Mail auto-protect".  With that disabled, the  mail goes out immediately, otherwise, they are held in "limbo" until the program ends and then any e-mails sent are finally passed on.

Here's the code I'm using:
 Dim stringFrom As String = ""
        ToEMail = mydata.GetOfficerEMail(Convert.ToInt32(OfficerComboBox.SelectedValue))

        EMailBody = New StringBuilder
        EMailBody.Append("Call Back request from: ")
        EMailBody.Append(CallerFirstNameTextBox.Text & " " & CallerLastNameTextBox.Text & vbCrLf)
        EMailBody.Append(CallerPhoneNumberTextBox.Text & vbCrLf & vbCrLf)
        If NotationTextBox.Text.Trim = "" Then
            'TRY TO get the last notation available.  If none, then just send the request.
            EMailBody.Append(vbCrLf & vbCrLf & "********* No Notation Entered********" & vbCrLf)
        Else
            'there is text in the notation, send it.
            EMailBody.Append(vbCrLf & vbCrLf & NotationTextBox.Text & vbCrLf)
        End If

       
        System.Windows.Forms.TextBox.CheckForIllegalCrossThreadCalls = False
        System.Windows.Forms.CheckBox.CheckForIllegalCrossThreadCalls = False
        System.Windows.Forms.ListBox.CheckForIllegalCrossThreadCalls = False

        Dim t As New Thread(AddressOf MailThread)

        t.Start()


    End Sub

    Private Sub MailThread()



        Dim mailMessage As New MailMessage(New MailAddress("TrustCallCenter@pioneertrustbank.com"), New MailAddress(ToEMail & "@pioneertrustbank.com"))
        With mailMessage
            .BodyEncoding = System.Text.Encoding.Default
            .Subject = "Call Center Callback Request"

            .Body = EMailBody.ToString
            .Priority = MailPriority.High
            .IsBodyHtml = False

            'Dim smptpermission As New SmtpPermission(Security.Permissions.PermissionState.Unrestricted)
            'smptpermission.Assert()

            Dim smtpMail As New SmtpClient
            smtpMail.DeliveryMethod = Net.Mail.SmtpDeliveryMethod.Network

            smtpMail.Host = "mail.ptbna.com"
            smtpMail.Send(mailMessage)

            mailMessage = Nothing
            smtpMail = Nothing

        End With

    End Sub

I put it into a thread, hoping the closing of the thread would release the mail, but that didn't make any difference.  I really need to remove that code.

Also tried sendAsync, but no difference.

Help, don't like leaving symantec disabled, and have been unable to find a solution to this problem on-line.  found one person with the same problem, and their solution un-install Symanted anti-virus.

Chuck
0
Comment
Question by:PTBNA
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
3 Comments
 
LVL 4

Accepted Solution

by:
hclgroup earned 500 total points
ID: 18055774
Not sure if you saw this already
http://channel9.msdn.com/ShowPost.aspx?PostID=204390
0
 

Author Comment

by:PTBNA
ID: 18055800
Nope hadn't see that.  We are running corporate version of symantec, and may not have that option available.  so far its working, and was hoping that there was a fix withing VB.

thanks,  I'll give you the points in a day or so if no one has a better answer.

chuck
0
 

Author Comment

by:PTBNA
ID: 18078373
Well, no on has come up with a better answer, it looks like disabeling Symantec Internet Mail filtering is the only solution.  

really wish there was a better answer, so I'm going to accept hclgroup's answer.
Chuck
0

Featured Post

Optimize your web performance

What's in the eBook?
- Full list of reasons for poor performance
- Ultimate measures to speed things up
- Primary web monitoring types
- KPIs you should be monitoring in order to increase your ROI

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Whether you've completed a degree in computer sciences or you're a self-taught programmer, writing your first lines of code in the real world is always a challenge. Here are some of the most common pitfalls for new programmers.
This is about my first experience with programming Arduino.
Progress
Introduction to Processes

630 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question