Discussion :

[mac.croutier]

Bonjour à toutes et à tous,

J'espère que vous allez bien !

Je tente de me connecter à ma base notes afin d'envoyer des mails en automatique.
J'y vais par étapes n'ayant jamais utiliser les fonctions Windev pour Notes.
D'après la doc sur le portail de PcSoft, je dois ouvrir la connexion avec Notes par NotesOuvreConnexion et la session par EmailOuvreSessionNotes.
Pour le moment je m’arrête ici et j'affiche une info comme quoi tout est OK.
Voici mon code :

Code :

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

1
2
3
4
5
6
7
8
9
10
Monmail est un Email
 
nIDSession est un entier
nIDSession = NotesOuvreConnexion("Mdp","ServerDomino", "C:\Users\u07262\Documents\Notes\Notes\Data\user.id")
 
SI EmailOuvreSessionNotes(nIDSession,"mail/bvs/croutier.nsf") <> 0 ALORS
Info("session ouverte et Base spécifiée")
SINON
Erreur()
FIN

Mais j'ai le message suivant lorsque je clique sur le bouton :

Impossible de charger le module nnotes.dll.

Pile des appels :
Clic sur BTN_Mail (FEN_FEN_DocsOCR.BTN_Mail), ligne 4

Date : 17/06/2020 14:37:38
Projet : OCR (1.66A)

Informations supplémentaires :
Code erreur : 520001
Module : 'wd250mess.dll (01F250089f - 25.0.212.0)
Informations de débogage :
Fonction (10,192)
EIT_TYPE_WDFILE : <2>
EIT_IDCODE : <18>

J'ai regardé sur le net et la principale raison est que Notes n'est pas installé sur le poste.
Mais ce n'est pas le cas car c'est mon poste et il est bien installé.
La 2ème raison est que dans le registre de windows la clé suivante n'est pas renseignée :

lancer REGEDIT

dérouler (ajouter si besoin) la clé HKEY_CURRENT_USER\Software\Lotus\Notes\Installer
ajouter une valeur texte nommée PROGDIR
indiquer en donnée de la valeur le dossier contenant la DLL NNOTES.DLL
Par exemple : C:\Program Files (x86)\IBM\Notes\

La clé est bien présente et nnotes.dll est bien au bonne endroit !

Notes est bien en version "installé" sur mon poste.
Windev est installé en version 32 bits et je suis en "Go" sur un projet "test" pour le moment, pas de compilation.

Je sèche dès le début !!!

Si quelqu'un peut m'aider, merci d'avance.

--
Bien à vous
Christian

[philouZ]

Bonjour,

Lotus notes est en 32 bits et la configuration de ton projet aussi ?

[mac.croutier]

Bonjour,

Lotus notes est en 32 bits et la configuration de ton projet aussi ?

Bonjour,

Merci pour votre retour.
Et désolé pour le retard de réponse !

Oui, Lotus Notes est en 32 bits et mon installation de Windev l'est aussi ainsi que mon projet.
Et le code me semble correct donc, je sèche...

Bien à vous

Christian

[frenchsting]

Bonjour,

Question à 2 balles : il plante sur le NotesOuvreConnexion ou le EmailOuvreSessionNotes ?

Je pense que c'est NotesOuvreConnexion.
Dans l'aide, il est mis que le dernier paramètre de NotesOuvreConnexion est le chemin du certificat. Que se passe t'il si tu ne le mets pas (il doit le lire dans le fichier notes.ini) ?

Pour EmailOuvreSessionNotes, tu mets juste Erreur(). Mets plutôt Erreur(ErreurInfo()).

Une autre idée est de coller la dll qui va bien dans le répertoire exe de ton projet.

[mac.croutier]

Bonjour frenchsting,

Merci pour le retour.

Il plante directement sur NotesOuvreConnexion comme tu le penses.
J'ai essayé sans le chemin du certificat, résultat idem.
J'ai copié la DLL en question "nnotes.dll" dans le dossier EXE de mon projet et c'est pareil.

Bien à vous

Christian

[frenchsting]

Bonjour,

As-tu essayé en copiant le certificat directement dans la répertoire exe ?

Sinon, comme je vois que tu es en WD25, essaye de contacter le ST de PCSOFT.

[mac.croutier]

Bonjour,

As-tu essayé en copiant le certificat directement dans la répertoire exe ?

Sinon, comme je vois que tu es en WD25, essaye de contacter le ST de PCSOFT.

Bonjour,

Je viens de le faire sans succès.
J'ai même mis n'importe quoi en MDP et nom de serveur, idem.

J'ai lancé une requête au ST de PcSoft.

Je tiens informé le forum de la réponse.

Bien à vous.

Christian

[mac.croutier]

Bonjour à toutes et à tous,

J'espère que vous allez bien !

Mon problème est résolu par le ST de PcSoft.

Ajout du PATH "Notes" dans les variables d'environnement Windows.

Si cela peut aider quelqu'un, voici mon code pour l'envoi d'un mail simple :
Me reste à voir pour envoyer une PJ et tout sera OK !!!

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
 
Monmail		est un Email
IDS			est une emailSessionNotes
nIDSession	est un entier
 
 
IDS..AdresseServeurDomino	= "XXXXX"
IDS..BaseLotusNotes			= "XXXX.nsf"
IDS..CheminCertificat		= "C:\Users\XXXXXX\Documents\Notes\Notes\Data\user.id"
IDS..MotDePasse				= "XXXXX"
 
nIDSession = NotesOuvreConnexion(IDS..MotDePasse,IDS..AdresseServeurDomino,IDS..CheminCertificat)
 
EmailOuvreSession(IDS)
 
SI EmailOuvreSessionNotes(nIDSession,IDS..BaseLotusNotes) <> 0 ALORS
	Info("session ouverte et Base spécifiée")
SINON
	Erreur()
FIN
 
NotesOuvreBase(nIDSession,IDS..BaseLotusNotes)
 
Monmail..Expediteur			= "xxxx.xxxx@xxxxx.fr"
Monmail..Destinataire[1]	= "xxxx.xxxxx@xxx.fr"
Monmail..Sujet				= "Facture TEST"
Monmail..Message			= "Voici la facture"
 
EmailEnvoieMessage(IDS,Monmail)

Bon courage à tous.

[frenchsting]

Bonjour,

Merci pour ton retour