本文用到没有用到adodb.command命令,只是简单的做了一个用adodb.recordset来执行。
:
@#在SQL中建立dbo.tse
CREATE PROCEDURE [dbo].[tse]
@keyword varchar(20)=null, @#定义查询的关键字
@choose int=null @#定义查询的类型(1为查询列title,其他为content)
as
if @choose=1
select * from web where title like @keyword + @#%@#
else
select * from web where content like @keyword + @#%@#
return
GO
@#list.asp页
<!--#include file="conn.inc" -->
<%
dim rs
dim sql
dim keyword
dim choose
keyword=request(“keyword“) @#接收页面传送的值
choose=request(“choose“)
set rs=server.createobject("adodb.recordset")
sql="exec tse @#"&keyword&"@#,"&choose&"" @#用exec执行tse,把keyword,choose给传递参数
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write("没有任何记录!")
response.end
end if
response.write"搜索到的记录如下:<br><br>"
do until rs.eof
response.write""&rs("id")&":"&rs("title")&"" @#打印出文章的ID和标题
response.write"<br><br>"
rs.movenext
loop
@#打扫战场
rs.close
conn.close
set rs=nothing
set conn = nothing
%>