Announcement

**Steve Bouffe** · 18 Nov 2008, 12:26 PM

Wondering if it's a problem on their mail server?

Just modified the sendmail routine from the downloads area. The program fails just after the print "3" statement and outputs

Code:

1
2
3
Error State
RCPT TO error: 504 5.5.2 <misterdj>: Helo command rejected: need fully-qualified
 hostname

Code:

#COMPILE EXE
#INCLUDE "PBCGI.INC"

'------------------------------------------------------------------------------

FUNCTION PbMain() AS LONG

  LOCAL hTcp      AS LONG
  LOCAL params    AS LONG
  LOCAL x         AS LONG

  LOCAL buffer    AS STRING
  LOCAL localhost AS STRING

  LOCAL mailto    AS STRING
  LOCAL mailfrom  AS STRING
  LOCAL mailhost  AS STRING
  LOCAL subject   AS STRING
  LOCAL email     AS STRING
  LOCAL required  AS STRING

  mailto   = "[email protected]"
  mailfrom = "[email protected]"
  mailhost = "smtp.mail.areti.net"
  subject  = "test"
  
' ** Connect to mail server
  hTCP = FREEFILE
  TCP OPEN "smtp" AT mailhost AS hTCP
  IF ERR THEN
    Buffer = "Error connecting to mailhost"
    GOTO SendError
  ELSE
    TCP LINE hTCP, Buffer
    IF LEFT$(Buffer, 3) <> "220" THEN
      GOTO SendError
    END IF
  END IF

' ** Get the local host name
  HOST NAME TO localhost

' ** Greet the mailhost
  print "1"
  TCP PRINT hTCP, "HELO " + localhost
  TCP LINE hTCP, Buffer
  IF LEFT$(Buffer, 3) <> "250" THEN
    Buffer = "HELO error: " + Buffer
    GOTO SendError
  END IF
  print "2"
' ** Tell the mailhost who we are
  TCP PRINT hTCP, "MAIL FROM: <" & mailfrom & ">"
  TCP LINE hTCP, Buffer
  IF LEFT$(Buffer, 3) <> "250" THEN
    Buffer = "MAIL FROM error: " + Buffer
    GOTO SendError
  END IF
  print "3"
' ** Tell the mailhost who the message is for
  TCP PRINT hTCP, "RCPT TO: <" + mailto + ">"
  TCP LINE hTCP, Buffer
  IF LEFT$(Buffer, 3) <> "250" THEN
    Buffer = "RCPT TO error: " + Buffer
    GOTO SendError
  END IF
  print "4"
' ** Send the message
  TCP PRINT hTCP, "DATA"
  TCP LINE hTCP, Buffer
  IF LEFT$(Buffer, 3) <> "354" THEN
    Buffer = "DATA error: " + Buffer
    GOTO SendError
  END IF

  TCP PRINT hTCP, "From: " & mailfrom
  TCP PRINT hTCP, "To: " & mailto
  TCP PRINT hTCP, "Subject: " & subject
  TCP PRINT hTCP, "X-Mailer: PowerBASIC mailer.exe (www.powerbasic.com)"
  TCP PRINT hTCP, ""

  tcp print hTCP, "This is a test email message"

' ** We're done sending the message
  TCP PRINT hTCP, "."
  TCP LINE hTCP, Buffer
  IF LEFT$(Buffer, 3) <> "250" THEN
    GOTO SendError
  END IF

' ** Say goodbye
  TCP PRINT hTCP, "QUIT"
  TCP LINE hTCP, Buffer
  IF LEFT$(Buffer, 3) <> "221" THEN
    Buffer = "QUIT error: " + Buffer
    GOTO SendError
  END IF

  TCP CLOSE hTCP

' ** Redirect the user's browser to the new page
  

  FUNCTION = -1

Done:
  EXIT FUNCTION

SendError:
  print "Error State"
  print buffer
  TCP CLOSE hTCP
  waitkey$
  GOTO Done

END FUNCTION

**Joe Byrne** · 18 Nov 2008, 01:22 PM

Steve,

Just off the top of my head, you might be trying to connect to a server that is enforcing a reverse look-up on your domain name. If so, you'll need to make sure that you have a reverse DNS entry for your email server that matches exactly to the IP address. Many ISPs that provide static addresses and do your DNS for you fail to create a reverse IP entry for your domain so it points back to their domain name instead.

Another thing to look at:

localhost misterdj
Buffer RCPT TO error: 504 5.5.2 <misterdj>: Helo command rejected: need fully-qualified

The domain name you are passing in the Helo statement is 'misterdj'. The server is saying that it wants a real domain name. ie: mail.misterdj.com

Clearly this is an anti-spam attempt by the receiving server, so you're going to have to change your headers to match what that server is looking for.

**Steve Bouffe** · 19 Nov 2008, 08:25 AM

Thanks Joe,

Been speaking to the ISP and they did make changes.

Looks like I need to be using relay.mail.areti.net instead as smtp.mail.areti.net requires a username and password.

Just out of interest, whats the syntax for defining this in the function?

**John Petty** · 25 Nov 2008, 10:22 AM

Steve
Little different answer for you than Joe's which would more properly apply if you are sending direct to many different mail servers, but as I read your code you don't have your own mail server but are just sending outgoing emails via your ISP's mail servers.
In that case it sounds like they have simply split the mail load between primarily incoming and outgoing mail (very common), so simply change to the new outgoing server name they have given.
Whilst the word "relay" in the name is unusual, I would imagine it is locked down from being an open relay and only accepts outgoing mail IP addresses that it knows belong to the ISP.
As for the qualified domain name and reverse lookup, these then no longer apply to you as the final receiving mail server will be verifying that information about your ISP's server names not yours.
John

**Steve Bouffe** · 25 Nov 2008, 12:00 PM

Thanks John, after checking you are correct. The mail server is only available to my ISP's customers in the datacentre.

I still have an issue when sending emails close together in time. The first one goes out ok but the second does not.

I don't have the time yet to fully work out why.

**John Strasser** · 19 Dec 2008, 01:13 AM

That's another common anti-spam measure (in the smtp server). In the same league as an isp limiting the number of people in the To:/CC:/BCC: fields.

The best way I've found is to place a 2-5 sec delay (random) between each outgoing email.

- or -

get your own server

- or -

use a service like goldbar.net, aweber (personally, I like goldbar better), or listbox.com (I've used their POBOX email service since 96 and LOVE it).

Hope this helps.

JS

Announcement

Sendmail Problem

Sendmail Problem

Comment

Comment

Comment

Comment

Comment

Comment