付録A.2 文章による検索

文章による検索プログラムの作成例を次に示します。

' CreateObjectによって,Bibliotheca21 Standardのサーバコンポーネントインスタンスの作成
' TS2connectによって,サーバへ接続
' TS2MSTARTによって,データベース使用開始宣言
' szConceptCondにTS2MCONCEPT関数の検索条件式を設定
' szConditionにTS2MCONCEPT関数の検索オプションを設定
lRc = sg_Bib21TS.TS2MFIND( szConceptCond, _
                          szCondition, _
                          lBaseID, _
                          lResultID, _
                          lHitNum, _
                          lFlag, _
                          lDispCnt, _
                          lSeedCnt, _
                          nlTermCnt, _
                          nlTerm, _
                          nlTermScore )

If lRc < 0 Then
 ' エラー処理
End If