Email cdosys problem suddenly and before was working good was sent to blacklist

Alex E.
Alex E. used Ask the Experts™
on
Hello I was working good and suddenly my windows server stopped sending emails via cdosys.asp and I found was list in CBL. They say: This IP address was detected and listed 85 times in the past 28 days, and 14 times in the past 24 hours. The most recent detection was at Thu Apr 5 15:05:00 2018 UTC +/- 5 minutes

The listing of this IP is because it HELOs as a bare IP address (A bare ip address looks like: "54.33.33.5"). It is not HELO'ing as itself ("xxx.xxx.xxx.xxx").

I have windows 2008 and almost we don’t send email just the normal reports of a LMS.

How can I fix the problem I just use my regular IP like years but suddenly stopped working.

Thank you
Comment
Watch Question

Do more with

Expert Office
EXPERT OFFICE® is a registered trademark of EXPERTS EXCHANGE®
Scott SilvaNetwork Administrator

Commented:
https://www.abuseat.org/namingproblems.html

Spells out why you are getting on the list...

First you need to figure out what originates the mail, then if it is relayed from inside your organization, how that relay is set up...

You say server 2008, but you don't mention what you are using for email server services.

Author

Commented:
Well I use windows 2008 server and for mail CDOSYS. i have configure on the relay of II6 the 127.0.0.1 and our IP. We have IIS 7.5 for years but IIs 6.0 since the beginning was used for emails. There is nothing else like that worked and the code:

Dim ObjSendMail

Set ObjSendMail = CreateObject("CDO.Message")

   

'This section provides the configuration information for the remote SMTP server.

   

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1 'Send the message using the network (SMTP over the network).

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory") = "c:\inetpub\mailroot\pickup"

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = smtpserver

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = False 'Use SSL for the connection (True or False)

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60

   

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 'basic (clear-text) authentication

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = youremail

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = yourpassword

   

ObjSendMail.Configuration.Fields.Update
Scott SilvaNetwork Administrator

Commented:
Set a Fully Qualified Domain Name

At startup, the name that is designated on the Network Identification tab of the System Properties dialog box is automatically used for the fully qualified domain name (FQDN). If you change the name (either manually or by joining a Microsoft Windows 2000 domain), the new name is automatically used for the FQDN the next time the computer is restarted. You do not have to perform any action to update the FQDN for the virtual server.


To override the automatic use of the computer and domain names on the Network Identification tab, change the FQDN in the Advanced Delivery dialog box (this is accessed through the Delivery tab). The Microsoft SMTP Service can then use the designated name instead of the name that is specified on the Network Identification tab. To set the FQDN, follow these steps:

    In the MMC, click to select the SMTP virtual server, and then click Properties on the Action menu.
    On the Delivery tab, click Advanced to open the Advanced Delivery dialog box.
    For Fully-qualified domain name, type the FQDN.
Fundamentals of JavaScript

Learn the fundamentals of the popular programming language JavaScript so that you can explore the realm of web development.

Author

Commented:
I guess the FQDN is the Full computer name innsystem properties ok?
Now that name I need to include also in the cdosys script replacing the 127.0.0.1 for that name?
I mean 127.0.0.1 is on cdosys script like symptoms server, instead of that we use the FQDN name?
Scott SilvaNetwork Administrator

Commented:
I would use whatever outside address your system is sending mail from...
If your mail is only internal, it shouldn't be triggering blacklists anyway

Author

Commented:
Is internal only. Now Imdid what you said Imreplaced then FQDN in Delivery advancedntab in MMS settings and now the mails go to queue directory and are stuck there. And also I tested my qualified domain and like a test I resolved the DNS of that qualified domain and points to our IP address is on relay. That is just a comment I don’t know if that is correct.
Scott SilvaNetwork Administrator

Commented:
If your mail is internal only, then just exempt your internal system from doing blacklist lookups on that address... I don't see how internal only mail is triggering a blacklist... It has to be going outside of your organization to an outside recipient

Author

Commented:
Oh sorry to miss understood. Is internal Immean with the 127.0.0.1 really but we use cdosys to send emails the internet. The CDOSYS script you saw takes data from a user form. Is a support form, the users enter their data and then the email is sent to management on a company.

