Hi, das geht relativ einfach (allerdings erst seit Notes 8.0 oder 8.5).
... Dialog öffnen mit Einstellungen etc.
Call workspace.Urlopen(myUIView.view.Notesurl+"&Query=" + dlgDoc.Suchformel(0)) ' @URLEncode("UTF-8"... erfolgt im Dialog
dlgDoc.Suchformel landet dann einfach im Query-Feld der Ansicht. Auf Optionen kann man leider nicht zugreifen.
Ich habe in meinem Dialog dann folgende Formel für das Feld "Suchformel".
Damit kann ich "Suchbegriffe" im "Suchbereich" body, bodyUndFiles oder komplett suchen.
Ausserdem bestimmt "nurWort" ob ganze Wörter gesucht werden.
begriffe := @Trim(@Explode(Suchbegriffe;" ,."));
begriffe := @If(nurWort="1";"\"" + begriffe + "\""; "\"*" + begriffe + "*\"");
suche := @If(
Suchbereich="body";
"([Body] CONTAINS " + @Implode(begriffe;") AND ([Body] CONTAINS ")+")";
Suchbereich="bodyUndFiles";
@Implode(@Transform(begriffe; "ele"; "(([Body] CONTAINS " + ele +") OR ([$File] CONTAINS " + ele +"))"); " AND ")
@Implode(begriffe;" AND "));
@Text(@If(Suchbegriffe="";"";@URLEncode("UTF-8";suche)))
Gruß
Roland