Domino 9 und frühere Versionen > Entwicklung

Wie kann man Profildokumente löschen?

<< < (3/4) > >>

doliman:
Hi,
evtl. auch so????

   Dim session As New NotesSession
   Dim db As NotesDatabase
   Dim doc As NotesDocument
   Set db = session.CurrentDatabase
   Dim NDC As notesDocumentCollection
   Set NDC = db.GetProfileDocCollection( "Profile_Formulare" )
   for i=1 to ndc.count
       Set doc = NDC.getnthdocument(i)
       if Not (doc Is Nothing) then
           If doc.isprofile Then
              Call doc.remove(True)
           End If
       end if
  next

müsste auch tun.

eknori:
Klar, viele Wege führen bekanntlich nach Rom. Aber wenn eine Klasse schon mal eine Methode zum Entfernen ALLER Dokumente des Objektes bietet, sollte man diese auch nutzen.
Da haben sich die Programmierer schon solche Mühe gegeben.... ;D

doliman:
Hi,

vollkommen richtig!!

eknori:
Laß uns doch mal eine Lösung für Notes 4.x finden.
da gab es nämlich die GetProfileDocCollection Methode noch nicht...

doliman:
Hi,

mit 4.x kenne ich mich nicht so aus!!!
Aber mit Deiner Hilfe können wir das bestimmt bewältigen.
 :D

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete