compteur

[Raphaël]

Vi c exactement ca que je veux faire!!J'essaye cet aprem, je suis proche du but, courage moussaillon!;-)@+Raph

[Raziel]

C'est ce que j'avais compris. En revanche, comme je te le signale plus haut, le fait de ne prendre que 5M9DNR (et donc de tronquer la clé unique), je ne peux pas t'assurer que le résultat sera une clé unique (ce que tu semble vouloir obtenir)

[Raphaël]

Euh j'ai encore une toute petite question pour le compteur, j'ai fait un champ calculé à l'affichage dans un masque. Je le nomme compteur. Dans le QuerySave je met la grande formule donné précédemment. Mais je met quoi comme formule dans valeur? Encore merciRaph

[Raziel]

Le champ Calculé à l'affichage ne me semble pas opportuns. Au pire, un champ calculé au mieur un champ calculé à la création.Pour la valeur, tu met comme formule le nom du champ que tu sauvegarde dans le doc.Ex de code :Sub Querysave(Source As Notesuidocument, Continue As Variant)Dim Session as new notessessionDim db as notesdatabaseDim DocProfil as notesdocumentDim Compteur as integerset db = Session.currentdatabase set DocProfil = db.getprofiledocument("NomDuDocDeProfil")while DocProfil.getitemvalue("IsLooked")(0) = "1"sleep(1)wendDocProfil.IsLooked = "1"DocProfil.save true, trueif DocProfil.hasitem("Compteur") thenCompteur = DocProfil.getitemvalue("Compteur")(0)Compteur = Compteur + 1DocProfil.Compteur = CompteurelseDocProfil.Compteur = 1Compteur = 1end ifDocProfil.IsLooked = "0"DocProfil.save true, trueSource.document.Compteur = CompteurEnd SubDe ce fait, pour mon champ Compteur, je met comme formule Compteur.

[Raphaël]

Il n'y a un truc que je ne pige, j'ai tout bien fait, j'ai bien compris le principe et le code, mais rien ne s'affiche. Il n'y a rien d'autre de particulier à faire?Je t'explique ce que j'ai fait :J'ai créer un masque ProfilCompteur.J'ai mis un champ calculé s'appelant Compteur de type texte, avec : Valeur : CompteurQuerysave: La formule que tu as donné juste avant (en changeant le nom du doc profil bien entendu). Voila, c pas bon?Raph

[Raziel]

Plusieurs chose :-> Tout d'abord, tu n'as pas besoin de créer un masque pour ton document de profil (set DocProfil = db.getprofiledocument("NomDuDocDeProfil"))-> Ton champ calculé doit se trouvé dans le masque du doc pour lequel tu veux affecter le compteur. Par conséquent, le code du querysave doit lui aussi ce trouvé dans ce masqueEx :J'ai un masque TOTO contenant un champ Nom et un Champ Prenom. Je veux que chaqun de ces docs ait un compteur unique. Je rajoute donc dans ce masque un champ Compteur calculé à la création.A côté de cela, j'ai mon doc de profil (qui ne possède pas de masque) qui contient deux valeurs : Compteur (contenant la valeur du dernier compteur attribué) et IsLooked (qui m'indique si ce doc est actuellement tenu ou pas).Lorsque j'enregistre mon doc avec le masque toto, je récupère la valeur du champ Compteur de mon document de profile. Je l'incrémente de 1 est j'affecte cette valeur à mon Champ compteur de mon masque TOTO.Il se peux que la valeur du champ Compteur du masque TOTO ne s'affiche qu'après avoir fait un refresh du doc ou après fermeture et réouverture du doc (c'est à cause du fait que l'on passe par la NotesDocument). Si tu veux que la valeur apparaisse tout de suite, il te faudra passé par la NotesUiDocument ou alors de lancer un refresh après la sauvegarde du doc TOTO.

[Raphaël]

Ouaip, ben là je ne comprend plus. Il me semble pourtant faire ce qu'il faut, ou alors j'ai rien compris au document de profil. Si il se créer à partir de la formule que tu m'as donné, je ne vois plus pkoi ca ne marche pas. Si t'as d'autre infos... Je vais essayé de chercher encore!!En tout cas un grand merci!!! C sympa de prendre le temps pour dépanner les autres! Merci, @+Raph

[Raziel]

Si tu veux, tu peux m'envoyer ton appli (sans les données si elles sont confidentielles) et j'y regarderai. Dans ce cas, indique moi le nom du masque a pertir duquel tu créer les doc devant avoir un compteur.

[Raphaël]

Okai ca marche, c vraiment cool, je prépare ca et je te l'envoie.Raph