Newsgroup: it.comp.appl.access
Titolo: Come fare per inviare e-mail con firma in formato grafico?

Vorrei inviare, da codice vba, un'email contenente alla fine del testo 
messaggio un logo ditta in formato grafico
Attualente uso questo codice per inviare:
----------------------------------------
       Set objMail = objOutlook.CreateItem(olMailItem)
       Set myAttachments = objMail.Attachments
 
       With objMail
           .To = DESTINATARIO
           .Subject = OGGETTO
           .Body = MESSAGGIO
           myAttachments.Add ALLEGATO
           .Send
       End With
 
       Set objMail = Nothing
       Set objOutlook = Nothing
----------------------------------------
Come fare per inserire dopo il testo del messaggio un'immagine?
Ciao e grazie
RobertoA
 
 
 
 
 


fai una firma in html e salvala in c:
e poi
 
 
      SigString = "c:\firma.htm"
 
     If Dir(SigString) <> "" Then
         Signature = GetBoiler(SigString)
     Else
         Signature = ""
     End If
     ....
 
    .HTMLBody = messaggio &  Signature
    .send
 
ciao
BFS

 ha scritto nel messaggio 
news:m59rfa$9qn$1...@speranza.aioe.org...

Molte grazie per la risposta
E 'sto GetBoiler cosa sarebbe? 
 
 


pardon
 
Function GetBoiler(ByVal sFile As String) As String
'Dick Kusleika
     Dim fso As Object
     Dim ts As Object
     Set fso = CreateObject("Scripting.FileSystemObject")
     Set ts = fso.GetFile(sFile).OpenAsTextStream(1, -2)
     GetBoiler = ts.readall
     ts.Close
End Function
 
 


Ringrazio molto, col tuo aiuto ora mi funziona quasi tutto
Riesco ad inviare email con file html nel corpo
Per creare l'html uso Word 2003, inserisco alcune righe, poi un'immaginetta 
in jpg (ho provato anche con bmp) e salvo come 'pagina web'
Dicevo che funziona 'quasi' tutto nel senso che l'immaginetta non c'e' verso 
di farla apparire
Nel corpo del messaggio, sia di Outlook che spedisce sia del programma che 
riceve (su altro pc), al posto dell'immaginetta si vede un riquadro vuoto
Vengono mantenute correttamente tutte le formattazioni, font, colore 
caratteri, riquadrature caratteri, come impostate su Word
L'immaginetta non vuol saperne di mostrarmela
Ho provato a salvare anche in formato .mht  (formato pagina web in file 
unico), stesso risultato
Sai da cosa possa dipendere?
 
 
 
 


 
prova ad aprire la pagina html con il notepad e controlla il percorso 
dell'immagine se è corretto.
word come editor html è una bestemmia :-)
 
ciao
BFS
 
 

 ha scritto nel messaggio 
news:m5h3jr$dt3$2...@speranza.aioe.org...

Allora, se col Word salvo 'come pagina web' allora il percorso e' si 
corretto, ma relativamente alla posizione corrente del file .html
Ad esempio se ho il file C:\documenti\pippo.html  il filetto grafico viene 
salvato da Word su c:\documento\pippo\pippo_file\immagine1234.jpg
Corretto e' corretto, ma non c'e' quando arrivera' al destinatario, 
ovviamente
Se invece salvo con Word 'come pagina web' ma usando il tipo file 'pagina 
web in unico file'  allora si vede l'immagine grafica caricata come sequenza 
di scarabocchi ala fine del file pippo.html e quindi c'e' dentro, ma al 
destinatario non si vede niente, un rettangolino di contorno e basta
 
 


salva il tuo logo in c:\firma\logo.png
 
e controlla che nel html (aprilo col notebpad) il riferimento 
all'imamgine sia
 
<img
             src="file:///C:/firma/logo.png" width="121" align="left"
             border="0" height="49">
 
 
 
ovviamente width e height lascia quello che trovi
 
 
ciao
 
 


Non c'e'  <src=file:///c:/firma/logo.png.....
Ma c'e'  <src=PIPPO_file/LOGO123.PNG...
Il punto e', ma come fa il file html col RIFERIMENTO al file immagine a 
visualizzare l'immagine su un altro pc?
 
 
 
 
 
 


fai come ti ho detto e vedrai che l'immagine viene correttamente 
inglobata sulla mail
 
salva il tuo logo in c:\firma\ e usa la sinstassi che ti ho scritto
 
ciao!
 
 

  .send
 
Cos' e' quel "Signature" ? E quel getboiler ? 
 
Perdonami ma mi hai incuriosito a morte : mai vista una
roba del genere :-) 
 
 


significa che se vuoi che nelle mail generate da vba con outlook appaia 
in automatico anche la classica firma con logo aziendale, frase privacy, 
frizzi e lazzi, devi usare un file html...salvarlo dove vuoi e caricarlo 
nel corpo mail dopo il testo.
 
getboiler è questa funzione
 
Function GetBoiler(ByVal sFile As String) As String
'Dick Kusleika
     Dim fso As Object
     Dim ts As Object
     Set fso = CreateObject("Scripting.FileSystemObject")
     Set ts = fso.GetFile(sFile).OpenAsTextStream(1, -2)
     GetBoiler = ts.readall
     ts.Close
End Function
 
che in pratica legge il file html
 
ciao
BFS
 

 che in pratica legge il file html
 
Ok, questa l' ho mandata giu :-) 


la firma è un file html...che al suo interno richiama una immagine nel 
pc per il logo.
 
l'immagine non viene convertita...ci pensa l'outlok quando mandi la mail 
a fare il lavoro di inglobare tutto quello che serve per farla vedere al 
destinatario.
 
tutti quelli che ti mandano mail ed hanno un logo nella firma non hanno 
bisogno che tale logo sia sul tuo pc
 
ciao
BFS
 
 
 
 
 

 hanno bisogno che tale logo sia sul tuo pc
 
Ok, allora mi rimane da capire solo una cosa : come diavolo di fa 
a fare e salvare un html che al suo interno richiama una immagine ? 
 
Cioe' ... come e' fatto 'sto file html ? Che "c'e scritto dentro" ? 
 
 


 
come è fatto te lo costruisci tu a piacere qui parliamo di banale codice 
html
vedi tu se scriverlo in codice html o usare i 7000000 di programmi che 
generano codice html
 
http://www.w3schools.com/html/default.asp
 
 
 
ciao
BFS
 
 
 


Ah ok ok ... capito. Grazie ! 
 
Magari mi guardo come e' scritto (giusto per ... sai) e poi mi 
scegliero' uno tra i 
settecentomilioniquattrocentoventiduemiladuecentosettantasette  
programmi che lo generano :-)