drucken von ausgewählten dokumenten

  • Hallo.....


    ich möchte eine Auswahl von Dokumenten ausdrucken.
    Bisher kann ich das nur mit einem geöffneten Dokument machen.


    Sub Initialize
    Dim ws As New NotesUIWorkspace
    Dim uidoc As NotesUIDocument
    Dim doc As NotesDocument

    Set uidoc = ws.CurrentDocument
    Set doc = uidoc.Document

    uidoc.Print(1)


    End Sub



    Bisher habe ich schonmal herausbekommen, das ich zwar ein
    NotesUIDocument ausdrucken kann, aber nur das "NotesDocument"
    als Collection bekomme.


    wie macht man dann dort eine Verbindung?
    bzw konkret: wie druckt man alle Dokumente einer Ansicht aus?

  • hi,


    in einer älteren n4-datenbank löse ich das problem per folgender formel:


    @Command([FilePrint] ; "" ; "" ; "" ; "" ; "" ; "" ; "pagebreak" ; "" ; ""; "")


    das druckt alle markierten docs nacheinander aus.


    ich weiss nicht, obs in 6 schon was komfortableres gibt.
    per script wird es glaube ich immer noch schwierig, aus dem backend vernünftig zu drucken.


    gruss, freddy

  • hallo......
    das geht prima was du da nutzt. Hab es auch gleich ausprobiert.


    in Lotusscript in der Hilfe habe ich es mal mit notesUIView probiert


    Sub Initialize
    Dim workspace As New NotesUIWorkspace
    Dim uiview As NotesUIView
    Set uiview = workspace.Currentview
    Call uiview.Print
    End Sub




    das geht auch..aber erst ab version 5 (wir haben 6 :-))


    Ich hatte nur die Vorstellung das man mit jedem Dokumentvor dem druck noch etwas machen kann (zb etwas mit dem attachment)


    in dieser version übergibt er ja alles einer Funktion..ohne das man eingriffsmöglichkeiten dazwischen hat. ich dachte da an sowas wie eine WHILE/WEND schleife oder sowas....

  • hi taurec,


    gibt' s da noch die magische 9er grenze ?


    mam musste ja unter 4 mit einem timer-objekt dafür sorgen, dass notes zeit genug hatte, das uidoc.close auszuführen, damit nie mehr als 9 fenster offen waren.


    ich meine, unter 6 ist es aufgehoben, aber wie sieht der workplace aus, wenn du 500 dokumente druckst ? :)


    gruss, freddy

  • Also wenn Du die Dokumente mit der Standardmaske drucken willst, ist es sehr einfach.


    Erstelle eine neue Aktion und pack sie in die View:


    @Command([FilePrint] ; "" ;"" ; "" ; "" ; "" ;"MASKENNAME" ; "" ; "" ; ""; "")


    Dies bewirkt das alle markierten Dokumente auf dem Standarddrucker ausgegeben werden. Maskenname ist einfach der Name der Eingabemaske. Möchtest Du die Dokumente anders designed ausdrucken, erstellst Du Dir dafür eine neue Maske (mit identischen Feldnamen) und gibst diese als Maskenname an.


    Hoffe geholfen zu haben.


    MfG Michael


    PS: Die anderen Optionen von [FilePrint] kannst Du auch in der Hilfe nachlesen :)

    Man muss nicht alles wissen, man muss nur wissen wo es steht.