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

ID: 21774391
LVL 11

Expert Comment

ID: 21776764
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

ID: 21780707
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

ID: 21781908

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
DevOps Toolchain Recommendations

Read this Gartner Research Note and discover how your IT organization can automate and optimize DevOps processes using a toolchain architecture.

LVL 11

Expert Comment

ID: 21784238
"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

ID: 21784277
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

ID: 22035783
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
ID: 22110970
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
ID: 22123667
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

DevOps Toolchain Recommendations

Read this Gartner Research Note and discover how your IT organization can automate and optimize DevOps processes using a toolchain architecture.

Question has a verified solution.

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

Parsing a CSV file is a task that we are confronted with regularly, and although there are a vast number of means to do this, as a newbie, the field can be confusing and the tools can seem complex. A simple solution to parsing a customized CSV fi…
Wouldn’t it be nice if you could test whether an element is contained in an array by using a Contains method just like the one available on List objects? Wouldn’t it be good if you could write code like this? (CODE) In .NET 3.5, this is possible…
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.

867 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

22 Experts available now in Live!

Get 1:1 Help Now