推荐:解析ASP检查网站链接是否正常的函数% FunctionurlChk(sUrl) onerrorresumenext SetxmlHttp=Server.CreateObject(Microsoft.XMLHTTP) xmlHttp.openGET,sUrl,false xmlHttp.send ifxmlHttp.Status200then urlChk=false else urlChk=true endif EndFunction sUrl=http://www.code-123.com ifu
用ASP实现搜索引擎的功能是一件很方便的事,可是,如何实现类似3721的智能搜索呢?比如,当在搜索条件框内输入中国人民时,自动从中提取中国、人民等关键字并在数据库内进行搜索。看完本文后,你就可以发现,这个功能实现起来竟然是如此的简单。第一步,我们要建立一个名为db_sample.mdb的数据库(本文以Access2000数据库为例),并在其中建立表T_Sample.表T_Sample包括如下字段:
ID自动编号
U_Name文本
U_Info备注
第二步,我们开始设计搜索页面Search.asp.该页面包括一个表单(Frm_Search),表单内包括一个文本框和一个提交按钮。并将表单的method属性设为get,action属性设为Search.asp,即提交给网页自身。代码如下:
| <!--Search.asp--> <formname=frm_Searchmethod=getaction=Search.asp> 请输入关键字: <inputtype=textname=keysize=10> <inputtype=submitvalue=搜索> </form> |
下面,就进入了实现智能搜索的关键部分。
首先,建立数据库连接。在Search.asp的开始处加入如下代码:
| <% DimstrProvider,CNN strProvider=Provider=Microsoft.Jet.OLEDB.4.0;DataSource= strProvider=strProvider&Server.MapPath(/)&/data/db_Sample.mdb ’假设数据库存放在主页根目录下的data目录下 SetCNN=Server.CreateObject(ADODB.connection) CNN.OpenstrProvider打开数据库连接 %> |
接下来,判断ASP页所接收到的数据,并在数据库中进行搜索。
| <fontcolor=#FF0000>未找到任何结果!!!</font> <% Else %> |
搜索名称为<fontcolor=#FF0000><%=S_Key%></font>的项,共找到<fontcolor=#FF0000><%=RST.RecordCount%></font>项:
| <% WhileNotRST.EOF遍历整个记录集,显示搜索到的信息并设置链接 %> <!--此处可设为你所需要的链接目标--> <fontstyle=font:12pt宋体><ahref=info.asp?ID=<%=RST(ID)%>target=_blank><%=RST(U_Name)%></a></font> <!--显示部分详细内容--> <fontstyle=font:9pt宋体><%=Left(RST(U_Info),150)%></font><p> <% RST.MoveNext Wend RST.Close SetRST=Nothing EndIf EndIf %> |
分享:ASP教程之asp制作常见flash新闻图片轮换代码这是一个正常的网页文件 html head metahttp-equiv=Content-Typecontent=text/html;charset=gb2312/ title 新闻图片轮换 /title /head body !--#Includefile=diaoyong.asp-- /body /html 任何网页只要调用下面这个文件(diaoyong.asp)就可以了,所用f
共2页上一页12下一页