Alle Personen und Untergruppen einer Gruppe aus NAB auslesen

[Don Pasquale]

Ich glaube, damit habe ich meine Aufgabe umrissen
Alle Personen und Untergruppen einer Gruppe aus NAB auslesen

Wenn eine Gruppe nur aus Personen besteht, kein Problem, aber
was ist wenn diese Gruppe aus anderen Gruppen besteht ?

   Dim nd_db As notesdatabase
   Dim g_doc As notesdocument
   Dim flag As Variant
   Dim server As String
   Dim ename As String
   Set db = session.currentdatabase
   server = db.server
   Set nd_db = New notesdatabase("","")
   flag = nd_db.open(server, "names.nsf")
   Set view = nd_db.getview("Groups")
   Set g_doc = view.getdocumentbykey(entry.name, True)
   Forall X In memfield
      ename = X
   End Forall


Ciao
Don Pasquale

[Marinero Atlántico]

Rekursion.
Keine Zeit.
Vielleicht heute abend.
Jemand anders 

[animate]

da gibts was auf der Seite von Forumsmitglied elajen: http://www.langner-e.de/ unter Notes/Domino\Entwicklung\Codeschnipsel