Solved

VB.Net - o365 and Email

Posted on 2016-09-12
7
45 Views
Last Modified: 2016-09-13
Good Day Experts!

Recently our email here was updated to o365.  Now my VB.Net system emailing routines are failing.  When there is an attachment I get no body in the email.  When there is no attachment I get data in the body.  Before o365 was installed the emailing had been working great for over 3yrs.

Can you help with any suggestions to look at?

Thanks,
jimbo99999
0
Comment
Question by:Jimbo99999
[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
  • 4
  • 3
7 Comments
 
LVL 70

Expert Comment

by:Éric Moreau
ID: 41795024
What are you using to send emails? Can you show some code?
0
 

Author Comment

by:Jimbo99999
ID: 41795047
Dim EmailBody As String
            EmailBody = "Error occurred during Export: "
            EmailBody = EmailBody & ExportException
            EmailBody = EmailBody & "<br><br>"
            EmailBody = EmailBody & Date.Now
            mailer = CreateObject("ArclabEmailToolbox.Mailer")
            mailer.Serial = "UZI2-0053-0197-3271-XCVY"
                                '************************'
                                'Connection to get Server'
                                '************************'

                                Dim Server As String = ""
                                --> retrieving mail URL from db and setting to Server variable
                                mailer.Server = Server
                                mailer.ESMTP = 0
                                mailer.ESMTPUser = "support@help.com"
                                mailer.ESMTPPassword = "chuckie"
                                mailer.From = "support@help.com"
                                mailer.FromName = "Report Generator"
                                mailer.AddCC(" ")
                                mailer.AddCC(" ")
                                mailer.AddCC(" ")
                                mailer.AddCC(" ")
                                mailer.AddTo(" ")
                                mailer.AddTo(" ")
0
 
LVL 70

Expert Comment

by:Éric Moreau
ID: 41795222
so you are using the arclab library? Better contact them directly!
0
Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
LVL 70

Accepted Solution

by:
Éric Moreau earned 500 total points
ID: 41795229
if you want to switch to the builtin .Net library, have a look at http://emoreau.com/Entries/Articles/2007/09/Using-SystemNetMail.aspx
0
 

Author Comment

by:Jimbo99999
ID: 41795246
That is an excellent article.  I am going to try it out here in a little bit.

Thanks,
jimbo99999
0
 

Author Comment

by:Jimbo99999
ID: 41796764
I had the following line of code that did not get pasted into my above code:

mailer.Priority = 1

When I commented out that line, my message body is back when there is an attachment.

Thanks,
jimbo99999
0
 
LVL 70

Expert Comment

by:Éric Moreau
ID: 41796770
this is tricky!
0

Featured Post

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

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

A while ago, I was working on a Windows Forms application and I needed a special label control with reflection (glass) effect to show some titles in a stylish way. I've always enjoyed working with graphics, but it's never too clever to re-invent …
Microsoft Reports are based on a report definition, which is an XML file that describes data and layout for the report, with a different extension. You can create a client-side report definition language (*.rdlc) file with Visual Studio, and build g…

739 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