欢迎光临
我们一直在努力

asp 用存储过程实现数据分页-ASP教程,数据库相关

建站超值云服务器,限时71元/月

一、创建表 tiku_koushi

if exists (select * from dbo.sysobjects where id =
object_id(n[dbo].[tiku_koushi]) and objectproperty
(id, nisusertable) = 1)
drop table [dbo].[tiku_koushi]
go

create table [dbo].[tiku_koushi] (
[id] [int] identity (1, 1) not null ,

[title] [varchar] (250) collate

chinese_prc_ci_as null ,

[list2_id] [char] (10) collate

chinese_prc_ci_as null

) on [primary]

go

  二、存储过程 sp_c

create proc sp_c
@tablename varchar(50),
@title varchar(250),

@list2_id varchar(50)

as

if @tablename=tiku_koushi

select count(*) from tiku_koushi where title like %+@title+% and list2_id=@list2_id
go


  三、存储过程 sp_search_tiku

create procedure sp_search_tiku

@tablename varchar(50),

@title varchar(250),

@list2_id varchar(10),

@pagesize int,

@page int

as

if @tablename=tiku_koushi

begin

declare @ks int

declare @str varchar(200)

set @ks=@pagesize*(@page-1)

if not exists (select * from dbo.sysobjects where id = object_id(n[dbo].[temp_table91]) and objectproperty(id, nisusertable) = 1)

begin

select * into temp_table91 from tiku_koushi where
title like %+@title+% and list2_id=@list2_id order
by id desc

set rowcount @pagesize

set @str=select * from temp_table91 where id not in
(select top +str(@ks)+ id from temp_table91)

execute(@str)

drop table temp_table91

end

end
go


  四、search_koushi.asp

<!– #include file=”conn.asp” –>
<%
line=6
if request(“page”)=”” then
page=1
else
page=request(“page”)
end if

if page<1 then
page=1
end if

title=trim(request(“title”))
list2_id=trim(request(“list2_id”))
set rs2=conn.execute(“sp_c tiku_koushi,”&title&”,”&list2_id&””)
pagecount=cint(rs2(0)\line)
if(cint(rs2(0)) mod line)=0 then
pagecount=pagecount
else
pagecount=pagecount+1
end if

if cint(page)>=pagecount then
page=cint(pagecount)
end if
str=””
str=str&”page=”&page&”&title=”&title&”&list2_id=”&list2_id
set rs=conn.execute

(“sp_search_tiku tiku_koushi,”&title&”,”&list2_id&”,”&line&”,”&cint(page)&””)
if rs.eof then
response.write “no record”


else
%>
<html>

<head>

<style type=”text/css”>

td{font-size:12px;}

a{text-decoration:none;}

</style>
<script language=”javascript”>
</script>
</head>

<body>
<table width=”518″ border=”1″ bordercolorlight=”000000″
bordercolordark=”#ffffff”
align=”center” cellpadding=”0″ cellspacing=”0″>
<!–dwlayouttable–>

<tr bgcolor=#dfdfdf>

<td width=”454″ align=”center” height=24 valign=”middle”>口试题的题目</td>

<td width=”63″ align=”center” valign=”middle”>删除</td>

</tr>

<% do until rs.eof %>

<tr height=22>

<td valign=”middle”>·<a href=void(0)”

onclick=”window.open(editkoushi.asp?id=<%=rs(“id”)%>&page=<%=page%>&title=<%=title%>&list2_id=<%=list2_id%>,,width=518
height=160 left=100)”>

<%=rs(“title”)%></a></td>

<td align=”center” valign=”middle”>删除</td>

</tr>

<%


rs.movenext

loop

%>

<tr align=”left” valign=”middle” bgcolor=”efeff6″
height=22>

<td colspan=”2″ style=”padding-left:6px;”>

<a href=”search_koushi.asp?page=<%=1%>&title=<%=title%>&list2_id=<%=list2_id%>”>首页</a> <a
href=”search_koushi.asp?page=<%=page-1%>&title=<%=title%>&list2_id=<%=list2_id%>”>上一页</a> <a
href=”search_koushi.asp?page=<%=page+1%>&title=<%=title%>&list2_id=<%=list2_id%>”>下一页</a> <a
href=”search_koushi.asp?page=<%=pagecount%>&title=<%=title%>&list2_id=<%=list2_id%>”>末页</a>  

一共 <%=pagecount%> 页 当前页为: <%=page%>/<%=pagecount%> 页

  共有 <%=rs2(0)%> 条记录</td>

</tr>

</table>

</body>

</html>

<%
rs2.close

set rs2=nothing

rs.close

set rs=nothing

end if

%>


赞(0)
版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com 特别注意:本站所有转载文章言论不代表本站观点! 本站所提供的图片等素材,版权归原作者所有,如需使用,请与原作者联系。未经允许不得转载:IDC资讯中心 » asp 用存储过程实现数据分页-ASP教程,数据库相关
分享到: 更多 (0)