OVH Cloud OVH Cloud

wd8 mail + pieces jointe en windev

8 réponses
Avatar
dgd
Bonjour
Apres pls jours de recherche j'ai trouve (le terme est certainement faux) un
projet ecrit en visual basic qui permet d'ouvrir une fenetre est d'adresser
par Outlook express ou outlook un mail plus 1 ou pls pieces jointes a un ou
pls destinataires.

Apres avoir transferer ce "projet" dans Windev 8 j'ai beaucoup
d'erreur.(Normal)

Je recherche un développeur ayant des connaissance dans les deux langages
pour convertir de visual en Windev et ceci afin de mettre a disposition sur
le news ce futur projet.

Il permettra de piloter OE Express a travers windev tous les parametres
peuvent être transmis:
Expediteur,Destinataire,Copie,Sujet,Corps du message,Pieces jointes

Voila
je connais lanceappliassociée ainsi que MAPIenddoucuments la ca serait
MAPISendMail

Salutations
Dominique Giraud
Responsable Informatique
SD.E.E.G
144 Avenue du Médoc
33320 Eysines
Tél : 05.56.16.10.70
Fax : 05.5616.10.71

**************************************************************************
Ce message électronique et tous les fichiers attachés qu'il
contient sont confidentiels et destinés exclusivement à
l'usage de la personne à laquelle ils sont adressés.
Si vous avez reçu ce message par erreur, merci de le
retourner à son émetteur. La publication, l'usage, la distribution,
l'impression ou la copie non autorisée de ce message et des
attachements qu'il contient sont strictement interdits.

**************************************************************************

8 réponses

Avatar
ted
"dgd" écrivait
news:cfamja$4a9$:

Bonjour
Apres pls jours de recherche j'ai trouve (le terme est certainement
faux) un projet ecrit en visual basic qui permet d'ouvrir une fenetre
est d'adresser par Outlook express ou outlook un mail plus 1 ou pls
pieces jointes a un ou pls destinataires.

Apres avoir transferer ce "projet" dans Windev 8 j'ai beaucoup
d'erreur.(Normal)

Je recherche un développeur ayant des connaissance dans les deux
langages pour convertir de visual en Windev et ceci afin de mettre a
disposition sur le news ce futur projet.

Il permettra de piloter OE Express a travers windev tous les
parametres peuvent être transmis:
Expediteur,Destinataire,Copie,Sujet,Corps du message,Pieces jointes

Voila
je connais lanceappliassociée ainsi que MAPIenddoucuments la ca serait
MAPISendMail

Salutations
Dominique Giraud
Responsable Informatique
SD.E.E.G
144 Avenue du Médoc
33320 Eysines
Tél : 05.56.16.10.70
Fax : 05.5616.10.71

***********************************************************************
*** Ce message électronique et tous les fichiers attachés qu'il
contient sont confidentiels et destinés exclusivement à
l'usage de la personne à laquelle ils sont adressés.
Si vous avez reçu ce message par erreur, merci de le
retourner à son émetteur. La publication, l'usage, la distribution,
l'impression ou la copie non autorisée de ce message et des
attachements qu'il contient sont strictement interdits.

***********************************************************************
***







Salut,

Pour envoyer des emails par Outlook/Outlook Express tu peux utiliser les
fonctions email de windev avec la syntaxe exchange ! Cela fonctionne
attachement compris !

--
En esperant t'avoir aidé.
ted
Avatar
ted
ted écrivait news:XnF9541E9751C874tedofreefr@
212.27.42.67:

"dgd" écrivait
news:cfamja$4a9$:

Bonjour
Apres pls jours de recherche j'ai trouve (le terme est certainement
faux) un projet ecrit en visual basic qui permet d'ouvrir une fenetre
est d'adresser par Outlook express ou outlook un mail plus 1 ou pls
pieces jointes a un ou pls destinataires.

