Le forum (ô combien francophone) des utilisateurs de Powerbuilder.
J'ai tester ce bout de code avec PB10 et outlook 2007, trouvé grace à vos différents liens, sur ole outlook et je n'ai rencontré aucun problème, à part l'éternel message : "une application tente d'envoyer un mail ... blablabla (oui(non(annuler))). Mais ça mon admin a dit je m'en charge après lui avoir dit qu'il existe une appli qui permet de gérer les autorisations des appli qui envoi des mails.
Bon euh le code
OLEObject ole_outlook integer li_return ole_outlook = Create OLEObject //Connect to Outlook session using 'Outlook.Application' li_return = ole_outlook.ConnectToNewObject("outlook.application") //Check for the return code If li_return <> 0 Then Messagebox("Error", string(li_return)) Destroy ole_outlook Return Else MessageBox("Success", "Connected") End If OLEObject ole_item, ole_attach //Creates a new mail Item ole_item = ole_outlook.CreateItem(0) //Set the subject line of message ole_item.Subject = "Mon sujet" //Body of mail message ole_item.Body = "Mon corps de message" //Recipient(s) Use a semicolon to separate multiple recipients ole_item.To = "monadresse@monboulot.fr" ole_item.Cc = "monadresseencopie@monboulot.fr" ole_item.Bcc = "monadressecachee@monboulot.fr" //Attachments ole_attach = ole_item.Attachments ole_attach.add("C:\mon_chemin_avec_des_blancs_ça_marche_aussi\ma_piece_jointe.monformat") // à répéter autant de fois que vous avez de pièces jointes ole_item.Display //displays the message ole_item.Send //sends the message, retourne un boolean destroy ole_outlook
Sinon avant j'utilisais mailsession, mailrecipient, mailmessage, mailFileDescription qui fonctionnais très bien mais avant outlook 2007
Pour laisser le temps à l'utilisateur de modifier le corps du message je passe par un écran que j'ai réalisé ressemblant comme 2 gouttes d'eau à un mail outlook
Contribution de sailor_lvcv
Hors ligne
Et 000 pépites pour Sailor LVCV et son astuce
PS: J'ai modifié la balise de ton script afin de le rendre plus lisible =>
Hors ligne
ah ok code=pb ^_^
Hors ligne
Y'a pas de mal. Pour rappel, ça marche avec d'autres langages
Hors ligne
Bonjour,
J'ai essayé le code et il fonctionne correctement sauf pour un point.
Le message se retrouve dans le folder SEND mais le message n'est pas envoyé.
lb_stat = ole_mailitem.Send //renvoi bien true.
S'agit il d'un problème de paramétrage ( si c 'est la cas je veux bien savoir quoi)
ou bien faut il s'y prendre autrement ?
Merci d'avance
Hors ligne