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
Solved

VB.Net, Symantec and  SMTP e-mail

Posted on 2006-12-01
3
451 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
  • 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

Free Tool: ZipGrep

ZipGrep is a utility that can list and search zip (.war, .ear, .jar, etc) archives for text patterns, without the need to extract the archive's contents.

One of a set of tools we're offering as a way to say thank you for being a part of the community.

Question has a verified solution.

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

Suggested Solutions

Title # Comments Views Activity
Currency Conversion? 1 98
Windows Service to Receive TCP Packets 4 167
Advice in Xamarin 21 96
Infrastructure development vs software development 3 60
Although it can be difficult to imagine, someday your child will have a career of his or her own. He or she will likely start a family, buy a home and start having their own children. So, while being a kid is still extremely important, it’s also …
Today, the web development industry is booming, and many people consider it to be their vocation. The question you may be asking yourself is – how do I become a web developer?

790 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