Apres avoir transferer ce "projet" dans Windev 8 j'ai beaucoup
d'erreur.(Normal)

Je recherche un développeur ayant des connaissance dans les deux
langages pour convertir de visual en Windev et ceci afin de mettre a
disposition sur le news ce futur projet.

Il permettra de piloter OE Express a travers windev tous les
parametres peuvent être transmis:
Expediteur,Destinataire,Copie,Sujet,Corps du message,Pieces jointes

Voila
je connais lanceappliassociée ainsi que MAPIenddoucuments la ca serait
MAPISendMail

Salutations
Dominique Giraud
Responsable Informatique
SD.E.E.G
144 Avenue du Médoc
33320 Eysines
Tél : 05.56.16.10.70
Fax : 05.5616.10.71






***********************************************************************
*** Ce message électronique et tous les fichiers attachés qu'il
contient sont confidentiels et destinés exclusivement à
l'usage de la personne à laquelle ils sont adressés.
Si vous avez reçu ce message par erreur, merci de le
retourner à son émetteur. La publication, l'usage, la distribution,
l'impression ou la copie non autorisée de ce message et des
attachements qu'il contient sont strictement interdits.






***********************************************************************
***







Salut,

Pour envoyer des emails par Outlook/Outlook Express tu peux utiliser


les
fonctions email de windev avec la syntaxe exchange ! Cela fonctionne
attachement compris !




Salut,

en réponse à ton email (je reponds sur le groupe pour que tout le monde
en profite) :

Bonjour
Oui on peut le faire mais l'idée derriere et que mes utilisateurs
souhaitent avoir dans leur messagerie(O.E ou Outlook) une trace d'envoi
et la je ne crois pas que la gestion de windev puisse ecrire dans la
messagerie par défaut.
si tous mes utilisateurs( ou clients) etaient en outlook alors je
pourais utiliser les exemples ole.



En utilisant la syntaxe "Exchange" des fonctions email de windev on
retouve bien les emails dans la messagerioe par la suite ! Il est même
possible de mettre un email dans la messagerie, prêt à l'enoi, sans
l'envoyer. Il est éalement possible de lire tout les email déjà
récupéré...
Cela semble correspondre à ce que tu veux.


--
En esperant t'avoir aidé.
ted
Avatar
Marcel.berman
Salut !


On 12-Aug-2004, ted wrote:

En utilisant la syntaxe "Exchange" des fonctions email de windev on
retouve bien les emails dans la messagerioe par la suite ! Il est même
possible de mettre un email dans la messagerie, prêt à l'enoi, sans
l'envoyer. Il est éalement possible de lire tout les email déjà
récupéré...
Cela semble correspondre à ce que tu veux.



Je m'insère dans la conversation car je viens de regarder de plus près les
fonctions email ...
Jusqu'à présent, j'ai toujours utilisé la syntaxe SMTP, ou, si je voulais
passer par Outlokk ( pas OE) l'OLE Automation.

Je n'ai jamais utilisé les syntaxes Exchange, car mais clients ne
disposaient pas d'Exchange Serveur.

Si je comprends bien ce que tu dis, même sans serveur Exchange, on peut
utiliser cette syntaxe.
Mais alors comment définir, ou trouver, le profil à utiliser dans
emailouvresession() ?

Merci d'avance pour ta réponse !



--
Marcel Berman
c/o Managing Business SPRL
Allée du Petit Paris, 11
B - 1410 - Waterloo
Tel : +32 2 351.60.64
Fax : +32 2 351.45.78
Gsm : +32 475.799.477
Avatar
dgd
Bonjour
Je vais essayer ce que dit TED
Pour Marcel je crois savoir comment recuperer le profil
Je vous tiens au courant

Salutations
Dominique Giraud
Responsable Informatique
SD.E.E.G
144 Avenue du Médoc
33320 Eysines
Tél : 05.56.16.10.70
Fax : 05.5616.10.71

