Domino 9 und frühere Versionen > Entwicklung

von bis Datum alle Docs

<< < (2/5) > >>

ata:
... die Syntax des db.Search funktioniert wie folgt

Dim session As New NotesSession
Dim dbThis As NotesDatabase
Dim dc As NotesDocumentCollection
Dim sdt As New NotesDateTime("01/01/1990")
Sim sSearch As String

Set dbThis = session.CurrentDatabase
sSearch = {SELECT Form = "DeineMaske"}
Set dc = dbThis.Search( sSearch , sdt , 0 )
' # ... liefert alle Dokumente mit deiner Maske...

... die Suchformel funktioniert in Formelsprache
... ich verwende mittlerweile gescheifte Klammern für die Suchformel, so kannst du ganz normal mit Anführungszeichen, Pipe und AmperSand arbeiten, wie gewohnt

ata

robertpp:
und wie geht das jetzt wenn ich alle docs zwischen zwei datümer brauche?
robertpp

ata:
... so auf die schnelle...


--- Zitat ---' # Anhand des Feldes "TargetDate" in einer Maske "Job" Dokumente einschränken   
   Dim ws As New NotesUIWorkspace
   Dim docThis As NotesDocument
   Dim dbThis As NotesDatabase
   Dim sdt As New NotesDateTime("01/01/1990")
   Dim sSearch As String
   Dim dc As NotesDocumentCollection
   
   Set docThis = ws.CurrentDocument.Document
   Set dbThis  = docThis.ParentDatabase
   sSearch = {SELECT Form = "Job" & ( TargetDate >= [01/03/2003] ) &  ( TargetDate < [01/04/2003] )}
   Set dc = dbThis.Search( sSearch , sdt, 0)
   MsgBox Cstr(dc.Count) + " Dokumente..."
--- Ende Zitat ---

ata

robertpp:
Hallo ata
Ich möchte das ganze von einer Ansicht aus machen!

dh. ich stehen in einer Ansicht möchte auf einen Button klicken wo ich dann das vondatum und  bisdatum eingeben kann und die gefundenen dann zb in eine DocColl.
ich hab das ganze jetzt mal so abgeändert:

   Dim s As New NotesSession
   Dim ws As New NotesUIWorkspace
   Dim doc As NotesDocument
   Dim db As NotesDatabase
   Dim sdt As New NotesDateTime("01/01/1990")
   Dim view As NotesView   
   Dim sSearch As String
   Dim dc As NotesDocumentCollection
   Set db= s.CurrentDatabase   
   Set view=db.GetView("Massnahme")
   Set doc = view.GetFirstDocument
   
   
   sSearch = {SELECT Form = "task" & ( Erledigtam >= [18/03/2003] ) &  ( Erledigtam < [25/04/2003] )}
   Set dc = db.Search( sSearch , sdt, 0)
   Msgbox Cstr(dc.Count) + " Dokumente..."   

nur wie mach ich dass das datum über felder variabel ist!!!
Ich mach mir eine Dialogbox mit einer maske mit vondatum und bisdatum aber weiter weiß ich nicht!

danke robertpp

ata:
... das macht so noch keinen Sinn. Du ziehst eine View, holst das erste Dokument und dann passiert was völlig anderes...

... beschreib' mal, was du tatsächlich machen willst. Am Anfang war das "... die Dokumente zwischen 2 Datumswerten" - jetzt kommt  eine Ansicht ins Spiel. Was für eine Rolle spielt denn die Ansicht?

... du willst das Datum dynamisch eingeben. Welche Vorstellung hast du über das User Handling - 2 Werte heißt 2 mal InputBox - ansonsten mußt du dir eine Dialogbox bauen - oder ist ein Wert Fix - zum Beispiel das heutige Datum...

... benötigst du nur die Anzahl der Dokumente - möchtest du mit den Dokumenten noch was machen...

... von daher die Bitte - fass das mal konkreter... ;)

ata

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete