cs_dhabasse
Messages postés16Date d'inscriptionlundi 6 février 2006StatutMembreDernière intervention18 décembre 2011
-
29 avril 2008 à 01:11
cs_dhabasse
Messages postés16Date d'inscriptionlundi 6 février 2006StatutMembreDernière intervention18 décembre 2011
-
2 mai 2008 à 22:43
Slut tout le monde.
Je travail sur un petit programme de gestion et je voudais informé un client par mail sur certins irregularités de ses factures le facture est en pdf
Outlook.Application outlookApp = new Outlook.ApplicationClass();
Outlook._MailItem mail = (Outlook._MailItem)outlookApp.CreateItem(Outlook.OlItemType.olMailItem);
et ici je ne voi pas ce que je dois faire avec les autres paramertes du fonction
mail.Attachements() si ce n'est l'ObjetSource et l'ObjetDisplayName
mais l'ObjetType et son suivant je ne vois pas ce qu'il me faut
cs_dhabasse
Messages postés16Date d'inscriptionlundi 6 février 2006StatutMembreDernière intervention18 décembre 2011 2 mai 2008 à 22:43
Je vien de decouvrir cette code qui es en vb mais je l'est pas encor essayé
Sub Main()
' Create an Outlook application.
Dim oApp As Outlook._Application
oApp = New Outlook.Application()
' Create a new MailItem.
Dim oMsg As Outlook._MailItem
oMsg = oApp.CreateItem(Outlook.OlItemType.olMailItem)
oMsg.Subject = "Send Attachment Using OOM in Visual Basic .NET"
oMsg.Body = "Hello World" & vbCr & vbCr
' TODO: Replace with a valid e-mail address.
oMsg.To = "user@example.com"
' Add an attachment
' TODO: Replace with a valid attachment path.
Dim sSource As String = "C:\Temp\Hello.txt"
' TODO: Replace with attachment name
Dim sDisplayName As String = "Hello.txt"
Dim sBodyLen As String = oMsg.Body.Length
Dim oAttachs As Outlook.Attachments = oMsg.Attachments
Dim oAttach As Outlook.Attachment
oAttach = oAttachs.Add(sSource, , sBodyLen + 1, sDisplayName)
' Send
oMsg.Send()
' Clean up
oApp = Nothing
oMsg = Nothing
oAttach = Nothing
oAttachs = Nothing
End Sub