[ActiveX] Envoyer un courriel avec Outlook

**kxfteam** · 24/11/2016, 18h14

Salut à tous,

je suis entrain de faire un logiciel avec QT j'ai besoin d'envoyer un mail à travers ce logiciel j'ai donc utilisé la solution proposé dans http://www.developpez.net/forums/d11...k/#post8804556, elle marche mais j'aimerais bien ajouter une pièce jointe dans le mail, j'ai donc pensé à ajouter dans un nouveau SetProperty ceci : mail->setProperty("Attachment", "‪C:\\Users\\Name\\Desktop\\4.PNG"); mais cela ne marche j'ai testé plusieurs autre chose mais sans résultat.
En espérant que quelqu'un trouvera solution. Encore merci pour la solution affiché ça m'a évité de faire un client SMTP.

**Gojir4** · 24/11/2016, 18h23

Hello kxfteam,

Je n'ai pas creuser plus loin l'utilisation de l'activeX donc je ne peux malheureusement pas vous aider. Par contre maintenant j'utilise cette librairie QT/SMTP pour l'envoi de mes e-mail:
https://github.com/bluetiger9/SmtpClient-for-Qt

Elle fonctionne bien et est très facile à utiliser (dans la philosophie de Qt). Peut être cela pourra vous aider.

**kxfteam** · 24/11/2016, 18h37

Hey merci de la réponse rapide ça fait plaisir. J'ai commencé à utiliser la librairie mais j'ai un problème que je n'arrive pas à résoudre avec l'openssl, j'ai passé trop de temps à installé openssl plussieurs fois et sans résultat mais c'est vrai que ça à l'air bien complet. Merci pour la réponse.

**kxfteam** · 25/11/2016, 16h05

J'ai du nouveau aujourd'hui j'ai cherché comment envoyer un mail en VBS j'ai trouvé cela http://blog.developpez.com/nicosmash...jointe-en-vbs;

Ce qui m'interesse donc est ça :

Code vbs :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
set objOutlk = createobject("Outlook.Application")
set objMail = objOutlk.createitem(olMailItem)
objMail.To = "toto@titi.fr"
objMail.cc = "titoititi.fr"
 
objMail.subject = "Titre du mail"
 
    strMsg = "Bonjour," &amp; VbCrLf
    strMsg = strMsg &amp; VbCrLf &amp; "En pièce jointe vous trouverez 1 fichier : " &amp; VbCrLf
    strMsg = strMsg &amp; "- Le fichier en piece jointe contient toto."
    strMsg = strMsg &amp; VbCrLf &amp; "Bien cordialement."
 
    objMail.attachments.add("C:\piece_jointe.txt")
    objMail.body = strMsg
    objMail.send

Du coup j'ai adapté ça en c++ pour QT mais toujours sans résultats.

Si vous avez des idées où même des solutions je suis preneur.

ENcore merci de votre aide.

**loupium** · 25/11/2016, 18h42

slt,
Perso sur Qt5, j'utilise https://github.com/xcoder123/SimpleSmtp_SSL_QT5

**kxfteam** · 25/11/2016, 19h41

Merci de la réponse je vais regarder ça et le faire fonctionner avec mon code.

**kxfteam** · 28/11/2016, 09h34

Envoyé par loupium

Perso sur Qt5, j'utilise https://github.com/xcoder123/SimpleSmtp_SSL_QT5

J'ai donc essayer et ça marche à moitié c'est à dire, quand je veux envoyer l'email j'ai des erreurs d'openssl alors que j'ai déjà installé openSSl plusieurs fois.

Voci les erreurs :
qt.network.ssl: QSslSocket: cannot call unresolved function SSLv23_client_method
qt.network.ssl: QSslSocket: cannot call unresolved function SSL_CTX_new
qt.network.ssl: QSslSocket: cannot call unresolved function SSL_library_init
qt.network.ssl: QSslSocket: cannot call unresolved function ERR_get_error

Merci de ta réponse. Bonne journée

**loupium** · 28/11/2016, 21h58

Attention, si ton kit Qt compile en 32bit alors OpenSSL doit être installé aussi en 32bit.
Perso, j'avais installé cette version : Win32 OpenSSL v1.0.2a : https://slproweb.com/download/Win32OpenSSL-1_0_2a.exe

Et voici le copier coller de ce que j'avais répondu sur un autre forum :

* Télécharge le dépôt SimpleSmtp_SSL_QT5 : https://github.com/xcoder123/SimpleSmtp_SSL_QT5
* Il y a 2 dossier. Rentre dans le premier nommé "smtp"
* Ouvre le fichier .pro avec QtCreator.
* QtCreator doit te demander de configurer le projet (car première ouverture)
* Sélectionne un de tes kit. Perso j'ai utilisé "Qt 5.4.2 MinGW 32bit"
* Compiler
* Lance l'application
* Remplis correctement les champs
* Send
* Une boite de dialogue doit t'indiquer si le message a été correctement envoyé.
* Et regarde la fenêtre "sortie de l'application" dans QtCreator si cela fonctionne pas.

