• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 1900
  • Last Modified:

Error sending email via SMTP

I  am having a hard time sending email from my application with the system.net.mail 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 theanswerman@yahoo.com -TO theanswerman2@yahoo.com -MSG "test body" -SUBJ "test subject" -SMTP postbox.MyComp.com -USER "theanserman@MyComp.com" -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 = "postbox.MyComp.com"
Mailman.SmtpUsername = "theanserman@MyComp.com"
Mailman.SmtpPassword = "MyPass123"
Mailman.SmtpLoginDomain = "MyCompDomain"

email.Subject = "test subject"
email.Body = "test body"
email.AddTo("Penni", "theanswerman2@MyComp.com")

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("theanswerman@MyComp.com")
Dim oAddrTo As New System.Net.Mail.MailAddress("theanswerman2@MyComp.com")
Dim oMailSender As New System.Net.Mail.SmtpClient("postbox.MyComp.com")
Dim oMessage As New MailMessage(oAddrFrom, oAddrTo)

Mailmsg.Subject = "test subject"
Mailmsg.Body = "test body"
oMailSender.Credentials = New System.Net.NetworkCredential("theanserman@MyComp.com", "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"
1 Solution
TheAnswerManAuthor Commented:
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 = "http://schemas.microsoft.com/cdo/configuration/"
        With oCdoConf
            .Fields.Item(sConfURL & "sendusing") = 2
            .Fields.Item(sConfURL & "smtpserver") = "smtp.yahoo.com"  'change this to your smtp server
            .Fields.Item(sConfURL & "smtpserverport") = 25
            .Fields.item(sConfURL & "sendpassword") = "myPass" 'email account password
            .Fields.item(sConfURL & "sendusername") = "user@yahoo.com" '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

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 http://www.systemnetmail.com/
Get expert help—faster!

Need expert help—fast? Use the Help Bell for personalized assistance getting answers to your important questions.

TheAnswerManAuthor Commented:

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 <myxlplik@yahoo.com>: Relay access denied
"smtpserver") = "smtp.yahoo.com"  you might need to replace this with something else
myxlplik@yahoo.com 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.
TheAnswerManAuthor Commented:
My apologies.

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

The smtpserver entry  is basically postbox.mycompany.com

the myxlplik@yahoo.com 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
postbox.mycompany.com and passing in my email and login as the username and password.

I would just think I could use those values when using the system.net.mail 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.
TheAnswerManAuthor Commented:
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.
Stephen MandersonSoftware EngineerCommented:
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("smtp.yourserver.com", 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

TheAnswerManAuthor Commented:
OK I was able to work it out.

private variable not being set with WSID.    'Jimbo.Mydomain.com'

I found this explanation:

There is one suggested workaround:

Thanks for trying.
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.

Join & Write a Comment

Featured Post

Get expert help—faster!

Need expert help—fast? Use the Help Bell for personalized assistance getting answers to your important questions.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now