建立asp站内搜索代码

站内搜索代码  时间:2021-01-27  阅读:()

(一首先利用Access 2003建立一个名为list.mdb的数据库在里面建立一个名为list的表然后在list表里面输入一些你想要被查询的文件名字关键的搜索词还有相对应的链接下面建立了四个项目ID编号 title 主题word关键词 url 链接地址如下表所示ID title word url

1 cgi教程本地调试cgi cgi/testcgi.htm

2下载中心聊天室 留言本download/index.htm

二建立了数据库以后就可以建立你的asp搜索页面了下面是一个文件名

为search.htm的asp搜索页面的源程序这个搜索引擎可以同时搜索title和word里面的内容 当然如果你有需要的话可以建立更多的搜索

<!--i nclude file="ADOVBS.inc"-->

<%"建立数据库的连接con="DBQ="+server.mappath("list.mdb")+";DefaultDir=;DIRVER={microsoft AccessDriver(*.mdb)};"

"建立CONNECTION对象并打开数据库set mycon=server.createobj ect("ADODB.CONNECTION")mycon.open.con%>

"创建Recordset对象的例程打开Records et对象传递SQL串以及所有的

连接信息

<%set rs=server.createobj ect("ADODB.Recordset")rs.open"SELECT*FORM list where title and word like''%''

&request.form("word")&"%''",MyCon,adOp enStatie

%>

"建立查询后的显示信息和查询页面,你想取什么名字都可以

<html><head><title>查询结果</title></head>

<body bgcolor="#ffffff">

<p align="center"><br>

"统计查询共有<%Response.Write(RS.RecordCount)%>条纪录</p><br>

<div align="center"><center>

<table border="1"align="center"bordercolor="000000"berdorcoorlight="#000000"b ordercolordark="#ffffff">

<tr align="center">

<td width="20%"align="center"bgcolor="#ffffff">ID</td>

<td width="60%"align="center"bgcolor="#ffffff">主题</td>

<td width="20%"align="center"bgcolor="#ffffff">查看</td></table>

<table border="1"align="center"bordercolor="000000"berdorcoorlight="#000000"b ordercolordark="#ffffff">

<tr align="center">

<!--从数据库提取信息-->

<%while not rs.eof>

<tr align="center">

<td width="20%"align="center"bgcolor="#ffffff"><%=rs("id")%></td>

<td width="60%"align="center"bgcolor="#ffffff"><%=rs("title")%></td>

<td width="20%"align="center"bgcolor="#ffffff"><a href="<%=rs("url")%>">GO</a></td><%rs.movenext%></tr><%wend%></table></center></div><%rs.close%>

<%mycon.close%>

"关闭链接

</b ody></html>

下面我们来建立搜索页面

<html><head><title>搜索页面</title></head>

<!--创建搜索表格-->

<from method="POST"action="search.asp">

<div align="center"><center><p><input type="text"name="word" size="30">

<input type="submit"="提交"name="B 1"><input type="reset"="清除"name="B2"></p></c enter></di v></form>

<hr width="600"align="center">

<ht ml>

美国云服务器 1核 1G 30M 50元/季 兆赫云

【双十二】兆赫云:全场vps季付六折优惠,低至50元/季,1H/1G/30M/20G数据盘/500G流量/洛杉矶联通9929商家简介:兆赫云是一家国人商家,成立2020年,主要业务是美西洛杉矶联通9929线路VPS,提供虚拟主机、VPS和独立服务器。VPS采用KVM虚拟架构,线路优质,延迟低,稳定性强。是不是觉得黑五折扣力度不够大?还在犹豫徘徊中?这次为了提前庆祝双十二,特价推出全场季付六折优惠。...

易探云:香港CN2云服务器低至18元/月起,183.60元/年

易探云怎么样?易探云最早是主攻香港云服务器的品牌商家,由于之前香港云服务器性价比高、稳定性不错获得了不少用户的支持。易探云推出大量香港云服务器,采用BGP、CN2线路,机房有香港九龙、香港新界、香港沙田、香港葵湾等,香港1核1G低至18元/月,183.60元/年,老站长建站推荐香港2核4G5M+10G数据盘仅799元/年,性价比超强,关键是延迟全球为50ms左右,适合国内境外外贸行业网站等,如果需...

华为云年中聚惠618活动,新用户专区,云服务器低至88元/年,3年仅580.98元,热销抢购中,最后2天!

华为云怎么样?华为云用在线的方式将华为30多年在ICT基础设施领域的技术积累和产品解决方案开放给客户,致力于提供稳定可靠、安全可信、可持续创新的云服务,做智能世界的“黑土地”,推进实现“用得起、用得好、用得放心”的普惠AI。华为云作为底座,为华为全栈全场景AI战略提供强大的算力平台和更易用的开发平台。本次年终聚惠618活动相当给力,1核2G内存1m云耀云服务器仅88元/年起,送主机安全基础版套餐,...

站内搜索代码为你推荐
盗版win8.1升级win10我的电脑是预装正版win8的,然后重装了盗版win8.1。现在我提取出了OEM KEY,怎么能升级到win10呢?骁龙750g和765g哪个好765g和855+比有什么优缺点?麒麟820和980哪个好820和980哪个处理器好?录音软件哪个好手机录音软件哪个好用炒股软件哪个好股票软件哪个最好用?炒股软件哪个好用玩股票哪个软件好?dnf魔枪士转职哪个好dnf平民魔枪士转什么好播放器哪个好什么手机视频播放器比较好用?美国国际集团美国AIG股票,值得长远投资吗??群空间登录群空间无法正常登陆的问题
网络域名 备案域名出售 罗马假日广场 搬瓦工官网 l5520 国外bt 512au 新天域互联 广州服务器 银盘服务是什么 厦门电信 路由跟踪 英国伦敦 国外的代理服务器 注册阿里云邮箱 广东主机托管 带宽测试 七牛云存储 云销售系统 SmartAXMT800 更多