Script: Ordner einer Benutzergruppe zur Ansicht anfügen
Inhalt
Fügt einen bestehenden Root-Ordner der aktuellen Benutzergruppe zur Ansicht an. Der entsprechende Root-Ordner muss über den Ordnernamen angegeben werden.
Möchten Sie dafür einen neuen Ordner verwenden, nehmen Sie dafür das Script Neuen Rootordner erzeugen
Möchten Sie einen Ordner aus der Ansicht entfernen, verwenden Sie das Script Ordner aus Ansicht entfernen
Version
Ab Vertec Version 5.0 (verwendet die Variablen vertec und argobject).
Ausführen
Das Script muss auf der Benutzergruppe ausgeführt werden, die den Ordner zur Ansicht erhalten soll.
Script
dim gruppe
dim ordnerlist
dim ord
set gruppe = Vertec.ArgObject
if gruppe.isOfType("BenutzerGruppe") then
ordname = _
InputBox("Geben Sie den Namen für den Ordner an")
set ordnerlist = _
Vertec.Eval("ordner->select(bezeichnung='"_
& ordname & "')")
if ordnerlist.count <> 1 then
msgbox "Es wurden entweder keine oder mehrere "_
&"Ordner mit der angegebenen Bezeichnung "_
&"gefunden. Der Vorgang wird abgebrochen."
else
set ord = ordnerlist.objects(0)
gruppe.member("persrooteintraege").add ord
end if
else
msgbox "Dieses Script muss auf einer "_
&"Benutzergruppe ausgeführt werden."
end if
| erstellt: | 17.02.2004 |
|---|---|
| geändert: | 14.05.2007 |
