DominoArea.org [Archive]

j'ai un numéro chrono qui incrémente très bien .Sauf que , om me demande de rajouterr un zéro devant .exemple : 05045, quand je le met en dûr dans mon agent il ne me l'affiche pas ... Comment puis je faire pour qu'il affiche le zéro ... en sachant que ça fait parti de la même zone.c'est certainement une question de format de cette zone ??merci ..

Il faut que ton champ soit en Texte. Si il est numérique c'est normal

Negatif !il n'affiche tjrs pas le zéro devant ... Ci joint le code de mon agent ...Sub Initialize Dim session As New NotesSession Dim workspace As New NotesUIWorkspace Dim db As NotesDatabase Dim view As NotesView Dim vc As NotesViewEntryCollection Dim source As NotesUIDocument Dim doc As NotesDocument 'permet de récupérer la valeur d'un champ sur un doc Dim item As NotesItem Dim compteur As Long compteur = 0 Set source = workspace.CurrentDocument Set db = session.CurrentDatabase ID = source.FieldGetText("NumID") 'On regarde la vue "Numéro de chrono" Set view = db.GetView("Numéro de chrono") Set vc = view.AllEntries If vc.count=1 Then'Nombre de départ du compteur compteur="05000" ....Qd je débogue mon agent ... au niveau de la variable ... il m'affiche 5000 ...

Dim compteur As Longcompteur="05000"Problème tu déclare un Long, et tu mets un chaine dedans "05000" !!!!donc compteur vaut 5000, c'est normal mais pas très propre.Normalement:Dim compteur As Longcompteur=05000==> compteur vaut 5000OuDim compteur As stringcompteur= "05000"==> compteur vaut "05000"