求教:关于全文检索的匹配方式?

qiuwenhui 2003-10-12 10:23:25
我通过window自带的对象,写了一个对word文档进行全文检索的程序。
全文检索可以完成,但发现匹配方式不对劲。
如我输入“测试”,程序就把包含“测”或者“试”的word文档都找了出来,
如我输入“中华人民共和国”,程序就把包含“中”或者“华”……或者“国”的word文档都找了出来,
这样的话,我输入的查询字段越多,找出的内容不是越精确,而是越多越泛了。
大家看一下我代码,看是不是有某个属性没有设置好,谢谢!

Dim sSearchScope
Dim sQueryString
sSearchScope = "C:\doc\"
sQueryString = "中华人民共和国"

Dim oQuery, oUtil, oRs, i, sFileList, arrFileName
Set oQuery = Server.CreateObject("IXSSO.QUERY")
Set oUtil = Server.CreateObject("IXSSO.UTIL")

'设置Query对象的相关属性
oQuery.Query = sQueryString
oQuery.SortBy = "rank[d]"
oQuery.Columns = "filename"
oUtil.AddScopeToQuery oQuery, sSearchScope, "deep"

Set oRs = oQuery.CreateRecordset("nonsequential")

If Not (oRs.BOF Or oRs.EOF ) Then
For i = 1 To oRs.RecordCount
arrFileName = Split(CStr(oRs("filename")), ".")
If sFileList = "" Then
sFileList = arrFileName(0)
Else
sFileList = sFileList & "," & arrFileName(0)
End If
oRs.MoveNext
Next
End If

得到的sFileList就是符合条件的word文档的名字。
...全文
118 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
qiuwenhui 2003-10-12
  • 打赏
  • 举报
回复
不行阿,加上这两句中的任何一句都报错!
加上oQuery.Catalog = "www",错误代码:-2147215331,描述:没有编录。
加上oQuery.Catelog = "localhost",错误代码:638,描述:对象不支持此方法或属性。
郁闷ing……
nice90 2003-10-12
  • 打赏
  • 举报
回复

oQuery.Query = sQueryString
oQuery.SortBy = "rank[d]"
oQuery.Columns = "filename"

后面添加上oQuery.Catalog = "www"
or
oQuery.Catelog = "localhost"

测试一下

28,406

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