EvilGost
Messages postés235Date d'inscriptionlundi 16 décembre 2002StatutMembreDernière intervention16 mai 20112 19 oct. 2004 à 17:22
as-tu pensé a ajouter le composant Lotus Notes dans VB?
cs_Ironik
Messages postés1Date d'inscriptionlundi 17 décembre 2001StatutMembreDernière intervention19 juin 2003 19 juin 2003 à 14:44
Ce code est très interressant parce qu'en fait je dois envoyer un mail avec différentes infos mais il faut que l'utilisateur le voit à l'écran avant de l'envoyer et après avoir saisi le source, cette procédure plante à la première ligne (à l'ouverture de la session). Est ce qu'on peut me dire pourquoi ? ou y a t-il une autre façon de faire ? Merci
cs_PYLB
Messages postés2Date d'inscriptionmercredi 12 juin 2002StatutMembreDernière intervention17 décembre 2002 17 déc. 2002 à 12:14
Je suis très intéressé par ce programme mais ......
existe-t 'il un ocx ou une dll qui permet de creer les objets notes.
doit -on faire une manip quelconque dans la base de registres
Merci pour les conseils
cs_david411
Messages postés1Date d'inscriptionmardi 1 octobre 2002StatutMembreDernière intervention 1 octobre 2002 1 oct. 2002 à 14:55
merci pour ce code qui marche super bien voila pour mettre 2 fichiers ou + en pj:
pj1 et pj2 en string
If pj1 <> "" Then
Set obj_piece_jointe = lemel.CREATERICHTEXTITEM("Attachment")
Set obj_pj_inclu = obj_piece_jointe.EMBEDOBJECT(1454, "", pj1, "Attachment")
Set obj_pj_inclu = obj_piece_jointe.EMBEDOBJECT(1454, "", pj2, "Attachment")
lemel.CREATERICHTEXTITEM ("Attachment")
End If
cesieac
Messages postés2Date d'inscriptionjeudi 18 juillet 2002StatutMembreDernière intervention18 juillet 2002 18 juil. 2002 à 18:35
Et en supplément mais en anglais car c'est ma langue maternelle (désolé)...
If you want to send a message to more than one person or copy or blind carbon copy the following may be of use to you.
cesieac
Messages postés2Date d'inscriptionjeudi 18 juillet 2002StatutMembreDernière intervention18 juillet 2002 18 juil. 2002 à 18:33
j'ai peut être trouvé la solution à ton problème...
As far as I can tell the Lotus Notes objects all have to be late bound otherwise you get errors. I have never found out the reason for this (the only thing I can think of is there is an error in the lotus notes api). Feel free to use this code, but if you do you it, I would appreciate a link from your site if you have one.
Point of note. Certain versions of 4.x client handle differently. If you get an error about object already exists, or two attachments instead of one, you will need to comment out the line that reads MailDoc.CREATERICHTEXTITEM ("Attachment"). In later versions of notes API this task is carried out by the previous line.
erreurs404
Messages postés117Date d'inscriptionlundi 23 octobre 2000StatutMembreDernière intervention12 août 2009 18 juil. 2002 à 18:15
cette fonction m'intéresse au plus haut point ... malheureusement ça bug chez moi ...
Windows NT4 SP5 / Lotus Notes 4.6
à la ligne
" Set MailDoc = Maildb.CREATEDOCUMENT"
il me balance un message comme quoi ...
erreur 7063 - Database CN=Notes..... has not been opened yet ...
19 oct. 2004 à 17:22
19 juin 2003 à 14:44
17 déc. 2002 à 12:14
existe-t 'il un ocx ou une dll qui permet de creer les objets notes.
doit -on faire une manip quelconque dans la base de registres
Merci pour les conseils
1 oct. 2002 à 14:55
pj1 et pj2 en string
If pj1 <> "" Then
Set obj_piece_jointe = lemel.CREATERICHTEXTITEM("Attachment")
Set obj_pj_inclu = obj_piece_jointe.EMBEDOBJECT(1454, "", pj1, "Attachment")
Set obj_pj_inclu = obj_piece_jointe.EMBEDOBJECT(1454, "", pj2, "Attachment")
lemel.CREATERICHTEXTITEM ("Attachment")
End If
18 juil. 2002 à 18:35
If you want to send a message to more than one person or copy or blind carbon copy the following may be of use to you.
MailDoc.sendto = Recipient
MailDoc.CopyTo = ccRecipient
MailDoc.BlindCopyTo = bccRecipient
Also for multiple email addresses you just set MailDoc.sendto to an array of variants each of which will receive the message. So
Dim recip(25) as variant
recip(0) = "emailaddress1"
recip(1) = "emailaddress2" e.t.c
maildoc.sendto = recip
18 juil. 2002 à 18:33
As far as I can tell the Lotus Notes objects all have to be late bound otherwise you get errors. I have never found out the reason for this (the only thing I can think of is there is an error in the lotus notes api). Feel free to use this code, but if you do you it, I would appreciate a link from your site if you have one.
Point of note. Certain versions of 4.x client handle differently. If you get an error about object already exists, or two attachments instead of one, you will need to comment out the line that reads MailDoc.CREATERICHTEXTITEM ("Attachment"). In later versions of notes API this task is carried out by the previous line.
18 juil. 2002 à 18:15
Windows NT4 SP5 / Lotus Notes 4.6
à la ligne
" Set MailDoc = Maildb.CREATEDOCUMENT"
il me balance un message comme quoi ...
erreur 7063 - Database CN=Notes..... has not been opened yet ...
je suppose que
" Maildb.OPENMAIL"
a échoué
merci d'avance pour ton aide.