Dokument aus Ansicht lesen

[skywook]

Als erstes möchte ich einmal ein dickes Lob an diese Forum geben. Ohne die Tipps hätte ich manchmal sehr Alt ausgesehen.

Aber ich brauche nocheinmal eure Hilfe. Ich möchte gerne auf das ausgewählte Dokument einer Ansicht zugreifen und mir einen Feldwert ausgeben. In meinem Script weiss ich aber leider nicht mehr weiter:

Dim Ansicht2 As NotesView
Dim Dokument2 As NotesDocument    
Set Ansicht2 = Datenbank.GetView("GebuchtHeute")  

wie spreche ich jetzt das ausgewählte Dokument an?
und gebe mir einen Feldwert aus?

[Semeaphoros]

Schau Dir in der Hilfe die Methode

NotesDatabase.UnprocessedDocuments

an, da steht drin, wies geht

[TMC]

Z.B. so:

Code

Dim session As New NotesSession
Dim db As NotesDatabase
Dim collection As NotesDocumentCollection
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set collection = db.UnprocessedDocuments
Set doc = collection.GetFirstDocument
   
While Not(doc Is Nothing)
   'Hier gibst Du den Code für das erste markierte Doc ein.......

   'Sollen noch weitere Docs behandelt werden, die auch noch ausgewählt sind,
   'dann wird mit folgendem Set das nächste Doc genommen......
   Set doc = collection.GetNextDocument(doc)
Wend

HTH,
Matthias

[skywook]

Komm leider nicht ganz klar.
Hätte jemand ein Beispiel in dem in der Ansicht "AlleGebucht" bei dem aktuell markierte Dokument ein Feldwert ausgegeben wird.

[TMC]

Nimm exakt meinen Code.

dann halt unter die Zeile
'Hier gibst Du den Code für das erste markierte Doc ein.......

folgende Zeile:

msgbox doc.DEINFELD(0)

Statt "DEINFELD" übernimmst Du den Namen des gewünschten Feldes.....

[skywook]

springt der Zeiger mit Set doc = collection.GetFirstDocument
nicht zum ersten Dokument in der Ansicht?

[Semeaphoros]

Die UnprocessedDocuments enthalten nur die ausgewählten Dokumente und nicht die gesamte Ansicht.

Ich kann nur wiederholen: Lies die Hilfe zum Thema, wie ich oben schon empfohlen habe. Ohne zu wissen, wie Notes das handhabt, wirst Du nur im Trüben fischen. Es nützt Dir nicht sehr viel, wenn TMC Dir den Code schreibt und Du begreifst nicht, was passiert.

[TMC]

Schau mal in die Designerhilfe nach UnprocessedDocuments, hat ja Jens oben auch schonmal gepostet.

Man nehme eine Ansicht. Du hast z.B. 17 Dokumente markiert.

Notes kann ja jetzt nicht wissen welches Dok Du behandeln wirst.
Daher eben

Set collection = db.UnprocessedDocuments
Set doc = collection.GetFirstDocument

Notes nimmt da das erste markierte Dokument: "GetFirstDocument"

[skywook]

Danke, jetzt habe ichs verstanden. Habe die Hilfe gelesen, leider ist mein Englisch nicht sehr gut um alles genau zu verstehen. Bin leider noch ein Frischling.

Meine Scripte sind jetzt fertig. Ich habe ein Script das mir in der Maildatenbank bei jeder Neuanlage oder einer Veränderung eines Kalendereintrages, gewisse Felderwerte in eine zweite Datenbank schreibt bzw. abgleicht. Beim Löschen eines Dokumentes wird auch das "KopieDokument" in der anderen Datenbank gelöscht. Diese Scripte führe ich derzeit noch manuell aus. Nun stellt sich die Frage wo ich diese in der Maildatenbank einfüge. ImQueryClose der Kalendermaske steht schon ein Script. Kann ich meines einfach anfügen. Oder muss ich dies über use aufrufen. Für eine Hilfe wäre ich nocheinmal sehr dankbar.