LOTUSSCRIPT /COM/OLE のクラス
例:FTSearchScore プロパティ
1. 次のスクリプトは、現在のデータベースの [By Category] ビューで全文検索を実行します。スクリプトはビューの最初の文書の検索結果数を取得して、変数 score に入れます。たとえば、FTSearchScore は 80 を返します。
Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim doc As NotesDocument
Dim score As Integer
Set db = session.CurrentDatabase
Set view = db.GetView( "By Category" )
Call view.FTSearch( "blue", 0 )
Set doc = view.GetFirstDocument
score = doc.FTSearchScore
2. 次のスクリプトは現在のデータベースを全文検索して、検索結果数が 90 を超える文書をフォルダに配置します。
Dim session As New NotesSession
Dim db As NotesDatabase
Dim collection As NotesDocumentCollection
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set collection = db.FTSearch( "blue", 0 )
Set doc = collection.GetFirstDocument()
While Not(doc Is Nothing)
If ( doc.FTSearchScore > 90 ) Then
Call doc.PutInFolder( "Blue documents" )
Set doc = collection.GetNextDocument(doc)
End If
Wend
関連項目
FTSearchScore プロパティ
用語集
フィードバック
ヘルプ
または
プロダクトユーザビリティ
ヘルプの使い方
すべてのヘルプ項目
用語集