Domino 9 und frühere Versionen > ND8: Entwicklung

Notesgruppen (names.nsf) eines Users auslesen

<< < (2/2)

Driri:
Da wäre mir nichts bekannt. Das wirst Du vermutlich selber als Script programmieren müssen.

pram:
Es geht (bedingt*) mit LS2J

--- Code: ---UseLSX "*javacon"
Sub Initialize
On Error GoTo handle
Dim jSession As New JavaSession
Dim nSession As New NotesSession
Dim db As NotesDatabase
Set db = nSession.Currentdatabase

Dim serverClass As JavaClass
Dim dominoServer As JavaObject

Set serverClass = jSession.Getclass("lotus.notes.addins.DominoServer")
' create DominoServer Object for current server
Set dominoServer = serverClass.Createobject("(Ljava/lang/String;)V", db.Server)

Dim namesCollection As Javaobject

' create Collection<String> for current user
Set namesCollection = dominoServer.getNamesList(nSession.Effectiveusername)
MsgBox namesCollection.toString()
Exit Sub
handle: MsgBox "Error " & Error & " in line " & Erl
Exit sub
End sub

--- Ende Code ---

* Leider wird das Charset-Encoding irgendwo vermurkst, so dass Gruppen mit Sonderzeichen/Umlauten nicht korrekt zur?ck gegeben werden.
(Weiterhin ist in vielen JVM-Patches der letzten Zeit die LS2J Ansteuerung nicht möglich. Man kann keine Konstruktoren mit Parameter aufrufen)

Gruß
Roland

Pyewacket:
Im names.nsf des Servers gibt es eine View ($ServerAccess).
Dort sind, kategorisiert nach Namen im Canonical Format, alle Gruppen
aufgelistet in welchen der User direkt eingetragen ist. Verschachtelte Gruppen
werden nicht berücksichtigt.

Navigation

[0] Themen-Index

[*] Vorherige Sete