如何用ASP建立Index Server查询对象并为其参数赋值？_编程10000问

一个方法是利用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 object和SQL语句：

<%
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
%>

时间： 2024-03-19 03:56:44

如何用ASP建立Index Server查询对象并为其参数赋值？_编程10000问的相关文章

如何用ASP发送html格式的邮件？_编程10000问

如何用ASP发送html格式的邮件? <% Dim objMail Set objMail = CreateObject("CDONTS.Newmail") objMail.TO = "sunchunliang@263.net" objMail.From =shenzhaoyang@intels.net objmail.Subject = "闪亮日子之html撼雪喷云" objMail.MailFormat = cdoMailFormatM

如何用组件实现自动发送电子邮件？_编程10000问

如何用组件实现自动发送电子邮件? JMailUploadAutoForm.asp<html><body><font face="verdana, arial" size="2"><b><form method="post" action="JmailUploadAutoFormProcess.asp" ENCTYPE="multipart/form-data&qu

如何在ASP里建立表格？_编程10000问

如何在ASP里建立表格?<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /> <% Dim conn Set conn = Server.CreateObject("ADODB.Connection") conn.Open "DSN=blah" ' 建立连接   Dim strSQL strSQL = "CREATE T

如何用表单在线建立目录？_编程10000问

creatfolder.htm<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /> ' 表单文件. <form name="form1" method="post" action="folder.asp">创建一个文件夹: <input type="text" name=&quo

如何用ASP输出HTML文件？_编程10000问

<!--#include file="top.inc"--><%u_title=request.form("u_title")<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /> ' 检查标题是否被输入.if u_title = "" then%><form method="P

ASP问答集_编程10000问

问:为什么我的记录集的RecordCount值总是返回-1? 答:你应当使用这种模式来打开存取数据库的记录集:   rec.open strSQL,conn,1,1   其中的strSQL是操作数据库的SQL语句;conn是联接数据库的Connection 变量. 问:我在ASP脚本中写了很多的注释,这会不会影响服务器处理ASP文件的速度? 答:经国外技术人员测试,带有过多注释的ASP文件整体性能仅仅会下降0.1%,也就是说基本上不会影响到服务器的性能下降的. 问:我需不需要在每个ASP文件的开

如何用数据库制作一个多用户版的计数器？_编程10000问

count.asp<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /> ' 计数器的核心程序. <%Set conn = Server.CreateObject("ADODB.Connection")dbpath=server.MapPath("count.mdb")conn.open "driver={Microsof

如何分页显示数据库查询结果？_编程10000问

<% if Request.QueryString("PageNumber").count > 0 then <?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /> ' 指定页号的参数PageNumber.如果指定页号,则以指定页号为依据. PageNumber = Request.QueryString("PageNumber&quo

如何把一个Excel文件放到ASP页面中去？_编程10000问

<%set xlApp = Server.CreateObject("Excel.Application")xlApp.Visible = false<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /> ' 使服务端不出现Excel窗口.set myWorkbook = xlApp.Workbooks.Add ' 建立一个worksheet.set