+ Rispondi al Thread
Visualizzazione dei risultati da 1 a 5 su 5

Discussione: Invio Email a più destinatari

  1. #1
    roccolamann non è in linea Scolaretto
    Post
    483

    Invio Email a più destinatari

    Con questa routine invia un'email ad un destinatario e ad altri due per conoscenza.
    codice:
    Sub InvioEmailPerConoscenza()
    Dim appOL As New Outlook.Application
    Dim creaEmail As Outlook.MailItem
    Set creaEmail = appOL.CreateItem(olMailItem)
    With creaEmail
    .To = "indirizzo@email.it"
    .Subject = "Invio ....."
    .CC="PincoPallo"          'destinatario per conoscenza
    .CC="PincoPallino"       'destinatario per conoscenza
    "Cordiali saluti."
    .Send
    End With
    'faccio pulizia
    Set appOL = nothing
    Set creaEmail = nothing
    End Sub
    Il problema è che se metto più destinatari per conoscenza il messaggio viene inviato per conoscenza solo all'ultimo destinatario. Come devo correggere la routine in modo che venga inviato per conoscenza a tutti?

  2. #2
    Ferrari_and non è in linea Scolaretto
    Post
    108
    In outlook la listi di indirizzi sullo stesso campo To o CC è unica separata da ;
    es. Pincopallino; Paperino; Pluto

    Prova in questo modo e vedi se lo prende.

  3. #3
    roccolamann non è in linea Scolaretto
    Post
    483
    Così?
    codice:
    Sub InvioEmailPerConoscenza()
    Dim appOL As New Outlook.Application
    Dim creaEmail As Outlook.MailItem
    Set creaEmail = appOL.CreateItem(olMailItem)
    With creaEmail
    .To = "lucio.loiero@mise.gov.it"
    .Subject = "Invio ....."
    .CC = "PincoPallo"; "PincoPallino";     'destinatario per conoscenza
    .Send
    End With
    'faccio pulizia
    Set appOL = Nothing
    Set creaEmail = Nothing
    End Sub
    Ho già provato così e non funziona.

  4. #4
    Sgrubak non è in linea Scolaretto
    Luogo
    Torrazza Piemonte
    Post
    290
    Quote Originariamente inviato da roccolamann Visualizza il messaggio
    ...Ho già provato così e non funziona.
    Perché i punto e virgola devono essere all'interno della stringa.
    codice:
    .CC = "PincoPallo; PincoPallino"     'destinatario per conoscenza
    Quel che hai scritto tu non ha senso sintatticamente in VB quindi non avrebbe nemmeno compilato, restituendoti un errore già in fase di scrittura del codice.

  5. #5
    roccolamann non è in linea Scolaretto
    Post
    483
    Grazie per il tuo suggerimento.
    Così ho risolto il problema.

+ Rispondi al Thread

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi