wnp_pageend.asp

U盘身份识别软件

<%
if session("USERID")="" then
response.Redirect "WNP_LOGIN.ASP"
end if
%>
<script language="javascript">
<!--
function checkPageNumber(){
  if(formPageSet.maxPerPage.value<1){
    alert("请填一个有效数字!");
	formPageSet.maxPerPage.focus();
	return false;
  }
}
//-->
</script>
<link href="css.css" rel="stylesheet" type="text/css">

<table width="760"  border="0" align="center" cellpadding="0" cellspacing="0" class="textmost">
<form name="formPageSet" method="post" action="WNP_PAGE_SET.ASP?action=otherSet&pagename=<%=pagename%>" onSubmit="javascript:return checkPageNumber();">
  <tr valign="bottom">
    <td height="25" align="right" class="textmost">
	<%
'------------------------------------------------------页面跳转
dim n,k                  'n为总页数
if (totalPut mod MaxPerPage)=0 then  'n表示总页数
n= totalPut \ MaxPerPage
else
n= totalPut \ MaxPerPage + 1
end if
k=currentPage
response.Write "共 "&totalPut&" 条记录，"
%>
 <%=MaxPerPage%> 条/页，
  <%
response.Write "共 "&n&" 页，"
response.Write "当前是第 "&currentPage&" 页，"
if k<>1 then
response.write " ["+"<a href="&pagename&"?page=1>至首页</a></b>] "
response.write " ["+"<a href="&pagename&"?page="+cstr(k-1)+">上一页</a>] "
else
Response.Write " [至首页]  [上一页] "
end if
if k<>n and n<>0 then
response.write " ["+"<a href="&pagename&"?page="+cstr(k+1)+">下一页</a>] "
response.write " ["+"<a href="&pagename&"?page="+cstr(n)+">至尾页</a>] "
else
Response.Write " [下一页] [至尾页] "
end if
if n>1 then
%>
到第
<select name="newPageNumber" onChange="javascript:location.href='<%=pagename%>?page='+this.options[this.selectedIndex].value;">
    <%
for sNumber=1 to n
%>
    <option value="<%=sNumber%>" <%if sNumber=CurrentPage then response.Write "selected"%>><%=sNumber%></option>
    <%
next
%>
</select>
页
<%
end if
%>
    </td>
</tr>
</form>
</table>