Discussion :

[geget]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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()

[Harakor]

Salut,

As-tu essayer :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

outapp.Visible = true

[geget]

Oui, mais cette propriete n'est pas disponible.

[royrremi]

Pouquoi tu n'envoye simplement pas un email sans avoir a piloter outlook ?

[bidou]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

outmail.Display()

[geget]

Tout simplement ...

Merci