Discussion :

[wojc01]

bonjour à tous,
J'ai une application pour gérer des données et un bouton afin d'envoyer par Email une pièce jointe contenant le réplica transportable à mes abonné.
L'envoi se déroule sans encombre, mais lorsque je reviens sur mon interface principale et que j'appuie sur un bouton quelconque, mon application se ferme avec le message d'erreur suivant:
Impossible de créer le fichier <C:\Program Files\Mozilla Thunderbird\Client.ndx>

Voici mon code d'envoi :

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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
sSujet est une chaîne
sCorpsMail est une chaîne
sAdresseDestinataire est une chaîne
Sretour est un entier 
sTemp est une chaîne
i est un entier=0
 
 
HUtilisateur.Email=LanceAppliAssociée("")
 
//Pièce jointe
Email.Attache = fRepExe()+"\MAITRE\"+gsMaitre+"__"+DateZIP+".zip"
Email.NbAttache = 1
 
Sretour= EmailOuvreSession("")
 
//Adresse des destinataires
sAdresseDestinataire = gsAdressesDestinataires
 
 
//Sujet et corps du message
sSujet = "Mise à jour des bases MAITRE"+" - "+gsMaitre
sCorpsMail = "Mise à jour des bases de données MAITRE"+" - "+gsMaitre
 
Email.NbDestinataire = ChaîneOccurrence(sAdresseDestinataire, ",") + 1
POUR TOUTE CHAINE sTemp DE sAdresseDestinataire SEPAREE PAR ","
	i++
	Email.Destinataire[i] = sTemp
FIN
Email.Sujet = sSujet
Email.Message = sCorpsMail
 
 
// Envoie du Mail
SI PAS EmailEnvoieMessage(Sretour,Vrai) ALORS
	Erreur("L'envoie de l'Email a échoué.",ErreurInfo(errMessage))
SINON 
 
	FEN_TRANSMISSION.MSG = "Données envoyées avec succès aux Abonnés."
 
FIN
 
EmailFermeSession("")

Je précise que ma messagerie par défaut est Mozilla Thunderbird.
Si une âme charitable avait une idée du problème....
Merci à tous

[bruce207]

Bonjour,
je pense que de 1 d'abord ton code n'est pas correct et de 2 je ne sais pas si WinDev gère ThunderBird mais plutot OutLook avec OuvreSessionOutlool() avec ses paramètres. Je te conseillerait de relire l'aide. Bon courage

[mail.spam]

Bonjour,

regarde le sujet envoie-mail-piece-jointe-messagerie-defaut-lutilisateur

Ça devrais t'aider un peu

[wojc01]

Merci pour vos réponses,
mais, avec le code ci-dessus, j'arrive très bien à envoyer des Emails, c'est juste après que l'application Windev veut aller créer: "C:\Program Files\Mozilla Thunderbird\Client.ndx", alors que je n'ai rien demandé.
L'application se ferme vu que dans ce dossier là, il n'y a pas de Client.ndx, il se trouve dans le dossier en cours où se trouve l'exécutable de l'application.
Si quelqu'un sait pourquoi l'application se comporte de la sorte et comment y remédier, merci.
Merci pour votre aide.

[klbsjpolp]

Bonjour,

L'une des fonctions de gestion des messages change le répertoire de travail. Je l'ai vu dans l'aide mais je me souviens plus de laquelle c'est. Tu devrais simplement enregistrer ton répertoire en cours avant l'envoi et le restaurer après.

[EDM-TAHITI]

Hello,
la fonction qui change le répertoire est ouvresessionoutlook

[wojc01]

Merci pour votre aide

[Arnaud B.]

Je précise que ce n'est pas un pb Windev, mais Windows, car j'ai exactement le même problème, alors que j'utilise l'api MAPI32 de Windows.

Cdlt, Arnaud.