What could be?
Scott SilvaNetwork Administrator

Commented:
Let me get this straight... You have a web form that creates an email... Does this email ever go outside to say a gmail address or any email server outside of your organization?

Does it go to your company email server to get sent, or does it go to a smart host somewhere? It really shouldn't be trying to send to the internet by itself, and if it is trying to relay thru another server, its helo should just be a FQDN,

Without knowing exactly how or where this goes, or all the servers it might touch, it is a bit harder to diagnose...  

If it is actually adding the ip address you originally posted in your first question, then look at that server to make sure the FQDN is set right...  
It was just recently that they tightened restrictions on helo names and I got hit with it also on our smart hosts... hey had internal domain names, and were not legal outside the building so I had to change them to their outside FQDN's...

Author

Commented:
Look suppose we have a form like www.hello.com/form.asp then a user navigates that form and enter her/his data then is sent to this asp, where is all the CDOSYS:
<HTML>
<HEAD>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<META http-equiv="Pragma" CONTENT="no-cache">


<title>Message sent</title>
<style type="text/css">
<!--
.BotonExit2 {
	color: #FFFFFF;
	background-color: #FF0000;
}
-->
</style>
</head>

<body> 

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> 
<%
DIM strEmail
strEmail = Request.Form("Email")
IF strEmail <> "" AND inStr(strEmail,"@") <> 0 AND inStr(strEmail,".") <> 0 THEN



'First lets Dim all the variables we need

Dim emailfromr 

Dim email

Dim name

Dim message

Dim company

Dim telephone

Dim address1

Dim city

Dim state

Dim zip

Dim users

Dim app_name

Dim decision_time

Dim OS

Dim bandwidth

Dim DedicatedFirewall

Dim TapeBackup

Dim special_details

Dim MyBody

Dim MyMail

Dim MyEmail

Dim SmtpMail

Dim racecn

Dim cn
 

'Now lets get some values for the variables from the form

smtpserver = "127.0.0.1"

youremail = "myemailto@gmail.com"

yourpassword = "ADDYOURPASSWORD"

email = Request.Form("email")

emailfromr = "info@ourcompany.com"

If email = "" then email ="Invalid Mail"

name = Request.Form("name")

message = Request.Form("message")

company = Request.Form("company")

telephone = Request.Form("telephone")

address = Request.Form("address")

city = Request.Form("city")

state = Request.Form("state")

zip = Request.Form("zip")

users = Request.Form("users")

app_name = Request.Form("app_name")

decision_time = Request.Form("decision_time")

OS = Request.Form("OS")

bandwidth = Request.Form("bandwidth")

DedicatedFirewall = Request.Form("DedicatedFirewall")

TapeBackup = Request.Form("TapeBackup")

special_details = Request.Form("special_details")

cn = Request.QueryString("cn")

 

'Now lets build the body of the email from the data in the form

MyBody = "<p><font face=Arial size=2>" & Chr(13) & vbcrlf

MyBody = MyBody & "Ñame who sent: "& Name & Chr(13) & vbcrlf & "<br>"

MyBody = MyBody & "Email who sent: "& email & vbcrlf & "<br>"

MyBody = MyBody & "Message: "& message & vbcrlf & "<br>"

'Now lets put the variables and other information we need into the mailing script 

TitleRace = "Question "

Dim ObjSendMail

Set ObjSendMail = CreateObject("CDO.Message") 

   

'This section provides the configuration information for the remote SMTP server.

   

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1 'Send the message using the network (SMTP over the network).

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory") = "c:\inetpub\mailroot\pickup"

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = smtpserver

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = False 'Use SSL for the connection (True or False)

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60

   

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 'basic (clear-text) authentication

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = youremail

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = yourpassword

   

ObjSendMail.Configuration.Fields.Update

   

'End remote SMTP server configuration section==

   

ObjSendMail.To = youremail

ObjSendMail.Subject = TitleRace
ObjSendMail.From = emailfromr

   

' we are sending a html email.. simply switch the comments around to send a text email instead

ObjSendMail.HTMLBody = MyBody

'ObjSendMail.TextBody = MyBody no

   

ObjSendMail.Send

   

Set ObjSendMail = Nothing 
%>
 <font face=Arial color=#878787 size=2>We will answer soon.
