DominoArea.org [Archive]

Bonjour, j'ai une erreur qui s'affiche des que j'execute ce code!!En fait je cherche a ouvrir une fenetre qui me demande si je veux lancer un nouveau masque! En repondant oui, cela execute le code "Set uidoc = workspace.composeDocument( "", "", "Adherent_Notes'")".Mais une erreur s'affiche a l'execution de cette ligne (ci dessus).L'erreur est :"document non valide ou inexistant" puis une autre erreur"unable to find Document Windows"Le masque existe (verifié plusieurs fois) et j'ai deja essayé de renseigner le nom de la base et du serveur, mais rien ne change, toujours les memes erreursPetite precision, le script se trouve dans une "Query Close"Voici le code complet!Merci d'avance a la personne qui m'aidera car j'en ai ras .....Sub Queryclose(Source As Notesuidocument, Continue As Variant)Dim workspace As New NotesUIWorkspaceDim db As NotesUIDatabaseDim doc As notesdocumentDim doc1 As notesdocumentDim uidoc As notesuidocumentSet db = workspace.CurrentDatabase Set uidoc = workspace.CurrentDocument'Set doc = uidoc.DocumentIf uidoc.IsNewDoc Then If workspace.Prompt(PROMPT_YESNO, _"Fiche Adherent ?", "Voulez vous creer une fiche adhérent tout de suite ?", "", "")=1 Then Set uidoc = workspace.composeDocument( "", "", "Adherent_Notes'")' evaluate("@Command([Compose]; "Adherent_Notes"")End If End Ifend subCIaooooooooooOlivier I

BonjourJ'ai repris ton code avec un debugger je j'ai le même rejet que toi par contre il y a une apostrophe à la fin de Adherent_Notes avant le guillemet et lorsque je la supprime j'arrive a ouvrir le masque que j'ai appelé Adherent_Notes.es ce que c'est exactement ton code ou une faute de frappe ?