Document Profile et Dialog Box
Publié: 06 Sep 2012 à 13:51Bonjour,
J'ai créé un "Form" qui doit me servir a crééer un document profile.
Si j'utilise le "Form" sans le charger dans une boite de dialogue, le document profile est bien créé.
Par contre, pour rendre l'application plus "Pro", je veux accèder à ce "Form" et donc créer le document profile, à l'aide d'une boite de dialogue.
C'est là que le problème arrive. Le "Form" s'ouvre bien dans la boite de dialogue mais aucun document profile n'est créé lorsque je valide la saisie des informations rentrées.
Merci à ceux qui peuvent m'apporter leur aide.
Voici le code utilisé :
Sub Click(Source As Button)
Dim ws As New NotesUIWorkspace
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set doc = db.GetProfileDocument("Setup")
Call ws.DialogBox ("Setup", False, False , True , True , True, False , "Application Setup" , doc ,True , True, False)
End Sub
J'ai créé un "Form" qui doit me servir a crééer un document profile.
Si j'utilise le "Form" sans le charger dans une boite de dialogue, le document profile est bien créé.
Par contre, pour rendre l'application plus "Pro", je veux accèder à ce "Form" et donc créer le document profile, à l'aide d'une boite de dialogue.
C'est là que le problème arrive. Le "Form" s'ouvre bien dans la boite de dialogue mais aucun document profile n'est créé lorsque je valide la saisie des informations rentrées.
Merci à ceux qui peuvent m'apporter leur aide.
Voici le code utilisé :
Sub Click(Source As Button)
Dim ws As New NotesUIWorkspace
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set doc = db.GetProfileDocument("Setup")
Call ws.DialogBox ("Setup", False, False , True , True , True, False , "Application Setup" , doc ,True , True, False)
End Sub