如何创建一个对索引服务器进行查询的ASP页面？
来源：asp之家 时间：2009-11-14 20:54:00
看看下面：
<％
Set objQuery = Server.CreateObject("ixsso.Query")
' 设置查询对象set the query object
objQuery.SetQueryFromURL(Request.QueryString)
' 从输入的URL (from the form GET operation)得到查询属性
objquery.columns="filename,HitCount,vpath,DocTitle,characterization"
' 应包含哪些列
set rsQuery = objquery.createrecordset("nonsequential")
' 打开记录集以查询
％>
' 如果rsquery.eof 返回值不是 TRUE,则显示查询结果;如果返回值是TRUE;则表示没查询到
<html>
<head>
<title>精彩春风之ASP查询索引服务器</title>
</head>
<body>
<h1>精彩春风之查询结果</h1>
本次查询最多返回并显示200个记录,每页显示20个. <br>
<％
if not rsquery.eof then
Response.Write rsquery.recordcount & " 个结果被找到！ "
if rsquery.recordcount > 30 then
Response.Write "请核对并优化您的查询！"
end if
Response.Write "<br>"
end if
％>
<％
if not rsquery.eof then
while not rsquery.eof and rowcount > 0
if rsquery("doctitle") <> "" then
Response.Write "<p><b><a href="" & rsquery("vpath") & "">" & rsquery("doctitle") & "</a></b><br>"
response.write "<font size=-1>" & rsquery("characterization") & "...</font><Br>"
Response.Write "<font size=- 2>" & rsquery("hitcount") & " hit(s)</font></p>"
end if
rowcount = rowcount - 1
rsquery.movenext
wend
Response.Write "<br><Br>"
％>
<％
else
％>
<p>
噢,没有找到您要查询的纪录！
</p>
<p>
如果您想使用两个或两个以上的词查询，使用and或or。
</p>
<％
end if
％>
</body>
</html>
调试好上面的程序，我们就可以使用server.creatobject方法来建立对索引服务器对象的引用了：
Set objQuery = Server.CreateObject("ixsso.Query")
0
投稿猜你喜欢
全新极速CSS选择器引擎whiz
asp小偷程序原理和简单示例
JavaScript正则表达式的简单应用：高亮显示
常用照片尺寸
用SQL语句生成带有小计合计的数据集脚本
一段查看ASP文件源码的ASP程序
DB2和 Oracle的并发控制（锁）的比较
Flash在web客户端的潜在问题
sqlserver isnull在数据库查询中的应用
AJAX应用之草稿自动保存
纯CSS实现导航下拉菜单
全国哀悼日 建议站点换素装(附代码)
网页在IE6中不能打印之谜
视觉设计常见误解
HTML 5 Video概述
