% Set Q= Sever.CreatObject("ixsso.Query") ' 创建查询对象 . Set Util= Sever.CreatObject("ixsso.Uti" />
欢迎来到工商注册核名查询系统!

编程问答

当前位置:主页 > 网络编程 > 编程问答 >

如何用ASP建立Index Server查询对象并为其参数赋值?

来源:本站原创|时间:2022-11-25|栏目:编程问答|

一个方法是利用Index Server query object和参数:<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

<%
Set Q= Sever.CreatObject("ixsso.Query")     

' 创建查询对象.
Set Util= Sever.CreatObject("ixsso.Util")
Q.Query= Request("SearchString")        

' 查询字段.
Q.SortBy="rank[d] "       

' 按照符合程度降序排列
Q.Columns="Doctitle,vpath,filename,size,write,characterization,rank"
' 返回记录属性.
Q.MaxRecords=300    

' 最多返回记录数.
Util.AddScopeToQuery Q, "/","DEEP"    

' 搜索所有子目录.
Q.LocaleID=Util.ISOToLocaleID(
ZH-CN)      

' 指定所用语言为简体中文.
Set RS = Q.CreateRecordSet("nonsequential")     

' 创建输出集.
%>

 

另一个方法就是.利用ADO query objectSQL语句:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.ConnectionString =  "provider=msidxs;"
Conn.Open
Set AdoCommand = Server.CreateObject("ADODB.Command")
Set AdoCommand.ActiveConnection = Conn
AdoCommand.CommandText = "Select Doctitle,vpath,filename,size,write, "&"characterization,rank from  SCOPE() WHERE CONTAINS (` "&SearchString &"`) ORDER BY rank DESC"
Set RS = Server.CreateObject("ADODB.RecordSet")
RS.open AdoCommand
%>

更多编程问答

您可能感兴趣的文章

阅读排行

本栏相关

随机阅读

网页制作CMS教程网络编程软件编程脚本语言数据库服务器

如果侵犯了您的权利,请与我们联系,我们将在24小时内进行处理、任何非本站因素导致的法律后果,本站均不负任何责任。

联系QQ:835971066 | 邮箱:835971066#qq.com(#换成@)

Copyright © 2002-2020 工商注册核名查询系统 版权所有