Page 1 sur 1

Agent de suppression

MessagePublié: 21 Avr 2010 à 17:01
par AlexandreV
Bonjour,
j'étudie la possibilité d'avoir un agent planifié qui supprimerait la boite mail ainsi que la fiche personne des collaborateurs ayant quitté définitivement l'entreprise.

Normalement, je peux utiliser la méthode NotesDatabase.MarkForDelete( ) ce qui permet d'etre sur que la base n'est plus utilisée au moment ou elle sera supprimée. Je sais que je dois exécuter ce code sur tous les serveurs qui contiennent une réplique de cette base.

Seulement, je voudrais également supprimer l'utilisateur dans le carnet d'adresse. Or, je ne sais pas si cela est possible de créer une requete dans admin4.nsf demandant la suppression du user... Si cela est possible, il serait envisageable de creer cette requete en indiquant qu'on souhaite également supprimer la base et les repliques comme c'est proposé quand on passe par Administrator...

Qu'en pensez vous ?

Merci par avance.

MessagePublié: 21 Avr 2010 à 22:33
par roubech
pour créer des requêtes AdminP en LS il faut regarder la class NotesAdministrationProcess
http://publib.boulder.ibm.com/infocente ... DMINP.html
aide a écrit:[syntax="LotusScript"]Sub Initialize
Dim session As New NotesSession
Dim ws As NotesUIWorkspace
Dim adminp As NotesAdministrationProcess
Dim userName as Variant
Set adminp = _
session.CreateAdministrationProcess("myServer/northeast")
userName = ws.Prompt(PROMPT_OKCANCELEDIT, _
"User", Enter the hierarchical name of the user to delete")
Call adminp.DeleteUser(userName, False, MAILFILE_DELETE_ALL, _
"", False)
End Sub[/syntax]

MessagePublié: 22 Avr 2010 à 08:30
par AlexandreV
Merci roubech!