Risultati da 1 a 11 di 11

Discussione: Invio mail con vba attraverso un dominio esterno



  1. #1
    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    63
    Messaggi
    2026
    Versione Office
    2007 - 2013
    Mi Piace ricevuti
    256
    Mi Piace dati
    39

    Invio mail con vba attraverso un dominio esterno

    Ciao a tutti.

    Mi rendo conto che la domanda non è delle più semplici ma c'è qualcuno che possa indirizzarmi sul come fare per inviare mail con VBA attraverso un dominio esterno che è questo?

    https://webmail.aruba.it/index.html?....20161003_1200

    Grazie
    Ultima modifica fatta da:alfrimpa; 18/10/16 alle 10:56
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"
    Cit. Berna11: "Se ti piace la risposta di qualcuno, oltre a ringraziarlo, puoi cliccare su "Mi Piace" in basso a sinistra del loro messaggio."

  2. #2
    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    63
    Messaggi
    2026
    Versione Office
    2007 - 2013
    Mi Piace ricevuti
    256
    Mi Piace dati
    39

    Re: Invio mail con vba attraverso un dominio esterno

    Questo è un esempio di codice che ho trovato in rete

    Codice: 
    Sub InviaMail2()
        Dim iMsg As Object
        Dim iConf As Object
        Dim strbody As String
        Dim Flds As Variant
        Dim  MittenteMail, OggettoMail, DestinatarioMail As String
       
        Set iMsg = CreateObject("CDO.Message")
        Set iConf = CreateObject("CDO.Configuration")
    
        iConf.Load -1    ' CDO Source Defaults
        Set Flds = iConf.Fields
        With Flds
            .Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
            .Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
            .Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "emailMittente@gmail.com"
            .Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "Password"
            .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
    
            .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
            .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
            .Update
        End With
    
       
        strbody = "prova invio allegato"
    
    DestinatarioMail = "emaildestinatario@libero.it"
    
        With iMsg
            Set .Configuration = iConf
            .To = DestinatarioMail
            .CC = ""
            .BCC = ""
            ' Note: The reply address is not working if you use this Gmail example
            ' It will use your Gmail address automatic. But you can add this line
            ' to change the reply address  .ReplyTo = "Reply@something.nl"
            MittenteMail = "Umberto"
            OggettoMail = "PROVA"
            .From = MittenteMail
            .Subject = OggettoMail
            .TextBody = strbody
            .Send
        End With
    
    End Sub
    come si dovrebbe modificare per adattarlo al sito specificato prima (ovviamente conoscendo indirizzo mail e password per il login)?
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"
    Cit. Berna11: "Se ti piace la risposta di qualcuno, oltre a ringraziarlo, puoi cliccare su "Mi Piace" in basso a sinistra del loro messaggio."

  3. #3
    L'avatar di Powerwin
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Milano
    Messaggi
    439
    Versione Office
    2010
    Mi Piace ricevuti
    68
    Mi Piace dati
    27

    Re: Invio mail con vba attraverso un dominio esterno

    Ciao Alfredo, i parametri da cambiare sono questi:

    Codice: 
    Sub InviaMail2()
        Dim iMsg As Object
        Dim iConf As Object
        Dim strbody As String
        Dim Flds As Variant
        Dim  MittenteMail, OggettoMail, DestinatarioMail As String
       
        Set iMsg = CreateObject("CDO.Message")
        Set iConf = CreateObject("CDO.Configuration")
    
        iConf.Load -1    ' CDO Source Defaults
        Set Flds = iConf.Fields
        With Flds
            .Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
            .Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
            .Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "emailMittente@gmail.com"
            .Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "Password"
            .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
    
            .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
            .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 'questo solo in caso di problemi
            .Update
        End With
    
       
        strbody = "prova invio allegato"
    
    DestinatarioMail = "emaildestinatario@libero.it"
    
        With iMsg
            Set .Configuration = iConf
            .To = DestinatarioMail
            .CC = ""
            .BCC = ""
            ' Note: The reply address is not working if you use this Gmail example
            ' It will use your Gmail address automatic. But you can add this line
            ' to change the reply address  .ReplyTo = "Reply@something.nl"
            MittenteMail = "Umberto"
            OggettoMail = "PROVA"
            .From = MittenteMail
            .Subject = OggettoMail
            .TextBody = strbody
            .Send
        End With
    
    End Sub
    devi andare nel sito di Aruba e vedere la configurazione del server di uscita smtp

    aggiorno:

    http://www.serversmtp.com/it/smtp-aruba-configurazione
    Flavio
    Non scrivetemi in MP per risolvere i problemi ed un grazie è sempre ben accetto quando ricevete degli aiuti

  4. #4
    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    63
    Messaggi
    2026
    Versione Office
    2007 - 2013
    Mi Piace ricevuti
    256
    Mi Piace dati
    39

    Re: Invio mail con vba attraverso un dominio esterno

    Ciao Flavio

    Prima della tua risposta avevo già provato (ovviamente non avendo un account Aruba l'ho fatto su Liberomai) e ricevevo un errore di run-time su .Send che poi ho risolto modificando il parametro "smpt.liberomail.it" in "smpt.libero.it".

    Ora funziona tutto perfettamente.

    Grazie
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"
    Cit. Berna11: "Se ti piace la risposta di qualcuno, oltre a ringraziarlo, puoi cliccare su "Mi Piace" in basso a sinistra del loro messaggio."

  5. #5
    L'avatar di Anthony
    Clicca e Apri
    Data Registrazione
    Sep 2016
    Località
    Ivrea (TO)
    Messaggi
    228
    Versione Office
    2003-2010-2016
    Mi Piace ricevuti
    166
    Mi Piace dati
    31

    Re: Invio mail con vba attraverso un dominio esterno

    Citazione Originariamente Scritto da alfrimpa Visualizza Messaggio
    Ciao Flavio

    Prima della tua risposta avevo già provato (ovviamente non avendo un account Aruba l'ho fatto su Liberomai) e ricevevo un errore di run-time su .Send che poi ho risolto modificando il parametro "smpt.liberomail.it" in "smpt.libero.it".

    Ora funziona tutto perfettamente.

    Grazie
    Alfredo, solo un warnig: CDO non spedira' le mail tramite la tua web mail, ne usera' le credenziali.
    Quindi non aspettarti di vederle poi nel tuo "Sent mails Folder"; anzi non le vedrai da nessuna parte.
    Ricordati quindi di inviartele in ccn e spostarle a mano tra le Sent; oppure memorizzi le mail in un txt sul tuo disco.

    Ciao
    Anthony

  6. I seguenti utenti hanno dato un "Mi Piace"


  7. #6
    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    63
    Messaggi
    2026
    Versione Office
    2007 - 2013
    Mi Piace ricevuti
    256
    Mi Piace dati
    39

    Re: Invio mail con vba attraverso un dominio esterno

    Grazie delle precisazioni Anthony.
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"
    Cit. Berna11: "Se ti piace la risposta di qualcuno, oltre a ringraziarlo, puoi cliccare su "Mi Piace" in basso a sinistra del loro messaggio."

  8. #7
    L'avatar di Alessandro
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Roma
    Età
    44
    Messaggi
    485
    Versione Office
    2010 64 bit
    Mi Piace ricevuti
    72
    Mi Piace dati
    37

    Re: Invio mail con vba attraverso un dominio esterno

    ciao,
    scusate se mi intrometto...leggendo e trovando interessante questo post l'ho appena provato.
    purtroppo mi da errore sull'ultimo comando
    Codice: 
    .Send

    ma la domanda però è anche un'altra.
    La mia azienda ha (come tante altre multinazionali) da poco raggiunto un accordo quadro con google per le mail...in pratica non utilizziamo più outlook o altri tool ma utilizziamo direttamente gmail. Ma lo utilizziamo come come se fosse ns il dominio...tantè che i ns account non sono ale@gmail.com ma sono ale@nomedellazienda.com...pur avendo tutto uguale a gmail.
    per ovvi motivi di opportunità non indico il nome della mia azienda.
    ecco la domanda...a prescindere dall'errore di cui sopra (che magari sarà solo per l'assenza o il non settaggio di un qualcosa) secondo voi c'è modo di poter far inviare via vba le mail da questo "gmail anomalo"?
    Grazie anche per dei consigli.
    ciao
    ale

  9. #8
    L'avatar di Alessandro
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Roma
    Età
    44
    Messaggi
    485
    Versione Office
    2010 64 bit
    Mi Piace ricevuti
    72
    Mi Piace dati
    37

    Re: Invio mail con vba attraverso un dominio esterno

    temo sia impossibile...ho appena risolto quel problemino (mi ero dimenticato di inserire il mittente)...ma va ovviametne in errore...



    e temo un errore che non sia risolvibile...
    il mio it...o meglio quello del gruppo...avrà blindato tutto...
    faccio altre prove.
    ciao
    ale

  10. #9
    L'avatar di alfrimpa
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Napoli
    Età
    63
    Messaggi
    2026
    Versione Office
    2007 - 2013
    Mi Piace ricevuti
    256
    Mi Piace dati
    39

    Re: Invio mail con vba attraverso un dominio esterno

    Ciao Alessandro

    Anch'io ho avuto quegli errori ma ora, almeno Libero, sembra funzionare.
    Alfredo

    "Non esistono cose facili o difficili; esistono cose che si sanno e cose che non si sanno"
    Cit. Berna11: "Se ti piace la risposta di qualcuno, oltre a ringraziarlo, puoi cliccare su "Mi Piace" in basso a sinistra del loro messaggio."

  11. #10
    L'avatar di Powerwin
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Milano
    Messaggi
    439
    Versione Office
    2010
    Mi Piace ricevuti
    68
    Mi Piace dati
    27

    Re: Invio mail con vba attraverso un dominio esterno

    Ciao Alessandro, (un saluto anche ad Alfredo e Anthony) gmail purtroppo da quando hai attivato la doppia/tripla convalida per la sicurezza è diventato (almeno dalle prove fatte da me) inaccessibile per l'invio delle mail tramite VBA
    Flavio
    Non scrivetemi in MP per risolvere i problemi ed un grazie è sempre ben accetto quando ricevete degli aiuti

  12. #11
    L'avatar di Alessandro
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Roma
    Età
    44
    Messaggi
    485
    Versione Office
    2010 64 bit
    Mi Piace ricevuti
    72
    Mi Piace dati
    37

    Re: Invio mail con vba attraverso un dominio esterno

    già...hai perfettamente ragione...

Discussioni Simili

  1. Risposte: 9
    Ultimo Messaggio: 20/11/16, 15:54
  2. Invio mail con vba
    Di alfrimpa nel forum Domande su Excel VBA e MACRO
    Risposte: 18
    Ultimo Messaggio: 20/10/16, 00:33
  3. Invio unico mail da DB
    Di tk71 nel forum Domande su Excel in generale
    Risposte: 0
    Ultimo Messaggio: 02/09/16, 11:04
  4. Macro invio Unica mail formato PDF di "n" fogli
    Di freepredator nel forum Domande su Excel VBA e MACRO
    Risposte: 6
    Ultimo Messaggio: 19/02/16, 20:00
  5. invio e mail
    Di cesare nel forum Domande su Excel VBA e MACRO
    Risposte: 5
    Ultimo Messaggio: 25/10/15, 07:38

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •