本文用到没有用到ad***.command命令,只是简单的做了一个用ad***.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页
<%
dim rs
dim sql
dim keyword
dim choose
keyword=request(“keyword“) '接收页面传送的值
choose=request(“choose“)
set rs***rver.createobject("ad***.recordset")
sql="exec tse '"&keyword&"',"&choose&"" '用exec执行tse存储过程,把keyword,choose给存储过程传递参数
rs.open sql,conn,1,1
if rs.eof and rs.bof then
re***nse.write("没有任何记录!")
re***nse.end
end if
re***nse.write"搜索到的记录如下:
"
do until rs***f
re***nse.write""&rs("id")&":"&rs("title")&"" '打印出文章的ID和标题
re***nse.write"
"
rs***venext
loop
'打扫战场
rs.close
co***close
set rs=nothing
set conn = nothing
%>
上一篇: ASP登陆验证页应做的安全问题