Newsgroup: it.comp.appl.access
Titolo: PDF Via Mail

Ciao a tutti,
sto cercando un modo per poter allegare il file PDF ad una mail ed 
inviarlo secondo alcuni criteri che ho impostato in una macro.
Come sistema per la creazione del file PDF ho utilizzato l'esempio che 
ho trovato sul 
sitocomune.com
 e per ora il mio failettino è li bello 
bello nella mia dir. c:\temp\
Ora io vorrei inviarlo con il comando :
DoCmd.SendObject acSendTable, "Impiegati", acFormatXLS, _
     "Nancy Davolio; Andrew Fuller", "Joan Weber", , _
     "Foglio di lavoro corrente degli impiegati", , False
ma sembra... che ciò non si possa fare, almeno in questo modo.
Esiste un modo per allegare il file appena creato a mandarlo via mail 
con OUTLOOK (non express), non attraverso MAPI.
Grazie e ciao
Cesco

 wrote in message
news:5Kx_e.42284$
TR5....@news.edisontel.com

SendObject non credo possa aiutarti.
Perchè non vuoi usare MAPI...?
Se usi Outlook Automation puoi risolvere il tutto
ma lo ritengo un pò sprecato se è solo per inviare la Mail
con allegato.
Io uso Winsok di solito(questo mi rende indipendente
dal Browser di posta con tutti i pro e contro), ma occorre vedere se
per te è la soluzione corretta e se disponi della possibilità di
distribuire l'OCX in questione.
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Alessandro Baraldi wrote:

Il MAPI già lo uso per un'altra applicazione ma vedo che mi manda 
direttamente il messaggio bypassando Outlook e in quel caso mi va bene, 
invece in questo vorrei che mi creasse direttamente il messaggio con 
l'allegato e poi fare l'invia manmualmente, un po' lo stesso metodo del 
sendobject.
Non so se con il Winsok il mio problema può essere risolto... se mi dici 
  che si può fare allora vedo di approfondire la questione.
Ciao e grazie Cesco

 Ciao e grazie Cesco
Potresti crearti una Maschera che Emula Outlook e su Click
lui invia con MAPI.
Se vuoi proprio aprire Outlook l'unica cosa è usare Outlook Automation
quindi sfruttare il modello ad oggetti.
Winsok bypassa tutto anche le librerie MAPI.
Per capire come funziona l'Automazione inserisci Outlook
nei riferimenti e vedi l'Help sui metodi e le proprietà
ti fà anche degli esempi.
In ogni caso questo è quanto ti servirebbe:
   Dim Ol_App As New Outlook.Application
   Dim Ol_Item As Outlook.MailItem
   Set Ol_Item = Ol_App.CreateItem(olMailItem)
   Ol_App.Visible=True
   With Ol_Item
      .To = "
destin...@domaine.fr
"
      .subject = "Oggetto del Messaggio"
      .Body = "Corpo del Messaggio"
      .Attachments.Add "F:\Mes Documents\fichier.jpg"
      'Se attivi questo il messaggio viene salvato 
      'nella cartella messaggi inviati
      '.Save
      'Se attivi questo il messaggio viene inviato 
      'AUTOMATICAMENTE
      '.send
   End With
   'Set Ol_Item = Nothing
   'Set Ol_App = Nothing
End Sub
In realtà potrebbe servire la gestione dell'oggetto in modalità
Evento per determinare se l'utente invia o meno la Mail, quindi
comportarti di conseguenza.
Con la dichiarazione WithEvents dell'Oggetto non è possibile
usare il LateBinding, pertanto ti vincoli alle librerie di
sviluppo.



Tutto chiaro Alex... ora vedo cosa posso fare con i tuoi consigli.
Peccato però non esista un SendObject slegato dagli oggetti di Access.
La funzionalità del comando SendObject è molto pratica ma troppo blindata.
Ciao Cesco

 Ciao Cesco
 Ti sbagli! SendObject può essere slegato da qualsiasi oggetto.
Per esempio:
DoCmd.SendObject acSendNoObject, , acFormatTXT, TuoIndirizzoDestinatario, , 
, "Oggetto","TestoDelMessaggio" , False
Ciao, Carlo 

Carlo Costarella wrote:

Ciao Carlo,
quindi dici che se io ho un file per es. in c:\temp\pippo.pdf
posso applicare il comando SendObject?
Se è così come allego ste file? questo risolverebbe il mio problema.
Per ora sto ancora usando il MAPI ma se mi dici che si può fare rimetto 
il comando.
Ciao Cesco

 ha scritto nel messaggio 
news:erR_e.42543$TR5....@news.edisontel.com...

No, no la colpa è mia perchè ho letto solo questa frase "Tutto chiaro 
Alex... ora vedo cosa posso fare con i tuoi consigli.
Peccato però non esista un SendObject slegato dagli oggetti di Access.
La funzionalità del comando SendObject è molto pratica ma troppo blindata." 
nell'ultimo post...
Quindi la mia risposta era strettamente correlata alla impossibilità di 
inviare e-mail senza oggetti di Access e non a inviare e-mail con allegati.
Ci sono molti metodi per inviare allegati di posta con Access e se ne è 
parlato sia in questo NG che sul sitocomune...
Vorrei proporti una soluzione che non è tutta farina del mio sacco.
Se ti colleghi a questo link: 
http://www.iacosoft.com
potrai scaricare un comodo ocx free (giemail.ocx) scritto per visual basic 6 
ma che io ho adattato ad Access (per il momento ho solo fatto la prova con 
A97) e funziona egregiamente. Nel file trovi anche degli esempi. Se ti 
interessa ti mando un db Access già pronto ma devi scaricare e registrare 
l'ocx.
Ciao, Carlo

 ha scritto nel messaggio 
news:erR_e.42543$TR5....@news.edisontel.com...
cut
Dimenticavo di dirti che giEMail per poter funzionare richiede la presenza 
del Run-Time del
Visual Basic 6.0 e del controllo mswinsck.ocx.
Ciao, Carlo 


Ti ringrazio Carlo per la tua dritta, ora vedo cosa posso fare.
Ti confesso che non sono molto incline all'utilizzo di parti terze, ma 
vediamo cosa si può fare.
Immagino che il problema degli allegati sia stato ben discusso sia qui 
che sul sitocomune, ed infatti prima di postare solitamente per me 
queste sono le prime risorse che consulto.
Ciao Francesco


Cerca CDO
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it