Bonjour j'essaie d'envoyer des mails sous vb6 via outlook 2003
voici mon code
Private Sub EnvoyerMail(Destinataire As String, Fichier As String)
Dim objOutlook As New outlook.Application
Dim objOutlookMsg As outlook.MailItem
' Set objOutlook = outlook.Application
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)
With objOutlookMsg
.To = Destinataire
.Attachments.Add Fichier
.Subject = "Veuillez signaler les anomalies éventuelles."
.Send
End With
Set objOutlookMsg = Nothing
End Sub
ce code marche très bien pour outlook 2000 mais pas avec le 2003
j'ai insérer la réference outlook 11.0
Si quelqu'un peut m'aider??? MERCI