**************************************************************************
Ce message électronique et tous les fichiers attachés qu'il
contient sont confidentiels et destinés exclusivement à
l'usage de la personne à laquelle ils sont adressés.
Si vous avez reçu ce message par erreur, merci de le
retourner à son émetteur. La publication, l'usage, la distribution,
l'impression ou la copie non autorisée de ce message et des
attachements qu'il contient sont strictement interdits.

**************************************************************************

a écrit dans le message de news:

Salut !


On 12-Aug-2004, ted wrote:

> En utilisant la syntaxe "Exchange" des fonctions email de windev on
> retouve bien les emails dans la messagerioe par la suite ! Il est même
> possible de mettre un email dans la messagerie, prêt à l'enoi, sans
> l'envoyer. Il est éalement possible de lire tout les email déjà
> récupéré...
> Cela semble correspondre à ce que tu veux.

Je m'insère dans la conversation car je viens de regarder de plus près les
fonctions email ...
Jusqu'à présent, j'ai toujours utilisé la syntaxe SMTP, ou, si je voulais
passer par Outlokk ( pas OE) l'OLE Automation.

Je n'ai jamais utilisé les syntaxes Exchange, car mais clients ne
disposaient pas d'Exchange Serveur.

Si je comprends bien ce que tu dis, même sans serveur Exchange, on peut
utiliser cette syntaxe.
Mais alors comment définir, ou trouver, le profil à utiliser dans
emailouvresession() ?

Merci d'avance pour ta réponse !



--
Marcel Berman
c/o Managing Business SPRL
Allée du Petit Paris, 11
B - 1410 - Waterloo
Tel : +32 2 351.60.64
Fax : +32 2 351.45.78
Gsm : +32 475.799.477


Avatar
dgd
Bonjour
ci joint bout du code qui fonctionne sous O.E
suivant les parametres de securite dans les options une fenetre peut
s'ouvrir pour avertir d'un envoi

par contre un autre fenetre s'ouvre par O.E pour prevenir que O.E n'est pas
la messagerie par defaut, la je ne sais pas pourquoi ?

par contre le message est bien envoyé puis est place dans la boite des
elements envoyés.

si on definit un nom de session dans EmailOuvresession ca ne peut etre que
le nom de session sous Windows et la le message est envoyer mais n'est pas
placer dans les elements envoyes.

sretour est un entier=EmailOuvreSession("")

// Initialisation de la structure e-mail
Email.Destinataire = "txtTo"
Email.Expéditeur = "txtDefaultMailAccount"
Email.Message = "TxtMessage"
Email.sujet = "TxtSubject"
Email.nbDestinataire = 1
// Envoie le mail
SI PAS EmailEnvoieMessage(sretour) ALORS
Erreur("eMailEnvoieMessage a échoué '" + ErreurInfo(errMessage) + "'")
SINON
Info("eMailEnvoieMessage a réussi")
FIN

Voila si on peut faire mieux je suis prenneur.

Salutations
Dominique Giraud
Responsable Informatique
SD.E.E.G
144 Avenue du Médoc
33320 Eysines
Tél : 05.56.16.10.70
Fax : 05.5616.10.71

**************************************************************************
Ce message électronique et tous les fichiers attachés qu'il
contient sont confidentiels et destinés exclusivement à
l'usage de la personne à laquelle ils sont adressés.
Si vous avez reçu ce message par erreur, merci de le
retourner à son émetteur. La publication, l'usage, la distribution,
l'impression ou la copie non autorisée de ce message et des
attachements qu'il contient sont strictement interdits.

**************************************************************************

"dgd" a écrit dans le message de news:
cfamja$4a9$
Bonjour
Apres pls jours de recherche j'ai trouve (le terme est certainement faux)


un
projet ecrit en visual basic qui permet d'ouvrir une fenetre est


d'adresser
par Outlook express ou outlook un mail plus 1 ou pls pieces jointes a un


