agenda

[Pof]

Bonjour,j'ai une application "gestion des absences" sur mon intranet et je voudrai enregistrer leur absences dans leur agenda personel , j'ai des users exchange et des users notes sur plusieurs serveurs avec differente version et oui ....Solution trouve : pour les exchange je crée un fichier vcs (VCalendar) que je rattache au mail de confirmation , pour les usere notes je met un bouton dans le mail de confirmation qui crée une entré dans l'agenda notes.deja exist-il une solution unique qui fonctionnerai dans les deux cas ? je ne pense mais bon.Autre pb : pour les entre notes, si je crée un evenement sur la journée je ne peux gerer les demi journée. si je crée un rendez-vous je peux gerer les demi journée mais il faudrai que je crée une entré soit un doc par jour d'absence, ce qui n'ai pas terrible...Voila, donc si quelqu'un a une id un conseillle je suis prenneur....Merci

[PAT]

Tu crees un doc "evenement" pour n journees entieres + eventuellement un doc "rdv" pour la 1/2 journee.

[sticky]

Puis-je vous poser une question. Je l'avais posée récemment sur ce forum.. comment créer à partir d'un bouton une entrée d'agenda ?? Je voudrai en utiliser un pour transférer un rendez-vous (ou un rappel) d'un masque d'une base XX à l'agenda de la base courrier. Merci.

[Pof]

Ben, je crée tous simple un document (Set doc = db.createdocument ...)en utilisant la form "Appointement" de la base courrier. ensuite je renseigne les champ de ce masque (AppointmentType = "4" pour un rappel, StartDate, EndDate, StartTime .....)Ouvre ta base courrier dans le designer et ouvre le masque appointment pour regardez ce que tu dois renseigner...

[sticky]

merci beaucoup pour l'info, je vais étudier cela !!

[Pady]

Bonjour, j'aimerai avoir un échantillon du script en question(insertion des enregistrements dans le calendrier), pour m'en inspirer.je débute sous notes.D'avance merci.[%sig%]

[fredd]

salutessaie ca: Call CreationAgenda(Session,courrier,Lien,DebutDateHeure,FinDateHeure,Duree,trdr)Sub CreationAgenda (Session As NotesSession, Bdd As NotesDataBase, Doc As NotesDocument, Debut As NotesDateTime, Fin As NotesDateTime,_Duree As Integer, trdr As Variant) 'création de l'entrée d'agenda Set agenda = bdd.Createdocument agenda.form = "Appointment" agenda.AppointmentType = "0" agenda.Duration = duree Set agenda.CalendarDateTime = debut Set agenda.EndDateTime = Fin Set agenda.StartDateTime = debut Set agenda.StartDate = debut agenda.ExcludeFromView = "D" Set trdr.startdatetime = debut Set trdr.EnddateTime = Fin Set agenda.timerange = trdr agenda.Subject = Doc.Nature(0) agenda.MailOptions = 0 agenda.Orgtable = "C0" agenda.PRINCIPAL = session.Username agenda.Logo = "StdNotesLtr22" Set item = agenda.ReplaceItemValue( "_ViewIcon", 148 ) Set item = agenda.ReplaceItemValue("$BusyName",session.Username) Set item = agenda.ReplaceItemValue("$BusyPriority","1") Set item = agenda.ReplaceItemValue("$ExpandGroups","3") Set item = agenda.ReplaceItemValue("$PublicAccess","1")