J Lorio 30.Aug.09 02:10 PM a Web browser Notes Client6.5.3 FP2Windows XP
I am trying to get a variable view selection, selecting only documents containing a date between two dates. So far that is working fine, but I need to expand the formula to select only documents created with a specific form. This is what I already used from a view button but the formula selects document created with several forms.
Sub Click(Source As Button)
Dim uiw As New NotesUIWorkspace
Dim uiview As NotesUIView
Dim uidoc As NotesUIDocument
Dim view As NotesView
Dim one As String
Dim two As String
Dim doc As NotesDocument
Dim formula As String
doc.Form = "Finance"
one=uiw.Prompt(Prompt_OKCANCELEDIT,"Geef de start datum in","Start Datum (DD/MM/YYYY) ","")
two=uiw.Prompt(Prompt_OKCANCELEDIT,"Geef de eind datum in","Eind Datum (DD/MM/YYYY) ","")
formula = | SELECT datum > [| & one & |] & datum < [| & two &|] & doc.Form = doc |
Set uiview =uiw.CurrentView
Set view =uiview.View
view.SelectionFormula = formula