Ho continuato nella sperimentazione ed ho appurato che il responsabile del mancato invio di email aventi dominio gmail non è Word o PDFCreator ma qualcos’altro, che non so individuare.

Il semplicissimo programma :

codice:
Private WithEvents poSendMail As vbSendMail.clsSendMail
Const SMPT = “mail.tin.it”
Const EmailNoReply = “…….”
Const NomeNoReply = “…….”
 
Sub Command1_click
   Dim Linea(1 To 3) As String
   Linea(1) = "…..@libero.it"
   Linea(2) = "………@gmail.com"
   Linea(3) = "…..@alice.it"
   For i = 1 To 3
      EmailX = Linea(i)
      Spedisci EmailX, "SOGGETTO " & CStr(i), "Messaggio " & CStr(i) + " da " & EmailX
   Next i
End sub 
  
Private Sub Spedisci(Destinatario, Soggetto, Messaggio)
   Set poSendMail = New clsSendMail
   poSendMail.SMTPHost = SMTP
   poSendMail.From = EmailNoReply
   poSendMail.FromDisplayName = NomeNoReply
   poSendMail.Recipient = Destinatario
   poSendMail.RecipientDisplayName = Destinatario
   poSendMail.Subject = Soggetto
   poSendMail.Message = Messaggio
   poSendMail.Send
   Set poSendMail = Nothing
End Sub
Invia la prima e la terza email ma non la seconda, quella con gmail.
Ho effettuato numerosissime modifiche al codice sopra riportato, senza alcun successo.
Qualcuno ha qualche idea su come intervenire ?