UC知道高分寻求asp分页修改
来源：百度知道 编辑：UC知道 时间：2024/07/14 02:25:14
寻高手加个分页，代码如下：
<!-- #include file=conn.asp-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>快速搜索</title>
<style type="text/css">
<!--
.style1 {font-size: 12px}
.style2 {font-size: 12px; color: #FFFFFF; }
.style3 {color: #FFFFFF}
-->
</style>
</head>
<body>
<table width="90%" border="0" align="center">
<form action="search.asp?action=s" name=form1 method=post>
<tr bgcolor="#336699">
<td width="27%"><div align="right">
<!-- #include file=conn.asp-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>快速搜索</title>
<style type="text/css">
<!--
.style1 {font-size: 12px}
.style2 {font-size: 12px; color: #FFFFFF; }
.style3 {color: #FFFFFF}
-->
</style>
</head>
<body>
<table width="90%" border="0" align="center">
<form action="search.asp?action=s" name=form1 method=post>
<tr bgcolor="#336699">
<td width="27%"><div align="right">
怎么加啊？
<!-- #include file=conn.asp-->
<%
function showpage(sfilename,totalnumber,maxperpage,ShowTotal,ShowAllPages,strUnit,CurrentPage)
dim n, i,strTemp,strUrl
if totalnumber mod maxperpage=0 then
n= totalnumber \ maxperpage
else
n= totalnumber \ maxperpage+1
end if
strTemp= "<table align='center'><tr><td>"
if ShowTotal=true then
strTemp=strTemp & "共 <b>" & totalnumber & "</b> " & strUnit & " "
end if
strUrl=JoinChar(sfilename)
if CurrentPage<2 then
strTemp=strTemp & "<font face=webdings>9</font> <font face=webdings>7</font> "
else
strTemp=strTemp & "<a href='" & strUrl & "page=1'><font face=webdings>9</font></a> "
strTemp=strTemp & "<a