最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
用ASP构建你的网站新闻发布（四）
时间：2022-07-02 23:40:07 编辑：袖梨 来源：一聚教程网
紧接上节，我们的新闻系统已能完成日常的新闻在线添加，删除等的功能，但这还是不足够的，有的用户可能需要查找一下过往某一专题内容的相关新闻条目，而一个比教完善的新闻系统，当然少不免也的完成这个功能。
现在马上就为我们的新闻系统添加上（全文／标题）的检索功能吧，首先我们做一个检索表单，见下面的HTML代码，把这些代码放在需要新闻检索的web页面上。就可以供用户方便地完成新闻搜寻。
在这个FORM的基础添加上处理搜寻的ASP程序search.asp。在表单用我们用key这个参数来指示出需要匹配的字串，而select参数指定是基于全文搜索还是标题搜索。
现在进入程序处理部份，看看我们的search.asp程序。
＊search.asp
<% @language="vbscript" %>
<%
if request.form("key")="" then
response.redirect "/"
end if
select case request.form("select")
case "search_1"
%>
<%
Set rs_1 = Server.CreateObject("ADODB.Recordset")
sql="select * from data where instr(news_title,'"&request.form("key")&"')>0"
现在马上就为我们的新闻系统添加上（全文／标题）的检索功能吧，首先我们做一个检索表单，见下面的HTML代码，把这些代码放在需要新闻检索的web页面上。就可以供用户方便地完成新闻搜寻。
在这个FORM的基础添加上处理搜寻的ASP程序search.asp。在表单用我们用key这个参数来指示出需要匹配的字串，而select参数指定是基于全文搜索还是标题搜索。
现在进入程序处理部份，看看我们的search.asp程序。
＊search.asp
<% @language="vbscript" %>
<%
if request.form("key")="" then
response.redirect "/"
end if
select case request.form("select")
case "search_1"
%>
<%
Set rs_1 = Server.CreateObject("ADODB.Recordset")
sql="select * from data where instr(news_title,'"&request.form("key")&"')>0"
相关文章
- 《弓箭传说2》新手玩法介绍 01-16
- 《地下城与勇士：起源》断桥烟雨多买多送活动内容一览 01-16
- 《差不多高手》醉拳龙技能特点分享 01-16
- 《鬼谷八荒》毕方尾羽解除限制道具推荐 01-16
- 《地下城与勇士：起源》阿拉德首次迎新春活动内容一览 01-16
- 《差不多高手》情圣技能特点分享 01-16