首页 >> 读书频道 >> 电脑 >> 如何使用Index Server建立一个网站导航地图?
 
· 如何使用Iframe实现
· html与jsp开发分离
· 如何使用Cookie?
· 如何实现网络打印?
· 如何实现上下翻页?
· 如何实现人民币的大写转换
· 如何实现让每句话的头一个
· 如何从ASP连接到Ora
· 常用的数据库备份类型有哪
· System.Data.
· DSN和DSN-Less
· Case和If哪个更好用
 
· 拉封丹寓言
· 电视剧《刁蛮公主》下载和
· 美容养颜手册
· 加油金顺剧情分集介绍完整
· 红楼梦:120回全本[清
· 素质教育在美国
· 全唐诗卷四十六
· 韩剧《布拉格恋人》剧情介
· 夜航船[作者:明·张岱]
· 局外人[作者:韩·可爱淘
· 现场流行病学
· 源氏物语[日本:紫式部]
 
· (出租)中动商场部分及写
· (出租)中动动漫基地&#
· 喜剧学院
· 《善德女王》剧情介绍
· 魔女18号 剧情
· 丑女无敌剧情介绍
· 魔女幼熙剧情介绍
· 龙游天下剧情介绍
· 震撼世界的七日剧情介绍
· 静静的白桦林剧情介绍
· 心情日记—老公今天我想对
· 旗舰剧情介绍
欢迎来到月影社区!如果您觉得这里不错,请推荐给您的朋友们。月影社区:http://wf66.com/

如何使用Index Server建立一个网站导航地图?


查看有无更新版本

关键字:ASP 2006-9-20

 

程序代码如下:
<html>
<head>
<title>精彩春风之网站导航</title>
</head>
<body>
<form method="POST" action="query.asp">
请输入你想搜索的内容:<input type="text" name="txtQuery" size="16">
<input type="submit" value="搜索">

<% If Request("txtQuery") <> "" Then
Dim objQuery
Dim rsQuery
' Query对象是搜索引擎核心,直接与Index Server引擎对话检索数据
Set objQuery = Server.CreateObject("ixsso.Query")
objQuery.Query = Request("txtQuery")
' Query属性用于存储搜索准则,可将数据输入表单文本框放在一页
objQuery.Columns="filename,vpath,DocTitle"
' Columns属性存储从查询返回的各列,这些列的名称是固定的;docttitle参数是文档标题,对于HTML文档是在文件的<TITLE>标记之间的值,对于其它类型的文档标题随存储位置不同而变; vpath参数是文件的虚拟路径
objQuery.Catalog = "E:\InetPub\wwwroot\qhmolss"
' Catalog属性指定索引所在的目录,一旦填充了Catalog对象,就创建了从查询得到的ADO记录集.这个记录集和从数据库中创建的记录集一样,可以相同的方式导航
objQuery.MaxRecords = 50
' MaxRecords属性不是必须使用的
Set rsQuery = objQuery.CreateRecordset("nonsequential")

If rsQuery.EOF Then %>
<font color="#FF0000">噢,没有找到您想查询的内容!</font><%
Else %>

<table>
<% Do While Not rsQuery.EOF
If rsQuery("doctitle") <> "" Then %>
<tr>
<td><a href="<% = rsQuery("vpath") %>">
<% = rsQuery("doctitle") %></a>
</td>
</tr>
<% End If
rsQuery.MoveNext
Loop
Response.Write "</table>"
End If
End If %>
</form>
</body>
</html>

如何使用Index Server建立一个网站导航地图?

[ 1 ]
如何使用Index Server建立一个网站导航地图? num

打印本页 关闭

关于我们版权声明本站导航友情连结作品演示 TOP↑