Autor Thema: Löschen von Haupt- und Antwortdokumenten  (Gelesen 4579 mal)

Offline iukhdh

  • Senior Mitglied
  • ****
  • Beiträge: 498
  • Geschlecht: Männlich
  • To be or notes to be, this is the question
Löschen von Haupt- und Antwortdokumenten
« am: 22.03.07 - 12:29:00 »
Hallo,

in dem Code unter Punkt 3.9 bei der Anleitung "Das Arbeiten mit Haupt- und Antwort-Dokumenten" ist ein Fehler drin. Da muss m.E. noch die rot angemarkte Zeile mit rein.

Zitat
Sub Postdocumentdelete(Source As Notesuidatabase)
   Dim doc As NotesDocument   
   Dim collection As NotesDocumentCollection
   Set collection = Source.Documents
   
   If collection.Count > 0 Then
      For i = 1 To collection.Count
         Set doc = collection.GetNthDocument(i)
         Call DeleteResponseDocs(doc)
         Call doc.Remove(True)
      Next  'For i = 1 To collection.Count 
   End If  'If collection.Count = 0 Then
End Sub

Ich möchte aber nicht versäumen mich für diese Abhandlung zu bedanken, hilft mir ausserordentlich.

Thomas
« Letzte Änderung: 22.03.07 - 12:31:32 von iukhdh »
Thomas von der IuK

Offline Axel

  • Moderator
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 8.658
  • Geschlecht: Männlich
  • It's not a bug, it's Notes
Re: Löschen von Haupt- und Antwortdokumenten
« Antwort #1 am: 22.03.07 - 21:07:07 »
Yoo, du hast recht. Ich hab's geändert. Vielen Dank für den Hinweis.


Axel
Ohne Computer wären wir noch lange nicht hinterm Mond!

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz