仓酷云

标题: ASP网站制作之若何完成全文检索 [打印本页]

作者: 灵魂腐蚀 时间: 2015-2-3 23:41
标题: ASP网站制作之若何完成全文检索
ASP脚本是采用明文（plain text）方式来编写的。全文检索若何用ASP完成网站中的全文检索？

咱们可以先创立一个包括文件名，文件题目的待检索文件的数据库，然后，用ADO体例来会见它，并创立纪录集对象。详细代码和申明见下：
　　<%@ LANGUAGE="VBSCRIPT" %>
　　<html>
　　<head>
　　<meta NAME="GENERATOR" Content="Microsoft FrontPage 3.0">
　　<meta HTTP-EQUIV="Content-Type" content="text/html; charset=gb_2312-80">
　　<title>出色春风之全文检索</title>
　　<meta name="Microsoft Border" content="tl, default">
</head>
　 <body BGPROPERTIES="FIXED" BGCOLOR="#00FFFF">
<%
　　mousepointer=13
　　Set Conn1 = Server.CreateObject("ADODB.Connection")
　　conn1.open "DSN=intels"
　　Set rcst1 = conn1.execute("SELECT * FROM pages_catalogue")
　　sch_str=request.form("text1")
　　doubbytes=len(sch_str)\2
　　sch_str=left(sch_str,doubbytes)
' 婚配字串的长度.预处置Request获得的数据（用户输出的有效信息）, 经由过程盘算无效信息长度来截取所需的字串.咱们也能够在输出字串后附加一标记字符（如#或chr(7)）来处置.
　　Response.Write "<CENTER>检索了局<HR><Br>"
　　Dim result
　　result =false
　　Response.Write "
"
　　do while not rcst1.eof
　　tit=rcst1.fields("file_title")
　　fn=rcst1.fields("file_name")
　　file_name= Server.MapPath ("/") & "\song\chunfeng\" & fn
　　to_find=text_match(file_name,sch_str)
' 逐一翻开纪录集中以后纪录所指向的文件。用查找的字串对文件的全文本停止婚配对照
……
Response.Write "<A HREF=" & url & ">
" & tit
　　end if
　　rcst1.movenext
　　result=result or to_find
　　loop
　　Response.Write "
"
' 把合适前提的文件题目以超等链接模式输入到客户端
　　if not result then
　　Response.Write "对不起,没有找到!"
　　end if
　　mousepointer=0
　　%>
　　<script RUNAT="Server" LANGUAGE="VBScript">
　　function text_match(filename,search_string)
　　dim retstring
　　dim find_pos
　　Dim fso, a
　　dim done
　　text_match=false
　　Set fso = Server .CreateObject("Scripting.FileSystemObject
")
' 创立剧本的文件体系,翻开文本流以读入
　　Set a = fso.OpenTextFile(filename, 1, FALSE)
done=a.AtEndOfStream or text_match
　　Do While not done
　　retstring = a.ReadLine
　　find_pos=instr(retstring,search_string)
　　if find_pos>0 then text_match=true
　　done=a.AtEndOfStream or text_match
　　Loop
　　a.Close
　　end function
　　</script>
　　</body>
　　</html>
</p> asp，你就只能等着微软给你解决，它不乐意你就只好悲催。而且asp跑在windows服务器上，windows服务器跟linux比起来简直弱爆了！

作者: 谁可相欹 时间: 2015-2-5 09:41
Server:这个表示的服务器，操作服务器的一些东西使用这个，如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件

作者: 不帅 时间: 2015-2-6 01:36
学习ASP其实应该上升到如何学习程序设计这种境界，其实学习程序设计又是接受一种编程思想。比如ASP如何学习，你也许在以前的学习中碰到过。以下我仔细给你说几点:

作者: 爱飞 时间: 2015-2-14 20:30
最近在学asp，不要问我为什么不直接学.net，因为公司网站是asp做的所以有这个需要，卖了本书asp入门到精通，对里面的六大内置对象老是记不住，还有很多属性和方法看的头晕。

作者: 兰色精灵 时间: 2015-3-4 10:22
ASP.Net摆脱了以前ASP使用脚本语言来编程的缺点，理论上可以使用任何编程语言包括C++,VB,JS等等，当然，最合适的编程语言还是MS为.NetFrmaework专门推出的C(读csharp)，它可以看作是VC和Java的混合体吧。

作者: 第二个灵魂 时间: 2015-3-4 22:58
从事这个行业，那么你可以学ASP语言，简单快速上手，熟练dreamweav排版，写asp代码，熟练photoshop处理图片，打好基础就行了

作者: admin 时间: 2015-3-11 21:17
运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改，找出你觉得可以提高性能的地方，加上自己的设计，那就更上一个层次了，也就会真正地感到有所收获。

作者: 精灵巫婆 时间: 2015-3-19 13:31
掌握asp的特性而且一定要知道为什么。

作者: 仓酷云 时间: 2015-3-19 17:17
运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中，便可快速完成网站的应用程序，无需编译，可在服务器端直接执行。容易编写，使用普通的文本编辑器编写，如记事本就可以完成。由脚本在服务器上而不是客户端运行，ASP所使用的脚本语言都在服务端上运行。

作者: 深爱那片海 时间: 2015-3-25 03:32
代码逻辑混乱，难于管理：由于ASP是脚本语言混合html编程，所以你很难看清代码的逻辑关系，并且随着程序的复杂性增加，使得代码的管理十分困难，甚至超出一个程序员所能达到的管理能力，从而造成出错或这样那样的问题。

作者: 只想知道 时间: 2015-3-25 12:29
跟学别的语言一样，先掌握变量，流程控制语句(就是ifwhileselect)等，函数/过程，数组

作者: 莫相离 时间: 2015-3-28 22:53
运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改，找出你觉得可以提高性能的地方，加上自己的设计，那就更上一个层次了，也就会真正地感到有所收获。

作者: 乐观 时间: 2015-4-7 13:40
我想问如何掌握学习节奏(先学什么再学什么)最好详细点?

作者: 海妖 时间: 2015-4-16 18:09
还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。

作者: 若相依 时间: 2015-5-6 22:09
我想问如何掌握学习节奏(先学什么再学什么)最好详细点?

作者: 小妖女 时间: 2015-5-11 22:52
弱类型造成潜在的出错可能：尽管弱数据类型的编程语言使用起来回方便一些，但相对于它所造成的出错几率是远远得不偿失的。

作者: 冷月葬花魂 时间: 2015-6-21 15:27
用户端的浏览器不需要提供任何别的支持，这样大提高了用户与服务器之间的交互的速度。

作者: 再见西城 时间: 2015-6-29 08:42
代码的可重用性差：由于是面向结构的编程方式，并且混合html，所以可能页面原型修改一点，整个程序都需要修改，更别提代码重用了。

作者: 金色的骷髅 时间: 2015-7-7 08:05
完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。

欢迎光临仓酷云 (http://ckuyun.com/)