DominoArea.org [Archive]

Bonjour à tous,dans mon application je pilote par un lien OLE l'envoie automatique de mails via lotus notes, mon problème est que je voudrais permettre à l'utilisateur de sauvegarder ses mails sous forme de brouillon mais je n'ai trouvé aucune information sur la commande ou procèdure à suivre pour le réaliser.Merci d'avance à ceux qui pourront m'aider

Bonjour,le bouton Enregistrer brouillon de ma boite mail met la valeur "SaveAsDraft" dans le champ tmpAction (le code est FIELD tmpAction := "SaveAsDraft";) puis sauvegarde le doc.A mon avis il suffit de faire la même chose dans ton code mais je n'ai pas testé.Tiens nous au courant

Merci pour le renseignement, mais avec mon lien OLE je n'arrive pas à créer l'objet FieldVoici l'initialisation de mes différents objets notes' session notesSess = allouer un objet OLE "Notes.Notessession"UserName = Sess>>UserNameMailDbName =Gauche(UserName, 1) + Droite(UserName, (Taille(UserName) - Position(UserName, " "))) + ".nsf"' Base notesMaildb = Sess>>GETDATABASE("", MailDbName)SI Maildb>>ISOPEN = True ALORS // Notes déjà ouvertSINON Maildb>>OPENMAILFIN' Le mailMailDoc = Maildb>>CreateDocumentQuelqu'un aurai-t-il une idée sur la façon de créer l'objet FIELD en OLE?Merci

Merci pour le renseignement, mais avec mon lien OLE je n'arrive pas à créer l'objet FieldVoici l'initialisation de mes différents objets notes' session notesSess = allouer un objet OLE "Notes.Notessession"UserName = Sess>>UserNameMailDbName =Gauche(UserName, 1) + Droite(UserName, (Taille(UserName) - Position(UserName, " "))) + ".nsf"' Base notesMaildb = Sess>>GETDATABASE("", MailDbName)SI Maildb>>ISOPEN = True ALORS // Notes déjà ouvertSINON Maildb>>OPENMAILFIN' Le mailMailDoc = Maildb>>CreateDocumentQuelqu'un aurai-t-il une idée sur la façon de créer l'objet FIELD en OLE?Merci

Merci pour le renseignement, mais avec mon lien OLE je n'arrive pas à créer l'objet FieldVoici l'initialisation de mes différents objets notes' session notesSess = allouer un objet OLE "Notes.Notessession"UserName = Sess>>UserNameMailDbName =Gauche(UserName, 1) + Droite(UserName, (Taille(UserName) - Position(UserName, " "))) + ".nsf"' Base notesMaildb = Sess>>GETDATABASE("", MailDbName)SI Maildb>>ISOPEN = True ALORS // Notes déjà ouvertSINON Maildb>>OPENMAILFIN' Le mailMailDoc = Maildb>>CreateDocumentQuelqu'un aurai-t-il une idée sur la façon de créer l'objet FIELD en OLE?Merci

Voici la solution que j'ai trouvé :MailDoc>>PutInFolder ("($Draft)")MailDoc>>Save (OLEVrai, OLEVrai)Le plus difficile a été de trouver le nom exacte de la vue Brouillon.