ASP中十大常用程序代码.:第十节〈我的心得〉
用ASP建立站内信息搜索系统
假如你拥有一个庞大的网站,内容又多,那么来访者往往很难找到自己所需要的东东,这时候你就需要一个站内搜索来帮助来访者更快的找到索要的资料了!现在你就可以用asp轻易的实现这种功能,何况现在支持asp的站点这么多,利用这个搜索引擎可以搜索到你的主页里面任何一个文件或者软件资料,它可以精确到每个字!说了这么多你是不是怦然心动了啊,那就按照下面的步骤来建立自己的搜索引擎吧:
(一),首先利用access97建立一个名为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里面的内容,当然如果你有需要的话可以建立更多的搜索:
<!--#INCLUDE file="ADOVBS.inc"-->
<% "建立数据库的连接
con="DBQ="+server.mappath("list.mdb")+";DefaultDir=;DIRVER={microsoft Access Driver(*.mdb)};"
"建立CONNECTION对象并打开数据库
set mycon=server.createobject("ADODB.CONNECTION")
mycon.open.con %>
"创建Recordset对象的例程,打开Recordset对象传递SQL串以及所有的连接信息
<% set rs=server.createobject("ADODB.Recordset")
rs.open "SELECT*FORM list where title and word like '%'&request.form("word")&"%'",MyCon,adOpenStatie
%>
"建立查询后的显示信息和查询页面,你想取什么名字都可以
<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" bordercolordark="#ffffff">
<tr align="center">
<td width="20%" align="center" bgcolor
相关文档:
Try
Dim Path As String = Server.MapPath("~/Download/") '文件路径
Path = Path & "file.txt" '文件的名称
......
ASP全称为Active Server Pages,是一种由微软(M1crosoft)公司开发的服务器端脚本语言运行环境,它可以结合HTML语言和ActiveX组件建立动态、交互、高效的Web服务器端应用程序。当一个用户浏览器从web服务器请求一个AsP网页时,web服务器会
将这个AsP文件发送给web服务器的AsP引擎,AsP引擎将该AsP网页中 ......
将以下代码放到一个单独的页面checkcode.asp
<%
Option Explicit
Response.buffer=true
Call Com_CreatValidCode("validateCode")
Sub Com_CreatValidCode(pSN)
' 禁止缓存
Response.Expires = -9999
Response.AddHeader "Pragma","no-cache"
Response.AddHeader "cache-ctrol","no-cache"
Response.ContentTy ......
用ASP编写网站应用程序时间长了,难免会遇到各式各样的问题,其中关于如何上传文件到服务器恐怕是遇见最多的问题了,尤其是上传图片,比如你想要在自己的社区里面实现类似网易虚拟社区提供的“每日一星”的功能,就要提供给网友上传照片的功能。上传图片文件到服务器可以使用各种免费的文件上传组件,使 ......