NotesDominoQuery (LotusScript)

Dim refDsgnCat as Boolean
refDsgnCat = dquery.RefreshDesignCatalog

Explain または Execute を使用してクエリを処理する前に、データベースの全文索引を更新するように DQL に指定します。

データ型

Boolean

デフォルトは False です。

構文

Dim refFT as Boolean
refFT = dquery.RefreshFullText

dquery.RefreshFullText = True

 Dim refFT as Boolean refFT = dquery.RefreshFullText
To set: dquery.RefreshFullText = True

使用法

このプロパティを使用すると、リソースの使用や時間がかかりますが、クエリ処理の前に最新の更新が全文索引に反映されることが保証されます。

RefreshViews プロパティ

Dim refviews as Boolean
refviews = dquery.Refreshviews

dquery.Refreshviews = True 

Dim secs as Integer
secs = dquery.Timeoutsec

dquery.Timeoutsec = 1000

NotesDominoQuery CreateIndex(String IndexName, Variant Field, Optional Boolean Isvisible, Optional Boolean Nobuild)

IndexName

Field

Isvisible

Nobuild

Dim IndexName As String
    Dim FieldName As Variant

    Dim Session As New NotesSession
    Dim db As NotesDatabase
    Dim TheQuery As NotesDominoQuery
    Set db = Session.CurrentDatabase
    Set TheQuery = db.Createdominoquery()
    IndexName = "idx1"
    FieldName = "order_status"
    ' Create the index, default the options
    Call TheQuery.CreateIndex(IndexName, FieldName)

Dim Query As String
Dim db As NotesDatabase 
Dim TheQuery As NotesDominoQuery
Dim doccol As NotesDocumentCollection
Dim ResultName As String
Dim ExpireHours As Long
Dim Session As New NotesSession
Set db = Session.getdatabase("", "my.nsf")
Set TheQuery = db.Createdominoquery()
Query$ = "firstname = 'Annabelle' and lastname = 'Stevens' and 'Personview'.dept = 'Sales'"
ResultName = "MySavedResults"
ExpireHours = 72
' Runs the query, returns results in doccol and saves them for future reference (DQL in clause) 
' in "MySavedResults", a named set of documents that will be deleted by updall in 72 hours
Set doccol = TheQuery.Execute(Query$, ResultName, ExpireHours)

設定されたパラメータに従って渡されたクエリ文字列を実行し、クエリがどのように実行されたかを示す説明の文字列を返します。

構文

Set explainstring = NotesDominoQuery.Explain(Query$)

パラメータ

Query$

文字列。DQL 構文のクエリ。

戻り値

String

explain 出力を理解して操作するには、「 explain 」を参照してください。

例

Dim Query$ as String
Dim ExplainString as String
Dim NotesDatabase db
Dim TheQuery As NotesDominoQuery
Set db = Session.Getdatabase("my.nsf")
Set TheQuery = db.Createdominoquery()
Set Query$ = "firstname = 'Annabelle' and lastname = 'Stevens' and 'Personview'.dept = 'Sales'"
Set ExplainString = TheQuery.Explain(Query$)

相互参照

explain メソッド (DominoQuery - Java)

Dim Query$ as String
Dim ParseString as String
Dim NotesDatabase db
Dim TheQuery As NotesDominoQuery
Set db = Session.Getdatabase("my.nsf")
Set TheQuery = db.Createdominoquery()
Set Query$ = "firstname != 'Annabelle' and lastname = 'Stevens and 'Personview'.dept = 'Sales'"
Set ParseString = TheQuery.Explain(Query$)

DQLクエリ用語に最適化されたビュー索引を削除します。RemoveIndex は実稼働ビューも削除できます。削除するビュー索引の選択には注意してください。

構文

NotesDominoQuery RemoveIndex(String IndexName)

パラメータ

IndexName

削除するインデックスの名前。

インデックス名で括弧を省略し、同じ名前の表示可能なビューがない場合、非表示のビューを削除します。例えば、「myview」と「(myview)」が存在する場合、「myview」は「myview」のみを削除します。しかし、「(myview)」のみが存在する場合、「myview」は「(myview)」を削除します。インデックス・ビューには、データベース内の他のビューとは異なる名前を付けることをお勧めします。

戻り値

なし

例

 Dim IndexName As String
    Dim FieldName As Variant
    
    Dim Session As New NotesSession
    Dim TheQuery As NotesDominoQuery
    Dim db As NotesDatabase

    Set db = Session.CurrentDatabase
    IndexName = "idx1"
    ' Remove the index
    Call TheQuery.RemoveIndex(IndexName)

相互参照

RemoveIndex メソッド (DominoQuery - Java)

RemoveNamedResult メソッド

NotesDominoQuery.RemoveNamedResult(ResultName$)

ResultName$

Dim Query$ as String
Dim lastname$ as String
Dim NotesDatabase db
Dim TheQuery As NotesDominoQuery
Dim doccol As NotesDocumentCollection
Set db = Session.Getdatabase("my.nsf")
Set TheQuery = db.Createdominoquery()
TheQuery.Setnamedvariable("lastname", "Stevens")
Set Query$ = "firstname" != 'Annabelle' and lastname = "lastname"
Set doccol = TheQuery.Execute(Query$)
…
TheQuery.Resetnamedvariables()
TheQuery.Setnamedvariable("salary", 55000)
TheQuery.Setnamedvariable("department", "Sales")
Set Query$ = "salary >= "salary and department = "department"
Set doccol = TheQuery.Execute(Query$)

SetNamedVariable メソッド

Dim Query As String
Dim lastname As String
Dim db As NotesDatabase
Dim TheQuery As NotesDominoQuery
Dim doccol As NotesDocumentCollection
Dim Session As New NotesSession
Set db = Session.Getdatabase("", "my.nsf")
Set TheQuery = db.CreateDominoQuery()
REM Note - substitution variable names are case sensitive.  
REM Maximum subsitution variable name length is 16 bytes
Call TheQuery.Setnamedvariable("lastname", "Stevens")
Query = "firstname != 'Annabelle' and lastname = ?lastname"
Set doccol = TheQuery.Execute(Query$)