ou
pls destinataires.

Apres avoir transferer ce "projet" dans Windev 8 j'ai beaucoup
d'erreur.(Normal)

Je recherche un développeur ayant des connaissance dans les deux langages
pour convertir de visual en Windev et ceci afin de mettre a disposition


sur
le news ce futur projet.

Il permettra de piloter OE Express a travers windev tous les parametres
peuvent être transmis:
Expediteur,Destinataire,Copie,Sujet,Corps du message,Pieces jointes

Voila
je connais lanceappliassociée ainsi que MAPIenddoucuments la ca serait
MAPISendMail

Salutations
Dominique Giraud
Responsable Informatique
SD.E.E.G
144 Avenue du Médoc
33320 Eysines
Tél : 05.56.16.10.70
Fax : 05.5616.10.71

**************************************************************************
Ce message électronique et tous les fichiers attachés qu'il
contient sont confidentiels et destinés exclusivement à
l'usage de la personne à laquelle ils sont adressés.
Si vous avez reçu ce message par erreur, merci de le
retourner à son émetteur. La publication, l'usage, la distribution,
l'impression ou la copie non autorisée de ce message et des
attachements qu'il contient sont strictement interdits.

**************************************************************************





Avatar
dgd
re
en mettant le 2éme parametre de emailenvoiemessage a vrai la fenetre de O.E
s'affiche

sretour est un entier=EmailOuvreSession("")
//// Initialisation de la structure e-mail
Email.Destinataire = "txtto"
Email.Expéditeur = "txtDefaultMailAccount"
Email.Message = "txtMessage"
Email.sujet = "TxtSubject"
Email.nbDestinataire =1
SI TxtAttachedFiles<>"" ALORS
Email.NbAttache = 1
Email.Attache = TxtAttachedFiles
SINON
Email.NbAttache=0
FIN
// Envoie le mail
SI PAS EmailEnvoieMessage(sretour,Vrai) ALORS
Erreur("eMailEnvoieMessage a échoué '" + ErreurInfo(errMessage) + "'")
FIN
EmailFermeSession(sretour)

Salutations
Dominique Giraud
Responsable Informatique
SD.E.E.G
144 Avenue du Médoc
33320 Eysines
Tél : 05.56.16.10.70
Fax : 05.5616.10.71

**************************************************************************
Ce message électronique et tous les fichiers attachés qu'il
contient sont confidentiels et destinés exclusivement à
l'usage de la personne à laquelle ils sont adressés.
Si vous avez reçu ce message par erreur, merci de le
retourner à son émetteur. La publication, l'usage, la distribution,
l'impression ou la copie non autorisée de ce message et des
attachements qu'il contient sont strictement interdits.

**************************************************************************

"dgd" a écrit dans le message de news:
cfamja$4a9$
Bonjour
Apres pls jours de recherche j'ai trouve (le terme est certainement faux)


un
projet ecrit en visual basic qui permet d'ouvrir une fenetre est


d'adresser
par Outlook express ou outlook un mail plus 1 ou pls pieces jointes a un


ou
pls destinataires.

Apres avoir transferer ce "projet" dans Windev 8 j'ai beaucoup
d'erreur.(Normal)

Je recherche un développeur ayant des connaissance dans les deux langages
pour convertir de visual en Windev et ceci afin de mettre a disposition


sur
le news ce futur projet.

Il permettra de piloter OE Express a travers windev tous les parametres
peuvent être transmis:
Expediteur,Destinataire,Copie,Sujet,Corps du message,Pieces jointes

Voila
je connais lanceappliassociée ainsi que MAPIenddoucuments la ca serait
MAPISendMail

Salutations
Dominique Giraud
Responsable Informatique
SD.E.E.G
144 Avenue du Médoc
33320 Eysines
Tél : 05.56.16.10.70
Fax : 05.5616.10.71