<br>
<br><br>

<font color=#58D1F0>

<% =Replace(MyBody,vbCr,"<font face=Arial size=2>") %>

</font>

 
<br><br>

<input name="Click Here to Exit or Close this Window" type="hidden" class="BotonExit2" onClick="history.go(-1)" value="Sent other message">
<% ELSE
Response.Write "<p><font face=Arial color=#878787 size=2>Invalid mail.</font></b></p>"

IF strEmail <> "" THEN
ELSE
Response.Write ""
END IF
IF inStr(strEmail,"@") <> 0 THEN
ELSE
Response.Write ""
END IF
IF inStr(strEmail,".") <> 0 THEN
ELSE
Response.Write ""
END IF
%>

<input type="image" src="downcdo.jpg" onmouseover="this.src='downcdoover.jpg'" onmouseout="this.src='downcdo.jpg'" onClick="history.go(-1)" value="Press here to fix" name="Click Here to Back and fill the Form again" />

<%
END IF 
%>

</body>
</html> 

Open in new window


And this is the file that is located and stuck in queue:
 
Received: from mail pickup service by 127.0.0.1 with Microsoft SMTPSVC;
	 Thu, 5 Apr 2018 21:06:04 -0500
Thread-Topic: Question
thread-index: AdPNS9FgSJXrHYSVQemOqAKb0B9Xjg==
From: <info@ourcompany.com>
To: <myaddress@gmail.com>
Subject: Question of support
Date: Thu, 5 Apr 2018 21:06:04 -0500
Message-ID: <3387587AED38442BB46160167072C792@masterserver.servertx>
MIME-Version: 1.0
Content-Type: multipart/alternative;
	boundary="----=_NextPart_000_0014_01D3CD21.E88B3B50"
X-Mailer: Microsoft CDO for Windows 2000
Content-Class: urn:content-classes:message
Importance: normal
Priority: normal
X-MimeOLE: Produced By Microsoft MimeOLE V6.1.7601.24000
X-OriginalArrivalTime: 06 Apr 2018 02:06:04.0496 (UTC) FILETIME=[D1803D00:01D3CD4B]

This is a multi-part message in MIME format.

------=_NextPart_000_0014_01D3CD21.E88B3B50
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit

Who: prueba ok 
Email who send: ok@ok.com 
Message: ok 


------=_NextPart_000_0014_01D3CD21.E88B3B50
Content-Type: text/html
Content-Transfer-Encoding: 7bit

<p><font face=Arial size=2>



<br>body
<br>ok 
<br>
------=_NextPart_000_0014_01D3CD21.E88B3B50--

 

Open in new window


 That last part not moved from queue directory. The strange one month ago exactly that script was working perfect, suddenly happened. Maybe happened like you said you was hit also. How can I fix? The emails were never received and you could imagine the people how they are.
On the scripts just changed with non real example, my mail to for my gmail address, also non real the mail company and server name.

I hope there is a solution.
Regards

Author

Commented:
One note. Is just one server with one page and it’s form. And of course the is on blacklist like you said me before. But stuck in queue I think is not that.

Author

Commented:
This is another test changing an IP:

From: postmaster@server.servermaster.servertx
To: info@ourcompany.com
Date: Thu, 5 Apr 2018 22:16:00 -0500
MIME-Version: 1.0
Content-Type: multipart/report; report-type=delivery-status;
	boundary="9B095B5ADSN=_01D3CD5594F88EA400000001127.0.0.1"
X-DSNContext: 7ce717b1 - 1196 - 00000002 - 00000000
Message-ID: <FRaqbC8wS00000001@127.0.0.1>
Subject: Delivery Status Notification (Failure)

This is a MIME-formatted message.  
Portions of this message may be unreadable without a MIME-capable mail program.

--9B095B5ADSN=_01D3CD5594F88EA400000001127.0.0.1
Content-Type: text/plain; charset=unicode-1-1-utf-7

This is an automatically generated Delivery Status Notification.

Delivery to the following recipients failed.

       myemail@gmail.com




--9B095B5ADSN=_01D3CD5594F88EA400000001127.0.0.1
Content-Type: message/delivery-status

