Envoi mail

Salut !
Je voudrai savoir si il est possible d'envoyer des emails en panoramic ?
Merci !

Oui, voir par exemple les 2 réponses ci dessous :
https://panoramic.1fr1.net/t1583-envoyer-en-email-depuis-un-programme-panoramic?highlight=email
https://panoramic.1fr1.net/t176-envoyer-un-email-automatique?highlight=envoyer+un+email+automatique

Merci pour la réponse, je vais regarder cela !

J'ai essayé cette soluce, pas d'erreur mais je ne reçoit pas de mail.. :-(

==> https://panoramic.1fr1.net/t1583-envoyer-en-email-depuis-un-programme-panoramic?highlight=email

Tu as une fonction d' envoi de mail par l' API dans la dll de Klaus (KGF.dll)
qui fonctionne parfaitement.

Il me semblait bien que c'était une des fonctions de la DLL de Klaus, mais en cherchant rapidos, je n'avait pas retrouvé le post où il en parlait. Par contre c'est très simple à retrouver en allant dans la partie du forum réservée  à ce sujet:
https://panoramic.1fr1.net/t3042-234-du-17-mai-2013-ajout-de-fonctions-pour-envoyer-un-mail

J'ai regardé le truc oui
Il n'y a pas un truc plus.. light ?

Le programme de démo est certes complexe puisqu'il y a des contrôles et de la saisie libre mais si tu as les informations en dur et que tu simplifie la démo en supprimant toute la partie saisie / contrôle de la saisie, les fonctions sont assez simples à utiliser.

Voir doc kgf.doc (celle du 30/06) page 223

Le message devra être construit par des appels successifs aux fonctions suivantes:
1. CreateMail pour préparer un nouveau message
2. SetMailSender pour mettre en place le compte, l'adresse et le mot de passe de l'émetteur
3. SetMailObject pour mettre en place l'objet du message
4. AddMailRecipient appelée pour chaque adresse de destinataire
5. AddMailCopy appelée pour chaque adresse en copie
6. AddMailBlindCopy appelée pour chaque adresse en copie aveugle
7. AddMailBodyLine appelée pour chaque ligne du message texte
8. AddMailJoinedFile appelée pour chaque fichier en pièce jointe
9. SendMail pour effectuer l'envoi du message
10. DeleteMail pour effacer le message de la mémoire

PS: Klaus, erreur dans l'exemple en anglais page 227, tu initialise obj$ à la place de subj$
et page 228, obj$ à la place de adr$ dans les 2 exemples (puis dans les pas mal d'exemples après d'ailleurs)
page 232, tu affiche la fonction Createmail alors que ça devrait être Sendmail


Sinon la structure donne quelque chose comme ça, mais Klaus corrigera s'il faut ajouter des attentes entre certaines étapes ou si j'oublie des choses (j'ai mis l'envoi de mail de base, en sachant que l'on peut faires des copie, copie cachée et autre envois avec pièces jointes):

Code:

dim res%, nom$, adr$, pwd$, obj$,adr$, txt$
dll_on "KGF.DLL"
nom$ = "jaques.martin"
adr$ = "jacques.martin@yahoo.fr"
pwd$ = "mot_de_passe"
obj$ = "message de test"
adr$ = "xxxx.yyyy@yahoo.fr"
txt$ = "Ceci est une nouvelle ligne"
res% = dll_call0("CreateMail")
res% = dll_call3("SetMailSender",adr(nom$),adr(adr$),adr(pwd$))
res% = dll_call1("SetMailObject",adr(obj$))
res% = dll_call1("AddMailRecipient",adr(adr$))
res% = dll_call1("AddMailBodyLine",adr(txt$))
res% = dll_call0("SendMail")
res% = dll_call0("DeleteMail")
dll_off

Merci !
Mais j'ai une erreur à cette ligne => res% = dll_call0("CreateMail")

(29) Nor correct arithmetic expression : Error in function line 28

Merci.

As tu bien une version récente de KGF.DLL (datant d'après le 20/05/2013)
(Version 2.34 minimum)

Tu peux verifier la version en ajoutant ces lignes

Code:

  Dim KGFdllVersion$ :  KGFdllVersion$ = string$(25," ")
  KGFdllVersion% = dll_call1("KGFdllVersion",adr(KGFdllVersion$))
  message "KGF version : " + KGFdllVersion$

Si la version est inférieure à la 2.34, la récupérer sur le Webdav de Klaus

j'ai mis à jours la dll. Je l'avais prise sur son site et non le webdav..
Donc plus d'erreur pas pas de mail dans ma boite.. :-(

Tu dois avoir un problème dans tes paramètres de messagerie (enfin, c'est l'idée qui me vient)

Regardes: http://www.commentcamarche.net/faq/893-parametres-de-serveurs-pop-imap-et-smtp-des-principaux-fai

sinon il y a aussi

http://help.yahoo.com/kb/index?locale=fr_FR&y=PROD_MAIL_ML&page=content&id=SLN3213
http://www.fosamobi.com/t193-hotmail-config-de-votre-compte-hotmail-live-sur-le-wave
https://support.mozillamessaging.com/fr/kb/thunderbird-et-hotmail

Ajoute un wait 20000 avant le delete pour tester aussi, mais Klaus pourra mieux t'aider quand il sera de passage.

Ah ce niveau je suis quasiment sûre de mes paremetres.
Mais je vais checker quand même

Personnellement j'ai toujours eu ce problème, je ne peux pas m'envoyer des mails à moi-même, c'est bloqué quelque part, sans doute une interdiction à faire sauter... je me suis ouvert une autre boîte pour les essais (à laposte.net, gratos), et là ça marche.
Il est vrai que s'envoyer des mails à soi-même ça n'a pas un grand intérêt (sauf si on veut se faire des déclarations d'amour), mais c'est quand même pratique pour les essais, sinon il faut trouver une victime, pas loin de préférence.

  Sinon remarque judicieuse une fois de plus JL35. Voilà peut être une remarque qui va éviter bien des recherches inutiles

J'ai toujours pensé (mais sans preuve... et sans trop approfondir non plus) que mon logiciel de messagerie considérait comme une erreur que les adresses expéditeur et destinataire soient identiques, ce qui somme toute est logique. Mais ce n'est pas signalé au moment de l'envoi en tout cas.

Je viens de refaire un essai destinataire = expéditeur depuis ma messagerie Windows Mail (donc indépendamment des solutions proposées ici), et effectivement le message est quelque part dans la nature, et pas d'erreur signalée.

J'utilise Outlook Express sous XP, et je peux m'envoyer des mails sans problème, avec mes fonctions DLL. Mais effectivement, il faut faire attention aux paramètres. Regarde la doc dans le fichier KGF.chm.

@Klaus,
Un peu en retard(*) j'ai fait un essai en utilisant tes dlls adéquates, mais rien à faire, le message ne me revient toujours pas (alors que ça marche très bien sur une autre adresse que la mienne).
C'est pas grave, je cesserai de m'écrire à moi-même.

* je suis allé passer 3 jours en Normandie (entre Fécamp et Le Tréport), soleil magnifique, mais vent du nord très fort et glacial sur les plages (de galets)... il n'est resté que la gastronomie. Moins bonne pour la ligne que la natation, mais à l'impossible nul n'est tenu !