求一段ASP代码,大师来
默玉 2009-07-26 05:25:58 在搜索框输入名称,点搜索后直接打开网站(数据库中有名称和对应的网址)用ASP如何实现?
有一个Data.mdb的数据库,内有一个website的表,表里列名有name和url两个字段
下面是代码,哪位大师帮忙补全---连接数据库---搜索提示代码
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("data.mdb")
set rs=server.CreateObject("adodb.recordset")
key=Trim(Request.QueryString("key"))
if key<>"" then
rs.open "select top 1 * from website where [name] like '%"& replace(key,"'","''") &"%'",conn,1,1
if not rs.eof then
response.Redirect(rs("url"))
else
response.write "没有相关记录"
end if
else
Response.Write "请输入关键词"
end if
%