Where did you install Firefox from? Help Mozilla uncover 3rd party websites that offer problematic Firefox installation by taking part in our campaign. There will be swag, and you'll be featured in our blog if you manage to report at least 10 valid reports!

Cerca nel supporto

Attenzione alle mail truffa. Mozilla non chiederà mai di chiamare o mandare messaggi a un numero di telefono o di inviare dati personali. Segnalare qualsiasi attività sospetta utilizzando l'opzione “Segnala abuso”.

Learn More

personalizzazione mail create in Access

  • 2 risposte
  • 0 hanno questo problema
  • 2 visualizzazioni
  • Ultima risposta di fabio.capuzzo

more options

Buonasera a tutti e grazie in anticipo a chi vorrà darmi una mano. Utilizzo Microsoft Access e trovo utile inviare delle email direttamente dai report che contengono le info che voglio spedire (Ordini o reportistica di altro genere)

SITUAZIONE ATTUALE Attualmente utilizzo un pulsante "Invia Mail" che, tramite codice VBA, apre Thunderbird e compone i campi A;Oggetto;Corpo, allego poi manualmente un PDF e Invio.

COSA VORREI Vorrei comporre i campi "A" e "Oggetto" con dati personalizzati da codice VBA in Access. Sarebbe poi bello creare un PDF con lo stesso codice e allegarlo in automatico alla mail (in Thunderbird) Possibilmente personalizzare anche qualcosa nel corpo ma è meno importante.

Ecco il codice:

Private Sub CmdInviaOrdine_Click()

Dim percorsoTB As String Dim thund As String


If Len(Nz(Dir("C:\Program Files (x86)\Mozilla Thunderbird\thunderbird.exe"), 0)) > 0 Then percorsoTB = "C:\Program Files (x86)\Mozilla Thunderbird\thunderbird.exe "

Else percorsoTB = "C:\Program Files\Mozilla Thunderbird\thunderbird.exe "

End If


thund = percorsoTB & _ "-compose " & """" & _ "to='ciccio@bomba.com'," & _ "cc=," & _ "bcc=," & _ "subject='Ordine Cliente'," & _ "attachment=," & _ "body='Ciao, trasmetto ordine e rimango in attesa di relativa conferma. Grazie.'" & """"

Call Shell(thund, vbNormalFocus)


End Sub

Grazie ancora.

Fabio

Buonasera a tutti e grazie in anticipo a chi vorrà darmi una mano. Utilizzo Microsoft Access e trovo utile inviare delle email direttamente dai report che contengono le info che voglio spedire (Ordini o reportistica di altro genere) SITUAZIONE ATTUALE Attualmente utilizzo un pulsante "Invia Mail" che, tramite codice VBA, apre Thunderbird e compone i campi A;Oggetto;Corpo, allego poi manualmente un PDF e Invio. COSA VORREI Vorrei comporre i campi "A" e "Oggetto" con dati personalizzati da codice VBA in Access. Sarebbe poi bello creare un PDF con lo stesso codice e allegarlo in automatico alla mail (in Thunderbird) Possibilmente personalizzare anche qualcosa nel corpo ma è meno importante. Ecco il codice: Private Sub CmdInviaOrdine_Click() Dim percorsoTB As String Dim thund As String If Len(Nz(Dir("C:\Program Files (x86)\Mozilla Thunderbird\thunderbird.exe"), 0)) > 0 Then percorsoTB = "C:\Program Files (x86)\Mozilla Thunderbird\thunderbird.exe " Else percorsoTB = "C:\Program Files\Mozilla Thunderbird\thunderbird.exe " End If thund = percorsoTB & _ "-compose " & """" & _ "to='ciccio@bomba.com'," & _ "cc=''," & _ "bcc=''," & _ "subject='Ordine Cliente'," & _ "attachment=''," & _ "body='Ciao, trasmetto ordine e rimango in attesa di relativa conferma. Grazie.'" & """" Call Shell(thund, vbNormalFocus) End Sub Grazie ancora. Fabio

Tutte le risposte (2)

more options

Ciao, non uso Access ne VisualBasic per cui non provo neppure a darti suggerimenti. Forse potresti avere maggior fortuna su https://forum.mozillaitalia.org/ dove è presente un maggior numero di utenti.

È stato utile?

more options

Grazie comunque.

È stato utile?

Richiedi supporto

Bisogna accedere al proprio account per rispondere nelle discussioni. Se non si possiede ancora un account, inserire una nuova richiesta.