Dialogue box!!!
Bonjour,
Durant la création automatique d'un compte Lotus, je dois vérifier si le (nom , prenom) existe déjà dans la base names.nsf
Si oui, j'affiche une boite de dialogue à l'acteur pour modifier le prénom du l'utilisateur dans un champ de la boite de dialogue.
mais quand j'affecte le prénom de l'utilisateur dans le champ de boite de dialogue, ça n'affiche rien.
Voilà le code que j'ai utlisé :
Quand je vérifie, je trouve que le nom et prenom contiennent des valeurs mais ils n'ont pas affecté aux champs de boite de dialogue.
Le code est correct mais il reste quelques qui cloche!!
Des idées?!
Durant la création automatique d'un compte Lotus, je dois vérifier si le (nom , prenom) existe déjà dans la base names.nsf
Si oui, j'affiche une boite de dialogue à l'acteur pour modifier le prénom du l'utilisateur dans un champ de la boite de dialogue.
mais quand j'affecte le prénom de l'utilisateur dans le champ de boite de dialogue, ça n'affiche rien.
Voilà le code que j'ai utlisé :
- Code : Tout sélectionner
sKey = nom + " , "+ prenom
' Vérif que le nom n'existe pas déjà dans le NAB
If Not (verifdoublonnames Is Nothing) Then
Set dlgDoc = db.CreateDocument ()
workspace.DialogBox "(DlgFullNames)", True,True,True,False,False,False,"Lotus Notes",dlgDoc,True,True
Set item1 = dlgDoc.Replaceitemvalue("nom", nom)
Set item2 = dlgDoc.Replaceitemvalue("prenom", prenom)
'''Error ERROR_USEREXIST, docsettings.userexist(0) & " (" & sKey & ")"
End if
Quand je vérifie, je trouve que le nom et prenom contiennent des valeurs mais ils n'ont pas affecté aux champs de boite de dialogue.
Le code est correct mais il reste quelques qui cloche!!
Des idées?!