**kxfteam** · 29/11/2016, 11h17

Tout d'abord merci de ton suivi mais j'ai toujours les mêmes erreurs avec l'openssl que j'ai réinstallé en 32bit car je compile en 32bit. Bref j'ai suivi tout ce que tu as mis mais ça ne fonctionne toujours pas. Je ne comprend pas pourquoi.
Encore merci de ton aide et si tu as d'autres solutions je suis preneur.
C'est pour ça que j'ai utilisé la lib Qutlook ActiveXde QT pour envoyer l'email car je me suis déjà penché sur le problème que j'avais par rapport à l'openssl.
Il me manque seulement l'envois de mail avec piece jointe pour la lib Qutlook.

**loupium** · 05/12/2016, 20h54

Je viens de tester avec Win32 OpenSSL v1.0.2d, Qt 5.7.0 MinGW 32bit depuis un compte google vers yahoo sans aucun problème sur l'exemple smtp.
Par contre j'ai du activé se paramètre : https://www.google.com/settings/security/lesssecureapps

Essai en ajoutant dans ton smtp.pro :

Code :

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

1
2
3
INCLUDEPATH += C:/OpenSSL_Win32/include
LIBS += -LC:/OpenSSL_Win32/lib -llibeay32
LIBS += -LC:/OpenSSL_Win32/lib -lssleay32

adapte C:/OpenSSL_Win32 si ce n'est pas ton dossier d'installation d'openssl.

**kxfteam** · 06/12/2016, 10h19

Bonjour merci beaucoup pour la réponse j'ai suivi tout ce que vous m'avez dit mais j'ai toujours le meme soucis. Par contre j'ai enfin trouver comment envoyer une piece jointe via outlook grace à Gojir4.

Mais un autre problème se pose avec outlook car si je ne lance pas l'éxecutable via QTCreator j'ai mon envois de mail qui ne marche plus.

Merci. Bonne journée

**Gojir4** · 06/12/2016, 11h09

Pour ceux que cela intéressent, voici comment envoyer un e-mail via Outlook avec une pièce jointe:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
 QAxWidget outlook;
    if(outlook.setControl( "Outlook.Application" )){
         qDebug() << "Success to get Outlook application";
        QAxObject *mail = outlook.querySubObject("CreateItem(olMailItem)");
        if(mail){
            mail->setProperty("To","email@address.com");
            mail->setProperty("Subject","test automation");
            mail->setProperty("Body", "Hello, this is the mail body.\n Goodbye");           
            QAxObject *attachments = mail->querySubObject("Attachments");
            if(attachments){
                attachments->dynamicCall("Add(\"C:/temp/TestDump.html\")");
            } else{
                qDebug() << "Failed to get \"Attachments\" object. Attachments have not been added";
            }
            mail->dynamicCall("Display()");
            mail->dynamicCall("Send()");            
            mail->deleteLater();
 
        } else{
            qDebug() << "Failed to create mail item";
        }
 
    } else{
        qDebug() << "failed to get oultook application";
    }

Envoyé par kxfteam

Bonjour merci beaucoup pour la réponse j'ai suivi tout ce que vous m'avez dit mais j'ai toujours le meme soucis. Par contre j'ai enfin trouver comment envoyer une piece jointe via outlook grace à Gojir4.

Mais un autre problème se pose avec outlook car si je ne lance pas l'éxecutable via QTCreator j'ai mon envois de mail qui ne marche plus.

Merci. Bonne journée

Oui c'est normal, il faut déployer les librairies Qt nécessaires pour que ton application fonctionne correctement. Le plus simple est d'utiliser "windeployqt.exe", un exécutable que tu retrouve dans le dossier d'installation de Qt qui va s'occuper d'ajouter les dépendances nécessaires.

Pour cela il faut lancer la console Qt. (Démarrer --> Qt --> 5.X (ou 4.x) --> mingwxx (ou mvscxx) , puis lancer la console (même icône que la console Windows).
Ensuite, se rendre dans le chemin de l'exécutable, puis taper dans la console: windeployqt monexecutable.exe

Désolé c'est un peu expliqué à la va vite... Mais cela devrais t'aider à t'en sortir.

**kxfteam** · 06/12/2016, 18h45

MERCI !!! Un grand merci pour toutes les aides que vous m'avez apporté c'est vraiment cool, il y a une bonne communauté, je met le sujet comme résolu. Encore merci

[ActiveX] Envoyer un courriel avec Outlook

Discussions similaires

Partager

Partager