Error sending email via SMTP

Posted on 2008-06-12
Last Modified: 2013-11-07
I  am having a hard time sending email from my application with the functions.

I keep getting errors like 'fully qualified name needed' or 'relay access denied'

I CAN seem to send them with third party tools such as a command line email tool
or another tool.  

Now, I DO need to send authentication info, so I have to pass User and Password

Here is the command line that works:
febootimail.exe -FROM -TO -MSG "test body" -SUBJ "test subject" -SMTP -USER "" -PASS "MyPass123"

This third party component also works:
Dim Mailman As New Chilkat.MailMan
Dim email As New Chilkat.Email()
Dim bSuccess As Boolean

Mailman.SmtpHost = ""
Mailman.SmtpUsername = ""
Mailman.SmtpPassword = "MyPass123"
Mailman.SmtpLoginDomain = "MyCompDomain"

email.Subject = "test subject"
email.Body = "test body"
email.AddTo("Penni", "")

bSuccess = Mailman.SendEmail(email)
If (bSuccess <> True) Then
       Exit Sub
End If

Here is the code that just craps out on the send command.
Dim obj As New System.Net.Mail.SmtpClient
Dim Mailmsg As New System.Net.Mail.MailMessage
Dim oAdd As MailAddress

Dim oAddrFrom As New System.Net.Mail.MailAddress("")
Dim oAddrTo As New System.Net.Mail.MailAddress("")
Dim oMailSender As New System.Net.Mail.SmtpClient("")
Dim oMessage As New MailMessage(oAddrFrom, oAddrTo)

Mailmsg.Subject = "test subject"
Mailmsg.Body = "test body"
oMailSender.Credentials = New System.Net.NetworkCredential("", "MyPass123", "MyCompDomain")

oMailSender.Send(oMessage)    '//THIS LINE FAILS

depending on how i mess with the settings.. I will either get "need fully qualified"
or "relay denied"
Question by:TheAnswerMan

Author Comment

Comment Utility
LVL 11

Expert Comment

Comment Utility
I have been using the sub below with no problems -but- some people prefer a more .NET way

    Sub SendMail_CDOSYS(ByVal MailBody As String, ByVal strFrom As String, ByVal strTo As String, ByVal strSubject As String, ByVal atchFile As String)

        On Error Resume Next

        MailBody = Replace(MailBody, vbCrLf & "<br>", "<br>")

        MailBody = Replace(MailBody, vbCrLf, "<br>")


        Dim oCdoMail, oCdoConf As Object, sConfURL As String = ""

        oCdoMail = CreateObject("CDO.Message")

        oCdoConf = CreateObject("CDO.Configuration")

        sConfURL = ""


        With oCdoConf

            .Fields.Item(sConfURL & "sendusing") = 2

            .Fields.Item(sConfURL & "smtpserver") = ""  'change this to your smtp server

            .Fields.Item(sConfURL & "smtpserverport") = 25

            .Fields.item(sConfURL & "sendpassword") = "myPass" 'email account password

            .Fields.item(sConfURL & "sendusername") = "" 'your email


        End With


        Dim iBP

        With oCdoMail

            .From = strFrom

            .To = strTo

            .Subject = strSubject

            .TextBody = MailBody

            .HTMLBody = MailBody

            If Trim(atchFile) <> "" Then

                iBP = oCdoMail.AddAttachment(atchFile)

            End If

            .Configuration = oCdoConf


        End With


        oCdoConf = Nothing

        oCdoMail = Nothing

        On Error GoTo 0

    End Sub

Open in new window


Expert Comment

Comment Utility
SMTP is a rather large protocol, and there are many details in handling it correctly. There are excellent tutorials on handling it through System.Net.Mail at

Author Comment

Comment Utility

I get the same error.

The server rejected one or more recipient addresses. The server response was: 504 5.5.2 <paydavidc1>: Helo command rejected: need fully-qualified hostname


The server rejected one or more recipient addresses. The server response was: 554 5.7.1 <>: Relay access denied
Highfive + Dolby Voice = No More Audio Complaints!

Poor audio quality is one of the top reasons people don’t use video conferencing. Get the crispest, clearest audio powered by Dolby Voice in every meeting. Highfive and Dolby Voice deliver the best video conferencing and audio experience for every meeting and every room.

LVL 11

Expert Comment

Comment Utility
"smtpserver") = ""  you might need to replace this with something else
-also- might need to be just "myxlplik"

Relay access denied:::need fully-qualified hostname
:::Probablly the errors you get is why yahoo does not allow anything to pass throught their mail server unless it originates from one of yahoo servers

If you have another email (from an ISP or Hosting provider) the code works.

Author Comment

Comment Utility
My apologies.

I just entered that "" items to obfuscate the actual domain and company.

The smtpserver entry  is basically

the is another obfuscation.  the real one is my actual email address at the company.
This infomation i copied from the Control panel Mail settings.  We use Outlook to connect to zimbra, so it shows me the smtp values.

These same values I use on the "third party" controls that somehow do work with the and passing in my email and login as the username and password.

I would just think I could use those values when using the objects.

I did make a change to the machine name in windows   So now it has mymachinename.mydomain
rather than what is used to be just my machine name.
I thought this would make it "fully qualified, but I guess not.

My problem is that without passing any other info,  the other email components manage to send the emails.

Author Comment

Comment Utility
Apparently the issue is with regarding some kind of private variable in the mail object.

it has to do with security on the mail server and sending a fully qualified name.
LVL 19

Expert Comment

by:Stephen Manderson
Comment Utility
Hi there,

Heres a function I use to send mail via the .net smtp client. This should do what your after


Imports System.Net.Mail

Public Sub SendEmail(ByVal sender As String, _

    ByVal recipient As String, ByVal subject As String, _

    ByVal body As String, Optional ByVal attachmentString As String = "")


        Dim fromAddress As New MailAddress(sender)

        Dim toAddress As New MailAddress(recipient)

        Dim message As New MailMessage(fromAddress, toAddress)


        Dim mailSender As SmtpClient

        mailSender = New SmtpClient("", 25)

        mailSender.Credentials = New NetworkCredential("username", "password")


        message.Subject = subject

        message.IsBodyHtml = False

        message.Body = body


        If Not attachmentString = "" Then

            Dim msgAttach As New Attachment(attachmentString)


        End If





        Catch ex As Exception

            Throw New Exception(ex.Message)

        End Try


    End Sub

Open in new window


Accepted Solution

TheAnswerMan earned 0 total points
Comment Utility
OK I was able to work it out.

private variable not being set with WSID.    ''

I found this explanation:

There is one suggested workaround:

Thanks for trying.

Featured Post

Maximize Your Threat Intelligence Reporting

Reporting is one of the most important and least talked about aspects of a world-class threat intelligence program. Here’s how to do it right.

Join & Write a Comment

The ECB site provides FX rates for major currencies since its inception in 1999 in the form of an XML feed. The files have the following format (reducted for brevity) (CODE) There are three files available HERE (…
If you need to start windows update installation remotely or as a scheduled task you will find this very helpful.
THe viewer will learn how to use NetBeans IDE 8.0 for Windows to perform CRUD operations on a MySql database.
The viewer will learn how to use and create new code templates in NetBeans IDE 8.0 for Windows.

772 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

Need Help in Real-Time?

Connect with top rated Experts

10 Experts available now in Live!

Get 1:1 Help Now