Sup toutes vues privées en Admin avec un agent

[chrysy]

Bonjour à tous,

J'ai un problème assez conséquent pour ma mission.

Je travaille sous Lotus 8.5.3, et j'ai crée des vues privées pour chaque utilisateur. [ Vue partagé, devenant privé à la 1ere ouverture]
Un utilisateur pourra voir sa vue directement lorsqu'il clique sur la vue dans la base.

J'ai crée un agent "Sup vues privées" pour que l'administrateur puisse supprimer toutes les vues engendrées par les différents utilisateurs.

Evidemment, j'ai déjà vu un problème presque similaire [Sujet: Problème avec une Vue privée par JCAT] mais il n'a pas été d'une grande aide pour mon cas.

J'ai utilisé le code donné par IBM:

Code : Tout sélectionner

Sub Initialize

    Dim session As New NotesSession
    Dim db As NotesDatabase
    Set db = session.CurrentDatabase
    Forall vw in db.Views
        If (vw.Name="My View") AND (Not(Isempty(vw.Readers))) Then
            Call vw.Remove End If End Forall

End Sub

Il fonctionne si on se connecte sur l'ID de chaque utilisateur pour ses propres vues privées, mais pas en tant qu'admin (ou concepteur) qui désire supprimer toutes ces vues privées sans à avoir à se logger sur l'ID de chacun.
Je veux pas en desktop mais en serveur.

J'éspère que j'ai été assez clair

[Michael DELIQUE]

salut

ce sont des vue privé, desktop ou serveur ?

[chrysy]

Bonjour Michael,

ce sont des vues privées coté serveur!
j'ai essayé le code que tu as donné dans l'autre topic, mais ca fonctionne pas et il est trop complexe par rapport à mon utilisation.

Mon code fonctionne pour chaque utilisateur pour ses propres vues privées mais pas pour l'admin pour toutes les vues privées de tous les utilisateurs

[Michael DELIQUE]

ce sont des vues privées... inaccessibles par les autres utilisateurs (même admin).

[Michael DELIQUE]

peut être en "full admin" mais je suis pas certain

[chrysy]

Oui justement, ca je le sais!
Mais il me semble qu'on peut à travers un agent supprimer les vues privées des utilisateurs, non?

Il y a t-il un moyen de le faire sans avoir à passer du temps à se connecter sur chaque pour réaliser la suppression?

[Michael DELIQUE]

pas que je sache.

généralement la solution utilisé est de supprimé automatiquement la vue privé de l'utilisateur a l'ouverture ou la fermeture de la base.

[chrysy]

J'ai fait la suppression de la vue privée à la fermeture de la base.
Le script est dans le "Script de la base" (QueryClose).
Apparemment cela fonctionne en LCA,en accès Editeur avec l'option coché:"Créer dossier/vue perso"

Du côté de l'accès Auteur, en cochant la même option, cela fonctionne à 80% (deux-trois vues sur 4).
Il y a donc un bug, mais comment le résoudre? cela me crée des vues fantômes, sans signatures de l'utilisateur.