par Raziel » 10 Avr 2003 à 16:00
Voici 1 exemple de code. Pour le doc courant, je veux récupérer toutes ses remontés d'informations. Pour cela, j'ai une vue (v_DEV_Forum) qui liste tous les doc en fonction d'une clé (cette vue est catégorisé sur le champ clé). Dans mon cas, mes docs possédent un champ CLEF dont la valeur est le UNID du doc principale (doc auquel les remontées sont rattaché). Ma picklist récupére ces remontées en fonction de l'UNID de mon doc courant. Ensuite, en fonction du choix du user, j'ouvre le doc sélectionnée dans la PickList.Dim Session As New notessessionDim ws As New notesuiworkspaceDim db As notesdatabaseDim DocCol As notesdocumentcollectionDim Doc As notesdocument Set db = Session.currentdatabaseSet DocCol = ws.PickListCollection(1, False, db.server, db.filepath, "v_DEV_Forum", "Toutes les remontées pour un engagement", "Sélectionnez la remontée que vous souhaitez consulter", Cstr(ws.currentdocument.document.UniversalID)) If DocCol.count = 0 Then Exit SubSet Doc = DocCol.getfirstdocumentCall ws.editdocument(False, Doc)
Raziel
L'administration est un lieu ou les gens qui arrivent en retard croisent dans l'escalier ceux qui partent en avance. [Georges Courteline]