Hello, everyone...
Any input on this would be really appreciated.
I have a processing service that generates very simple SMTP notifications to
customers. Basically, these are system alerts about item due dates, etc. I
am using ICS TSyncSMTPCli v2.5 to send the messages with. I simply set the
envelope parameters and message, then deliver it to the SMTP server. VERY
SIMPLE. I have used this same pattern in numerous apps for years and never
had a problem.
A recent client signed up for the service who is with GoDaddy. For some
very ANNOYING reason, GoDaddy doesn't like something about the emails I am
sending him. It rejects them with "554 The message was rejected because it
contains prohibited virus or spam content". This is of course absurd, since
they are text format emails with one or two sentences of text. I have tried
several different content changes, including just sending, "this is a test".
All bounce back with this error.
I just got off the phone with a tech there who is rather clueless. My IP /
host is not blocked and they can't tell me why it is rejecting the emails.
So, currently, my best guess is that something in the way I am creating the
envelope is flagging their spam/virus filter. I have not had this problem
with any other SMTP servers, but that doesn't necessarily mean anything. I
am open to the possibility that I am doing something they don't like, but I
have no clue what that could be. My header is so simple, I am at a loss as
to what they might not like.
Has anyone ever encountered this issue? Any thoughts? I am stumped. I
have been doing this for years without problem. :(
Here is a snippet of code from where I set the email content parameters.
Maybe I am doing something odd? Maybe they don't like the ReplyTo not being
the sender or something? FYI, smtpMain is the TSyncSMTPCli component.
*************************************************************
Code snippet
*************************************************************
smtpMain.FromName := fFromAddr;
smtpMain.HdrReplyTo := fReplyTo;
smtpMain.HdrFrom := fFromName;
smtpMain.HdrTo := aEmail;
smtpMain.HdrCc := '';
smtpMain.HdrSubject := aSubject;
smtpMain.HdrSender := fFromAddr;
smtpMain.RcptName.Clear;
smtpMain.RcptNameAdd(smtpMain.HdrTo,'','');
with smtpMain.MailMessage do
begin
Clear;
if not fNoPrelim then
begin
Add('Per your request, we are notifying you of the following');
Add('event:');
Add('');
Add('');
Add('Account name: ' +
qryNotifyHistory.FieldByName('acct_ref').AsString);
Add(
qryNotifyHistory.FieldByName('proj_label').AsString +
': ' +
qryNotifyHistory.FieldByName('proj_title').AsString);
Add('');
end;
Add(aMessageText);
if not fNoFooter then
begin
Add('');
Add('');
Add('*******************************************************');
Add('Note: This is an automatically generated email. Replies');
Add('to this email will not be read.');
Add('*******************************************************');
end;
end;
SetTask('Delivering SMTP message...');
SetTaskProgress(33);
if not smtpMain.MailSync then
begin
Result := False;
LogText(0, 'Err: ' + smtpMain.ErrorMessage, 'Failed');
exit;
end;
*************************************************************
End Code snippet
*************************************************************
--
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be