**************************************************************************
Ce message électronique et tous les fichiers attachés qu'il
contient sont confidentiels et destinés exclusivement à
l'usage de la personne à laquelle ils sont adressés.
Si vous avez reçu ce message par erreur, merci de le
retourner à son émetteur. La publication, l'usage, la distribution,
l'impression ou la copie non autorisée de ce message et des
attachements qu'il contient sont strictement interdits.

**************************************************************************





Avatar
Pierre-Yves TAVERNIER
Bonjour,

Sur windevasso tu trouveras un exemple d'utilisation de sendmail (en WD55) :

Procédure SendMail(Adresse,MObject, MBody,PieceJointe)

MessageErreur est une chaine
bOK est un booleen = vrai
hdlLib est un entier long

hRes est un entier long

szPieceJointe est une chaine asciiz sur 255 = PieceJointe
szNomPieceJointe est une chaine asciiz sur 255 = "Nom PJ"
szSujet est une chaine asciiz sur 128 = MObject
szBody est une chaine asciiz sur 1000 = MBody
szAdresse est une chaine asciiz sur 255 = Adresse
szNomAdresse est une chaine asciiz sur 128 = "Pour toi"

MAPI_LOGIN_UI est un entier long = 0x00000001
MAPI_TO est un entier = 1;

// DEBUT Structure MapiMessage du message à envoyer
MapiMessage est une structure
ulReserved est un entier long
lpszSubject est un entier long
lpszNoteText est un entier long
lpszMessageTyp est un entier long
lpszDateReceived est un entier long
lpszConversationID est un entier long
flFlags est un entier long
lpOriginator est un entier long
nRecipCount est un entier long
lpRecips est un entier long
nFileCount est un entier long
lpFiles est un entier long
fin
// FIN Structure MapiMessage du message à faire passer

// DEBUT Structure MapiFileDesc du fichier à envoyer

MapiFileDesc est une structure
ulReserved est un entier long
flFlags est un entier long
nPosition est un entier long
lpszPathName est un entier long
lpszFileName est un entier long


lpFileType est un entier long


fin

// FIN Structure MapiFileDesc du fichier à envoyer

// DEBUT Structure MapiRecipDesc des destinataires du messages
MapiRecipDesc est une structure
ulReserved est un entier long
ulRecipClass est un entier long
lpszName est un entier long
lpszAddress est un entier long
ulEIDSize est un entier long
lpEntryID est un entier long


fin

// FIN Structure MapiRecipDesc des destinataires du messages

// DEBUT Déclaration des objets Fichiers, Messages et destinataires
sMapiMessage est une MapiMessage
sMapiFileDesc est une MapiFileDesc
sMapiRecipDesc est une MapiRecipDesc
// FIN Déclaration des objets Fichiers, Messages et destinataires

// DEBUT Chargement de la DLL MAPI32
si bOK alors



hdlLib = appeldll32("Kernel32","LoadLibraryA","MAPI32.dll")



si hdlLib<32 alors // référence canal dll < 32 => message d'erreur



bOK = faux
MessageErreur = "Impossible de charger MAPI32.DLL"
hdlLib = 0



fin



fin
// FIN Chargement de la DLL MAPI32


Cordialement

PYT
Avatar
Eric Demeester
dans (in) fr.comp.developpement.agl.windev, "dgd"
ecrivait (wrote) :

Bonsoir,

par contre un autre fenetre s'ouvre par O.E pour prevenir que O.E n'est pas
la messagerie par defaut, la je ne sais pas pourquoi ?



C'est probablement parce qu'il y a un autre logiciel de courrier sur la
machine en question, qui est configuré pour être le logiciel de courrier
par défaut...

Pour information, si OE et Outlook sont (malheureusement) les logiciels
de courrier les plus communs, il en existe d'autres, comme Eudora,
Thunderbird ou Pegasus Mail par exemple.

--
Eric