请各位指点！！！！

[xw0312]

不知到谁能够提供一段按关键字搜索文档的代码.在域中填写关键字，可以搜索出与此关键字相关的所有文档

[kingwgh]

用db.Search()方法吧

[xw0312]

搜索的字符串怎么样做到模糊匹配查找或者衍生查找？？？能不能给出详细点的代码

[jimmyvk]

Dim tmpString as string
Dim docset As notesdocumentcollection
tmpString=tmpString+" and Field XXX contains "+doc.aa(0) '查询跟包含aa域输入值相同的文档
doc.searchstring=tmpString
Set docset=db.Ftsearch(doc.searchstring(0),0)