Je cherche de la doc sur le pilotage de Lotus Note par OLE. Les fonctions
disponibles, leurs explications, tous ça quoi...
Des exemples en Windev en plus, se serait vraiment sympa...
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Dominique \QNX\ Lecocq -www.binact.com-
Salut, que veux tu faire exactement? juste les fonction mail ou plus?
Dominique "QNX" Lecocq www.binact.com
"Byky" a écrit dans le message de news:bebcrf$9ci$
Bonjour à tous,
Je cherche de la doc sur le pilotage de Lotus Note par OLE. Les fonctions disponibles, leurs explications, tous ça quoi... Des exemples en Windev en plus, se serait vraiment sympa...
Merci d'avance.
Mikaël
Salut,
que veux tu faire exactement?
juste les fonction mail ou plus?
Dominique "QNX" Lecocq
www.binact.com
"Byky" <mikaeldauver@llexell.fr> a écrit dans le message de
news:bebcrf$9ci$1@news.tiscali.fr...
Bonjour à tous,
Je cherche de la doc sur le pilotage de Lotus Note par OLE. Les fonctions
disponibles, leurs explications, tous ça quoi...
Des exemples en Windev en plus, se serait vraiment sympa...
Salut, que veux tu faire exactement? juste les fonction mail ou plus?
Dominique "QNX" Lecocq www.binact.com
"Byky" a écrit dans le message de news:bebcrf$9ci$
Bonjour à tous,
Je cherche de la doc sur le pilotage de Lotus Note par OLE. Les fonctions disponibles, leurs explications, tous ça quoi... Des exemples en Windev en plus, se serait vraiment sympa...
Merci d'avance.
Mikaël
Byky
En fait je veux pouvoir lire et écrire dans les contacts et le calendrier.
Mikaël
"Dominique "QNX" Lecocq -www.binact.com-" a écrit dans le message de news:becdg6$bkt$
Salut, que veux tu faire exactement? juste les fonction mail ou plus?
Dominique "QNX" Lecocq www.binact.com
"Byky" a écrit dans le message de news:bebcrf$9ci$ > Bonjour à tous, > > Je cherche de la doc sur le pilotage de Lotus Note par OLE. Les
fonctions
> disponibles, leurs explications, tous ça quoi... > Des exemples en Windev en plus, se serait vraiment sympa... > > Merci d'avance. > > > Mikaël > >
En fait je veux pouvoir lire et écrire dans les contacts et le calendrier.
Mikaël
"Dominique "QNX" Lecocq -www.binact.com-" <info@binact.com> a écrit dans le
message de news:becdg6$bkt$1@news-reader4.wanadoo.fr...
Salut,
que veux tu faire exactement?
juste les fonction mail ou plus?
Dominique "QNX" Lecocq
www.binact.com
"Byky" <mikaeldauver@llexell.fr> a écrit dans le message de
news:bebcrf$9ci$1@news.tiscali.fr...
> Bonjour à tous,
>
> Je cherche de la doc sur le pilotage de Lotus Note par OLE. Les
fonctions
> disponibles, leurs explications, tous ça quoi...
> Des exemples en Windev en plus, se serait vraiment sympa...
>
> Merci d'avance.
>
>
> Mikaël
>
>
// Declaration de l'objet OLE NotesSession Notes est un objet OLE "Notes.NotesSession"
// Declaration des objets OLE dynamiques Base est un objet ole dynamique // base mail Doc est un objet ole dynamique // document AttachMe est un objet ole dynamique // piece-jointe EmbedObj est un objet ole dynamique // piece-jointe
// Ouverture de la base mail par defaut Base = Notes>>GetDataBase("", "") Base>>OpenMail()
// Verifie l'ouverture de la base courrier tantque Base>>isOpen = olefaux // Nouvelle tentative d'ouverture de la base info("Vérifez que Notes est lancé sur votre poste et que votre base de courrier est ouverte !") Base = Notes>>GetDataBase("", "") Base>>OpenMail() FIN
// Création d'un nouveau document Doc = Base>>CreateDocument
// Declaration d'un document de type memo Doc>>ReplaceItemValue("Form", "Memo")
// Creation de la piece-jointe si Attachement <> "" alors AttachMe = Doc>>CreateRichTextItem("Attachment") EmbedObj = AttachMe>>EmbedObject(1454, "", Attachement,"Attachment") Doc>>CreateRichTextItem("Attachment") FIN
// Sauvegarde du message lors de l'envoi Doc>>SaveMessageOnSend = Sauvegarde
// Sauvegarde de la date d'envoi du message Doc>>ReplaceItemValue("PostedDate", gauche(dateverschaine(datesys()), 6) + droite(dateverschaine(datesys()), 2))
// Envoi du mail Doc>>Send(olefaux) info("Mail envoyé à : " + Destinataire)
// Liberation des objets dynamiques liberer(Base) liberer(Doc) si Attachement <> "" alors liberer(AttachMe) liberer(EmbedObj) fin
Je cherche de la doc sur le pilotage de Lotus Note par OLE. Les fonctions disponibles, leurs explications, tous ça quoi... Des exemples en Windev en plus, se serait vraiment sympa...
Merci d'avance.
Mikaël
voici une procedure qui me permet d'utiliser la messagerie "Lotus Note"
// Declaration de l'objet OLE NotesSession
Notes est un objet OLE "Notes.NotesSession"
// Declaration des objets OLE dynamiques
Base est un objet ole dynamique // base mail
Doc est un objet ole dynamique // document
AttachMe est un objet ole dynamique // piece-jointe
EmbedObj est un objet ole dynamique // piece-jointe
// Ouverture de la base mail par defaut
Base = Notes>>GetDataBase("", "")
Base>>OpenMail()
// Verifie l'ouverture de la base courrier
tantque Base>>isOpen = olefaux
// Nouvelle tentative d'ouverture de la base
info("Vérifez que Notes est lancé sur votre poste et que votre base de
courrier est ouverte !")
Base = Notes>>GetDataBase("", "")
Base>>OpenMail()
FIN
// Création d'un nouveau document
Doc = Base>>CreateDocument
// Declaration d'un document de type memo
Doc>>ReplaceItemValue("Form", "Memo")
// Creation de la piece-jointe
si Attachement <> "" alors
AttachMe = Doc>>CreateRichTextItem("Attachment")
EmbedObj = AttachMe>>EmbedObject(1454, "", Attachement,"Attachment")
Doc>>CreateRichTextItem("Attachment")
FIN
// Sauvegarde du message lors de l'envoi
Doc>>SaveMessageOnSend = Sauvegarde
// Sauvegarde de la date d'envoi du message
Doc>>ReplaceItemValue("PostedDate", gauche(dateverschaine(datesys()), 6) +
droite(dateverschaine(datesys()), 2))
// Envoi du mail
Doc>>Send(olefaux)
info("Mail envoyé à : " + Destinataire)
// Liberation des objets dynamiques
liberer(Base)
liberer(Doc)
si Attachement <> "" alors
liberer(AttachMe)
liberer(EmbedObj)
fin
"Byky" <mikaeldauver@llexell.fr> a écrit dans le message news:
bebcrf$9ci$1@news.tiscali.fr...
Bonjour à tous,
Je cherche de la doc sur le pilotage de Lotus Note par OLE. Les fonctions
disponibles, leurs explications, tous ça quoi...
Des exemples en Windev en plus, se serait vraiment sympa...
// Declaration de l'objet OLE NotesSession Notes est un objet OLE "Notes.NotesSession"
// Declaration des objets OLE dynamiques Base est un objet ole dynamique // base mail Doc est un objet ole dynamique // document AttachMe est un objet ole dynamique // piece-jointe EmbedObj est un objet ole dynamique // piece-jointe
// Ouverture de la base mail par defaut Base = Notes>>GetDataBase("", "") Base>>OpenMail()
// Verifie l'ouverture de la base courrier tantque Base>>isOpen = olefaux // Nouvelle tentative d'ouverture de la base info("Vérifez que Notes est lancé sur votre poste et que votre base de courrier est ouverte !") Base = Notes>>GetDataBase("", "") Base>>OpenMail() FIN
// Création d'un nouveau document Doc = Base>>CreateDocument
// Declaration d'un document de type memo Doc>>ReplaceItemValue("Form", "Memo")
// Creation de la piece-jointe si Attachement <> "" alors AttachMe = Doc>>CreateRichTextItem("Attachment") EmbedObj = AttachMe>>EmbedObject(1454, "", Attachement,"Attachment") Doc>>CreateRichTextItem("Attachment") FIN
// Sauvegarde du message lors de l'envoi Doc>>SaveMessageOnSend = Sauvegarde
// Sauvegarde de la date d'envoi du message Doc>>ReplaceItemValue("PostedDate", gauche(dateverschaine(datesys()), 6) + droite(dateverschaine(datesys()), 2))
// Envoi du mail Doc>>Send(olefaux) info("Mail envoyé à : " + Destinataire)
// Liberation des objets dynamiques liberer(Base) liberer(Doc) si Attachement <> "" alors liberer(AttachMe) liberer(EmbedObj) fin
Je cherche de la doc sur le pilotage de Lotus Note par OLE. Les fonctions disponibles, leurs explications, tous ça quoi... Des exemples en Windev en plus, se serait vraiment sympa...
Merci d'avance.
Mikaël
Byky
Merci pour cet exemple, mais où puis-je trouver des infos sur les fonctions OLE disponibles pour le pilotage de Lotus. Et de plus , je veux pouvoir attaquer la base des contacts et du calendrier.
Merci d'avance.
Mikaël
"cilir" a écrit dans le message de news:belleg$oif$
voici une procedure qui me permet d'utiliser la messagerie "Lotus Note"
// Declaration de l'objet OLE NotesSession Notes est un objet OLE "Notes.NotesSession"
// Declaration des objets OLE dynamiques Base est un objet ole dynamique // base mail Doc est un objet ole dynamique // document AttachMe est un objet ole dynamique // piece-jointe EmbedObj est un objet ole dynamique // piece-jointe
// Ouverture de la base mail par defaut Base = Notes>>GetDataBase("", "") Base>>OpenMail()
// Verifie l'ouverture de la base courrier tantque Base>>isOpen = olefaux // Nouvelle tentative d'ouverture de la base info("Vérifez que Notes est lancé sur votre poste et que votre base de courrier est ouverte !") Base = Notes>>GetDataBase("", "") Base>>OpenMail() FIN
// Création d'un nouveau document Doc = Base>>CreateDocument
// Declaration d'un document de type memo Doc>>ReplaceItemValue("Form", "Memo")
// Creation de la piece-jointe si Attachement <> "" alors AttachMe = Doc>>CreateRichTextItem("Attachment") EmbedObj = AttachMe>>EmbedObject(1454, "", Attachement,"Attachment") Doc>>CreateRichTextItem("Attachment") FIN
// Sauvegarde du message lors de l'envoi Doc>>SaveMessageOnSend = Sauvegarde
// Sauvegarde de la date d'envoi du message Doc>>ReplaceItemValue("PostedDate", gauche(dateverschaine(datesys()), 6) + droite(dateverschaine(datesys()), 2))
// Envoi du mail Doc>>Send(olefaux) info("Mail envoyé à : " + Destinataire)
// Liberation des objets dynamiques liberer(Base) liberer(Doc) si Attachement <> "" alors liberer(AttachMe) liberer(EmbedObj) fin
"Byky" a écrit dans le message news: bebcrf$9ci$ > Bonjour à tous, > > Je cherche de la doc sur le pilotage de Lotus Note par OLE. Les
fonctions
> disponibles, leurs explications, tous ça quoi... > Des exemples en Windev en plus, se serait vraiment sympa... > > Merci d'avance. > > > Mikaël > >
Merci pour cet exemple, mais où puis-je trouver des infos sur les fonctions
OLE disponibles pour le pilotage de Lotus.
Et de plus , je veux pouvoir attaquer la base des contacts et du calendrier.
Merci d'avance.
Mikaël
"cilir" <cilir@wanadoo.fr> a écrit dans le message de
news:belleg$oif$2@news-reader1.wanadoo.fr...
voici une procedure qui me permet d'utiliser la messagerie "Lotus Note"
// Declaration de l'objet OLE NotesSession
Notes est un objet OLE "Notes.NotesSession"
// Declaration des objets OLE dynamiques
Base est un objet ole dynamique // base mail
Doc est un objet ole dynamique // document
AttachMe est un objet ole dynamique // piece-jointe
EmbedObj est un objet ole dynamique // piece-jointe
// Ouverture de la base mail par defaut
Base = Notes>>GetDataBase("", "")
Base>>OpenMail()
// Verifie l'ouverture de la base courrier
tantque Base>>isOpen = olefaux
// Nouvelle tentative d'ouverture de la base
info("Vérifez que Notes est lancé sur votre poste et que votre base de
courrier est ouverte !")
Base = Notes>>GetDataBase("", "")
Base>>OpenMail()
FIN
// Création d'un nouveau document
Doc = Base>>CreateDocument
// Declaration d'un document de type memo
Doc>>ReplaceItemValue("Form", "Memo")
// Creation de la piece-jointe
si Attachement <> "" alors
AttachMe = Doc>>CreateRichTextItem("Attachment")
EmbedObj = AttachMe>>EmbedObject(1454, "", Attachement,"Attachment")
Doc>>CreateRichTextItem("Attachment")
FIN
// Sauvegarde du message lors de l'envoi
Doc>>SaveMessageOnSend = Sauvegarde
// Sauvegarde de la date d'envoi du message
Doc>>ReplaceItemValue("PostedDate", gauche(dateverschaine(datesys()), 6) +
droite(dateverschaine(datesys()), 2))
// Envoi du mail
Doc>>Send(olefaux)
info("Mail envoyé à : " + Destinataire)
// Liberation des objets dynamiques
liberer(Base)
liberer(Doc)
si Attachement <> "" alors
liberer(AttachMe)
liberer(EmbedObj)
fin
"Byky" <mikaeldauver@llexell.fr> a écrit dans le message news:
bebcrf$9ci$1@news.tiscali.fr...
> Bonjour à tous,
>
> Je cherche de la doc sur le pilotage de Lotus Note par OLE. Les
fonctions
> disponibles, leurs explications, tous ça quoi...
> Des exemples en Windev en plus, se serait vraiment sympa...
>
> Merci d'avance.
>
>
> Mikaël
>
>
Merci pour cet exemple, mais où puis-je trouver des infos sur les fonctions OLE disponibles pour le pilotage de Lotus. Et de plus , je veux pouvoir attaquer la base des contacts et du calendrier.
Merci d'avance.
Mikaël
"cilir" a écrit dans le message de news:belleg$oif$
voici une procedure qui me permet d'utiliser la messagerie "Lotus Note"
// Declaration de l'objet OLE NotesSession Notes est un objet OLE "Notes.NotesSession"
// Declaration des objets OLE dynamiques Base est un objet ole dynamique // base mail Doc est un objet ole dynamique // document AttachMe est un objet ole dynamique // piece-jointe EmbedObj est un objet ole dynamique // piece-jointe
// Ouverture de la base mail par defaut Base = Notes>>GetDataBase("", "") Base>>OpenMail()
// Verifie l'ouverture de la base courrier tantque Base>>isOpen = olefaux // Nouvelle tentative d'ouverture de la base info("Vérifez que Notes est lancé sur votre poste et que votre base de courrier est ouverte !") Base = Notes>>GetDataBase("", "") Base>>OpenMail() FIN
// Création d'un nouveau document Doc = Base>>CreateDocument
// Declaration d'un document de type memo Doc>>ReplaceItemValue("Form", "Memo")
// Creation de la piece-jointe si Attachement <> "" alors AttachMe = Doc>>CreateRichTextItem("Attachment") EmbedObj = AttachMe>>EmbedObject(1454, "", Attachement,"Attachment") Doc>>CreateRichTextItem("Attachment") FIN
// Sauvegarde du message lors de l'envoi Doc>>SaveMessageOnSend = Sauvegarde
// Sauvegarde de la date d'envoi du message Doc>>ReplaceItemValue("PostedDate", gauche(dateverschaine(datesys()), 6) + droite(dateverschaine(datesys()), 2))
// Envoi du mail Doc>>Send(olefaux) info("Mail envoyé à : " + Destinataire)
// Liberation des objets dynamiques liberer(Base) liberer(Doc) si Attachement <> "" alors liberer(AttachMe) liberer(EmbedObj) fin