Go Daddy email account

Coordinator
May 4, 2011 at 3:42 PM

Claude,

Are you using an email account from Godaddy in the sample website?  Have you tried their email account yet?  I'm trying to use the godaddy email account using this server address they provided but no luck.

Host Names
HOST:    m1pismtp01-v01.prod.mesa1.secureserver.net
HOST:    p3pismtp01-v01.prod.phx3.secureserver.net
IMAP:    imap.secureserver.net
POP:    pop.secureserver.net
SMTP:    smtpout.secureserver.net

MX Records
0    smtp.secureserver.net
10    mailstore1.secureserver.net

Coordinator
May 4, 2011 at 5:58 PM

Here's the working GoDaddy Demo code:

 

<%
    oSMTP=NEWOBJECT('AVFPsmtp')
    oSMTP.cSMTPServer= 'relay-hosting.secureserver.net' && enter your smtp server name or ip
    oSMTP.cSenderName = oRequest.FORM("txtMailFrom")
    oSMTP.cRecipient= oRequest.FORM("txtMailTo")
    oSMTP.cBCCList = oRequest.FORM("txtMailBcc")
    oSMTP.cSubject = oRequest.FORM("txtMailSubject")
    oSMTP.cMessage = oRequest.FORM("S1")
    lcSuccess=oSMTP.CDOsend()
%>
This code is in email2.htm but could easily have gone in email1.htm to keep everything in one file.

Coordinator
May 4, 2011 at 7:20 PM

Here's the specific error that I get by just changing the cSMTPServer value to the one that you provided.

Error Type:
cdosend err#= 1429 line= 2292 OLE IDispatch exception code 0 from ?: The server rejected one or more recipient addresses. The server response was: 553 sorry, relaying denied from your location [206.45.82.76] (#5.7.1) ..1429 OLE IDispatch exception code 0 from ?: The server rejected one or more recipient addresses. The server response was: 553 sorry, relaying denied from your location [206.45.82.76] (#5.7.1) .. The server rejected one or more recipient addresses. The server response was: 553 sorry, relaying denied from your location

Just to clear things, the website is on an XP machine and not being hosted by GODaddy.  Although, what I want to use is the email account that I have procure from GoDaddy together with a hosting service.

Coordinator
May 4, 2011 at 10:05 PM
Edited May 4, 2011 at 10:06 PM

I figured it out.  The client's ISP requre SSL authentication for it to actually send those message.  I used a similar program from VFPWiki using SSL authentication and it works.

 

http://fox.wikis.com/wc.dll?Wiki~CdoEmail

 

TRY
LOCAL lcSchema, loConfig, loMsg, loError, lcErr
lcErr = ""
lcSchema = "http://schemas.microsoft.com/cdo/configuration/"
loConfig = CREATEOBJECT("CDO.Configuration")
WITH loConfig.FIELDS
.ITEM(lcSchema + "smtpserver") = "smtp.gmail.com"
.ITEM(lcSchema + "smtpserverport") = 465 && � 587
.ITEM(lcSchema + "sendusing") = 2
.ITEM(lcSchema + "smtpauthenticate") = .T.
.ITEM(lcSchema + "smtpusessl") = .T.
.ITEM(lcSchema + "sendusername") = "usuario@gmail.com"
.ITEM(lcSchema + "sendpassword") = "contrase�a"
.UPDATE
ENDWITH
loMsg = CREATEOBJECT ("CDO.Message")
WITH loMsg
.Configuration = loConfig
.FROM = "usuario@gmail.com"
.TO = "usuario@hotmail.com"
.Subject = "Prueba desde Gmail"
.TextBody = "Este es un mensaje de prueba con CDO con " + ;
"autenticaci�n y cifrado SSL desde Gmail"
.Send()
ENDWITH
CATCH TO loError
lcErr = [Error: ] + STR(loError.ERRORNO) + CHR(13) + ;
[Linea: ] + STR(loError.LINENO) + CHR(13) + ;
[Mensaje: ] + loError.MESSAGE
FINALLY
RELEASE loConfig, loMsg
STORE .NULL. TO loConfig, loMsg
IF EMPTY(lcErr)
MESSAGEBOX("El mensaje se envi� con �xito", 64, "Aviso")
ELSE
MESSAGEBOX(lcErr, 16 , "Error")
ENDIF
ENDTRY
Coordinator
May 4, 2011 at 11:26 PM

Thanks for the tip.  Glad it works now.