自己寫的一個簡單ASP調用存儲過程查詢
發表于:2007-06-30來源:作者:點擊數:
標簽:
本文用到沒有用到adodb.command命令,只是簡單的做了一個用adodb.recordset來執行存儲過程。 存儲過程: @#在 SQL 中建立dbo.tse存儲過程 CREATE PROCEDURE [dbo].[tse] @keyword varchar(20)=null, @#定義查詢的關鍵字 @choose int=null @#定義查詢的類型(1
本文用到沒有用到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
%>
原文轉自:http://www.kjueaiud.com