Ciao a tutti,
aperto un documento word e compilato con alcune frasi ...in questo modo:
avrei bisogno di inviarlo come corpo di un messaggio e-mail...usando la funzione di MSWord "invia a destinatario posta elettronica".codice:Dim WordApp As Word.Application Set WordApp = New Word.Application WordApp.Documents.Open App.Path & "\documento_di_prova.doc" WordApp.Visible = True With WordApp.Selection .TypeText "PROVA PROVA: " .Font.Bold = True .TypeText "PROVA2 PROVA2" .Font.Bold = False .TypeParagraph End With End Sub
registrando una macro sul documento sono solo riuscito a trovare il codice per aprire la schermata di invio:
.. ma non riesco ad inserire in automatico da VB6 l'indirizzo mail del destinatario, l'oggetto dell'e-mail e le opzioni di invio come ad esempio le notifiche di lettura.codice:WordApp.ActiveWindow.EnvelopeVisible = True
Qualcuno a qualche consiglio in proposito?
Grazie a tutti

Rispondi quotando