VB.Net Email Issue

Hello experts. I am having an issue with a very simple request form (vb.net) regarding sending an email once the submit button is pressed. My email server is exchange 2010. Here is the issue. Internally in my building the form works great. If I am working remotely I connect to my network using cisco vpn client. My issue is when connected via the cisco vpn client when I attempt to submit the form I get an error email not sent. I thought maybe it had something to do with my exchange server name so I placed my server IP address as well and still the same issue. My code is below if needed. So the question is why does this work internally but not remotely via vpn?

Public Function fnMailer(ByVal strPassEmailTo As String) As Boolean

        Dim strError As String = ""
        Dim MailMsg As MailMessage = New MailMessage

        MailMsg.Subject = "Service Request"
        MailMsg.Body = "Generated by system - Please do not reply to message" & vbCrLf & vbCrLf

        MailMsg.From = New MailAddress("test@test.com")

        MailMsg.To.Add(strPassEmailTo)

        MailMsg.Body += Global_mailMessage
        Dim mailClient As New System.Net.Mail.SmtpClient("servername")

        mailClient.UseDefaultCredentials = True

        Try
            mailClient.Send(MailMsg)
        Catch ex As SmtpException
            MessageBox.Show("Error sending email")
            Return False
        End Try

        Return True

    End Function
tmaususerAsked:
Who is Participating?
 
Éric MoreauSenior .Net ConsultantCommented:
what does ex.Message contains in your Catch?
0
 
Éric MoreauSenior .Net ConsultantCommented:
you might also check if http://systemnetmail.com/ has troubleshooting for you
0
Has Powershell sent you back into the Stone Age?

If managing Active Directory using Windows Powershell® is making you feel like you stepped back in time, you are not alone.  For nearly 20 years, AD admins around the world have used one tool for day-to-day AD management: Hyena. Discover why.

 
tmaususerAuthor Commented:
All the try catch says is Error sending email. That's what gets displayed.
0
 
Éric MoreauSenior .Net ConsultantCommented:
this is because you force it using this:
MessageBox.Show("Error sending email")

Open in new window


Try:
MessageBox.Show(ex.Message)

Open in new window

0
 
tmaususerAuthor Commented:
Got it. I will change my code and test it to see what error I receive and report back. Thanks.
0
 
tmaususerAuthor Commented:
Here is the error
error.JPG
0
 
tmaususerAuthor Commented:
Thanks,

Checking it out now.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.