Problema con CDONTS e mail

[fruttosio79]

Ciao a tutti,
ho sviluppato del codice con il comando CDONTS per inviare delle mail e devo dire che tutto funziona se ad esempio mando delle mail a destinatari nome@tin.it, mentre se le mando a nome@libero.it mi finiscono nella cartella Badmail con un anotifica di errore.

Il mio sito e l'indirizzo di posta elettronica che utilizzo come mittente non esistono perchè lo stò ancora sviluppando, potrebbe essere questo il motivo degli errori di invio, cioè che Tin non controlla il mittente e Libero sì per cui non esistendo tale indirizzo Libero mi notifica con errore?

Ciao

[Vincent.Zeno]

Non credo che

cioè che Tin non controlla il mittente e Libero sì per cui non esistendo tale indirizzo Libero mi notifica con errore

mi ero spedito mail da uno scrit che non specificava il mittente e mi arrivavano regolarmente, non so se qualcosa è cambiato...

[fruttosio79]

Qualcun altro ha problemi di questo tipo?

Non credo che ci siano problemi di codice se nel caso di Libero mi dia errore (notifica di non destinazione)mentre Tin me le invia.

Ciao

[fruttosio79]

VVoVe:

[fruttosio79]

Il codice che uso è questo:

SUB sendNewUserMail(sUserName, sUserPassword, sUserMail)
	Dim newMailObj
	Dim sMailBody
  
  	Set newMailObj = CreateObject("CDONTS.Newmail")
  	newMailObj.From = "prova@prova.com"
  	newMailObj.To = sUserMail 
  	newMailObj.Subject = "Registrazione confermata"

    newMailObj.BodyFormat = CdoBodyFormatText
    newMailObj.MailFormat = CdoMailFormatMime    
    sMailBody = "Gentile cliente, " 
    sMailBody = sMailBody & "la sua registrazione è avvenuta con successo!" & vbNewLine & vbNewLine
    sMailBody = sMailBody & "Ecco di seguito i suoi dati per il login:" & vbNewLine
    sMailBody = sMailBody & "username: " & sUserName & vbNewLine
    sMailBody = sMailBody & "password: " & sUserPassword & vbNewLine & vbNewLine
    newMailObj.Body = sMailBody

  	newMailObj.Send
  	Set newMailObj = Nothing
END SUB

Non ci sono errori nel codice?
Giusto?

[fruttosio79]

Potrebbe essere sbagliato il fatto di rinchiudere il tutto in una sub?

[Vincent.Zeno]

Originariamente inviato da fruttosio79
Potrebbe essere sbagliato il fatto di rinchiudere il tutto in una sub?

Hai già provato in altro modo?

Una cosa: la mail che va a "libero", arriva poi viene segnata "Bad"; o non parte e va in "Bad"?
Quale errore riporta quando va in "Badmail"?

[fruttosio79]

La mail va in Queue
Poi mi collego ad internet e viene spedita
Controllo la posta in arrivo su outlook e non la ricevo
Controllo le badmail e la trovo lì dentro

L'errore che mi segnala è questo:

This is a MIME-formatted message.
Portions of this message may be unreadable without a MIME-capable mail program.
Notifica generata automaticamente sullo stato del recapito .
Recapito destinatari specificati di seguito non riuscito.
Content-Type: message/delivery-status

Diagnostic-Code: smtp;553 <prova@prova.com> unable to verify address


Inoltre nelle bad mail appare una altra mail che se provo ad aprirla contiene tutta una serie di dati indecifrabili

[Vincent.Zeno]

Diagnostic-Code: smtp;553 <prova@prova.com> unable to verify address

è come sospettavi: l'indirizo del mittente non è convalidato da libero, prova con un indirizzo valido

Controllo le badmail e la trovo lì dentro

su libero?
Scusa ma non ho capito tutti i passaggi...

[fruttosio79]

Originariamente inviato da Vincent.Zeno
è come sospettavi: l'indirizo del mittente non è convalidato da libero, prova con un indirizzo valido


su libero?
Scusa ma non ho capito tutti i passaggi...

- Eseguo il mio codice in locale senza essere connesso
- La mail va in Queue
- Poi mi collego ad internet e viene spedita al server di posta di riferimento e non risulta più in Queue
- Controllo la posta in arrivo su outlook e non la ricevo
- Ricontrollo le cartelle mailroot e la trovo tra le badmail

Ho provato a rispiegarti i passaggi in maniera più completa.

Ciao