Reporting-MTA: dns;127.0.0.1
Received-From-MTA: dns;server.servermaster.servertx
Arrival-Date: Thu, 5 Apr 2018 21:06:04 -0500

Final-Recipient: rfc822;myemail@gmail.com
Action: failed
Status: 5.5.0
Diagnostic-Code: smtp;550-5.7.1 [xxx.xxx.xxx.xx] The IP address sending this message does not have a
550-5.7.1 PTR record setup. As a policy, Gmail does not accept messages from
550-5.7.1 IPs with missing PTR records. Please visit
550-5.7.1  https://support.google.com/mail/answer/81126#authentication for more
550 5.7.1 information. k64si2694593qkd.422 - gsmtp

--9B095B5ADSN=_01D3CD5594F88EA400000001127.0.0.1
Content-Type: message/rfc822

Received: from mail pickup service by 127.0.0.1 with Microsoft SMTPSVC;
	 Thu, 5 Apr 2018 21:06:04 -0500
Thread-Topic: Quesiom
thread-index: AdPNS9FgSJXrHYSVQemOqAKb0B9Xjg==
From: <info@ourcomoany.com>
To: <mygmail@gmail.com>
Subject: Question
Date: Thu, 5 Apr 2018 21:06:04 -0500
Message-ID: <3387587AED38442BB46160167072C792@servermaster.servertx>
MIME-Version: 1.0
Content-Type: multipart/alternative;
	boundary="----=_NextPart_000_0014_01D3CD21.E88B3B50"
X-Mailer: Microsoft CDO for Windows 2000
Content-Class: urn:content-classes:message
Importance: normal
Priority: normal
X-MimeOLE: Produced By Microsoft MimeOLE V6.1.7601.24000
X-OriginalArrivalTime: 06 Apr 2018 02:06:04.0496 (UTC) FILETIME=[D1803D00:01D3CD4B]

This is a multi-part message in MIME format.

------=_NextPart_000_0014_01D3CD21.E88B3B50
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit


Email: ok@ok.com 
Message: todo ok ya 


------=_NextPart_000_0014_01D3CD21.E88B3B50
Content-Type: text/html
Content-Transfer-Encoding: 7bit

<p><font face=Arial size=2>



<br>Email: ok@ok.com
<br>Message: todo ok ya
<br>
------=_NextPart_000_0014_01D3CD21.E88B3B50--


--9B095B5ADSN=_01D3CD5594F88EA400000001127.0.0.1--

Open in new window

Same stuck in queue.
Network Administrator
Commented:
Gmail is probably who is blacklisting you. I assume that server has some outside ip address since it is able to get mail out... Use that address as the helo name and see if it clears...
You will have to clear the blacklisting also...

Otherwise, you are going to have to use a relay that already has some good repudiation... All the big carriers constantly increase their blocking of emails that MIGHT end up spamming... It is getting harder and harder to send email without having a properly set up mailserver... The hurdles just get bigger.

We had to implement many things to get accepted by the big outside carriers. From good reverse DNS to SPF and DKIM, and constant vigilance keeping spam from leaving the network, it is a big job.

I'm not sure if you could even use a checker like mxtoolbox (www.mxtoolboc.com) to hammer out what is wrong...  But I would try.

Author

Commented:
Ok I will do. Yes I contacted the black listed and they removed. But you mention to put the our address as the helo name, how can I do that? Where?

Author

Commented:
Ok I got. Any good service or company that accept send emails with API, like the script I typed here of CDOSYS? Just in case and have the output better from there.
Scott SilvaNetwork Administrator

Commented:
I don't use email hosting, so I can't recommend any.  You don't have your own company email? If so, use it...
Seth SimmonsSr. Systems Administrator

Commented:
No comment has been added to this question in more than 21 days, so it is now classified as abandoned.

I have recommended this question be closed as follows:

Accept: Scott Silva (https:#a42524519)

If you feel this question should be closed differently, post an objection and the moderators will review all objections and close it as they feel fit. If no one objects, this question will be closed automatically the way described above.

seth2740
Experts-Exchange Cleanup Volunteer

Do more with

Expert Office
Submit tech questions to Ask the Experts™ at any time to receive solutions, advice, and new ideas from leading industry professionals.

Start 7-Day Free Trial