[VISUAL FOX PRO] Rifiuto email inviate con CDOSys in base al corpo dei messaggi

[danban64]

Salve, sono nuovo di questo forum e colgo l'occasione per salutare tutti.

Mi si sta' verificando un fatto stranissimo. Inviando alcune email mi e' capitato che con 2 o 3 destinatari (badate bene sempre gli stessi) l'email rimbalza per alcune ore, trascorse le quali ritorna indietro un msg di errore:

Delivery Status Notification (Failure)
Unable to deliver message to the following recipients, due to being unable
to connect successfully to the destination mail
server.

Dopo aver fatto innumerevoli prove, ho scoperto che e' la presenza dei comandi per andare a capo ( CHR(10)+CHR(13) ) nel corpo che causano questa strana anomalia.

Infatti eliminandoli, le email vengono regolarmente recapitate.

Stranissimo... suggerimenti/consigli?

Saluti.

[Grumpy]

Originariamente inviato da danban64
Salve, sono nuovo di questo forum e colgo l'occasione per salutare tutti.

Ciao. Perché non cogli anche l'occasione per leggere il regolamento?
Questa sezione del forum, come puoi ben vedere, è dedicata a problemi di programmazione in specifici linguaggi. Il tuo è un problema di questo genere? In caso affermativo: in quale linguaggio?

[danban64]

Hai ragione e chiedo scusa.
Comunque il linguaggio utilizzato e' visualFox e riguarda l'invio di email tramite CDOsys

mi sono permesso discrivere qui in quanto i due linguaggi, hanno diversi punti in comune e (purtroppO) non esiste (o non ho trovato) un forum sul VisualFox.

Ma soprattutto perche' il problema che ho riscontrato non dovrebbe essere legato all'effettivo linguaggio utilizzato.

Riporto un pezzo del sorgente:

loMsg = CREATEOBJECT ("CDO.Message")
loMsg.Configuration = loConfig

WITH loMsg
.FROM = tcFrom
.TO = tcTo
IF tcRichiesta
.mdnrequested = .T.
ELSE
.mdnrequested = .F.
ENDIF
IF TYPE("tcCC") = "C"
.CC = tcCC
ENDIF
IF TYPE("tcBCC") = "C"
.BCC = tcBCC
ENDIF
.Subject = tcSubject
IF tlHTMLFormat
.HTMLBody = tcBody
ELSE
.TextBody = tcBody
ENDIF
IF TYPE("tafiles") = "C"
FOR lnCountAttachments = 1 TO ALEN(taFiles)
loAtt=.AddAttachment(taFiles(lnCountAttachments))
ENDFOR
ENDIF
.SEND()
ENDWITH

La variabile relativa al corpo e' cosi' valorizzata:
tcBody = "Vi inviamo il seguente documento" + CHR(10) + CHR(13) + TIPDOC + etc,etc

saluti

[danban64]

Risolto il "mistero"

Se puo' essere utile per il futuro a qualcuno, vi posso dire che dipendeva dalle impostazioni del SMTP.

Ho sostituito mail.tuttopmi.it con mail.cs.interbusiness.it e a quanto sembra il difetto non si e' piu' manifestato.

Saluti.