[VB.NET] Outlook via VB.NET invisible
Bonjour,
J'essaye de piloter outlook par VB.NET. A priori, cela marche, j'arrive à envoyer un mail avec une piece jointe.
Mais je n'rrive pas à rendre visible Outlook pour que l'utilisateur puisse éventuellement completer le mail.
Quelqu'un a t'il une idée ?
Voici mon code :
Code:
1 2 3 4 5 6 7 8 9 10 11 12
| Dim outapp As Outlook.ApplicationClass
Dim outmail As Outlook.MailItemClass
outapp = New Outlook.Application
outmail = outapp.CreateItem(Outlook.OlItemType.olMailItem)
outmail.Attachments.Add(Application.StartupPath() & "\Offres.xls")
outmail.Subject = "Envoi de l'offre"
outmail.To = "toto@toto.fr"
outmail = Nothing
outapp = Nothing
GC.Collect() |