Page 1 sur 1

Mystère et GetNthDocument

MessagePublié: 22 Sep 2003 à 11:12
par Lrtl
Bonjour,Vous allez rire mais j'ai un pb.J'ai une vue sans filtre qui contient mettons 5 documents. Les 2 derniersont le même nom et possèdent chacun une pièce jointe du même nom (et oui). Je précise que ces 2 pj bien que portant le même nom n'ont pas le même contenu.Je récupère les documents (4 et 5) successivement par getNthDocument puis leur fais extraire leur pj par extractFile. HHHEE bien figurez-vous que l'extraction de la pj du 4 me donne celle du 5 et inversement ?????!!!!!Je n'arrive pas à me l'expliquer alors si une bonne âme est présente surce site elle pourra sans doute éclairer ma lanterne.Voici le code : Set doc = cvue.GetNthDocument(numdoc) Set itm = doc.getfirstitem("Attachment") For Each attach In itm.embeddedobjects attach.extractfile path & attach.Name Exit For Next attach

Re: Mystère et GetNthDocument

MessagePublié: 22 Sep 2003 à 11:23
par PAT
L'extraction des pieces jointes du 2eme message ecrase peut-être les pieces jointes du 1er message extraites auparavant (puisqu'elles ont le même nom systeme) ...

Re: Mystère et GetNthDocument

MessagePublié: 22 Sep 2003 à 13:00
par Lrtl
Non car j'ai visualisé les pj extraites au fur et à mesure et il y a bieninversion des extractions ...

Re: Mystère et GetNthDocument

MessagePublié: 23 Sep 2003 à 05:39
par phil
Salut. GetNth -> get "le plus proche" : Neath. Et si tu lui fourgues un GetNext pourlui apprendre qui cé ki commande :)

Re: Mystère et GetNthDocument

MessagePublié: 23 Sep 2003 à 10:05
par Cedric
comme dit par phil passe par un GetFirstDocument/GetNextDocumentune boucle à la Dim S As New NotesSession Dim Db As NotesDatabase Dim V As NotesView Dim Doc As NotesDocument Dim NextDoc As NotesDocument Set Db = S.CurrentDatabase Set V = Db.GetView("ma vue") Set Doc = V.GetFirstDocument While Not Doc Is Nothing Set NextDoc = V.GetNextDocument(Doc) Set Doc = NextDoc WendGetNth est hypralourd, en fait cette méthode n'aurait jamais du exister :o(