网站首页 手机版
 注册 登录
您现在的位置: 畅无忧设计 >> 网络编程 >> Ajax教程 >> 正文
最新文章
· 无刷新ajax分页(简洁版)
· ASP+Ajax实现静态无刷新分页
· asp+ajax实现用户注册检测用户名是否
· AJAX技术实现定时刷新局部网页
· ASP+AJAX 实现类似于google搜索提示
· AJAX无刷新验证用户名是否存在之二
· AJAX无刷新验证用户名是否存在之一
· Ajax—未来的WebServices
· AJAX应用所解决的一些常见问题
· AJAX如何与后台交互
热门文章
 asp+ajax实现用户注册检测用户名是
 AJAX技术实现定时刷新局部网页
 Ajax中检查密码强度的Javascript
 ASP+Ajax实现静态无刷新分页
 AJAX无刷新验证用户名是否存在之二
 AJAX无刷新验证用户名是否存在之一
 利用AJAX技术实现网页无刷新进度条
 无刷新ajax分页(简洁版)
 AJAX框架汇总
 ajax进度条
相关文章
没有相关文章
无刷新ajax分页(简洁版)
来源:蓝色理想 更新时间:2012/4/30 10:26:11 阅读次数:
字体:[ ] 我要投稿

default.asp

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<!--作者:waif-->
<html>
<head>
<title>default</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>
*
{
margin:0;
padding:0;
}
#contain
{
width:770px;
margin:10px auto;
}
#header
{
width:768px;
border:1px solid #eeaaee;
margin-bottom:10px;
height:100px;
}
#main
{
width:770px;
margin-bottom:10px;
}
#main_L
{
width:148px;
border:1px solid #eeaaee;
float:left;
margin-right:10px;
height:400px;
}
#main_M
{
width:348px;
border:1px solid #eeaaee;
float:left;
margin-right:10px;
height:400px;
}
#main_R
{
width:248px;
border:1px solid #eeaaee;
float:left;
height:300px;
}
#footer
{
width:768px;
border:1px solid #eeaaee;
height:40px;
}

</style>

</head>

<body onLoad="FF()">

<div id="contain">
    <div id="header">rr</div>
    <div id="main">
           <div id="main_L">rr</div>
           <div id="main_M"></div>
           <div id="main_R">rr</div>
           <br style="clear:both">
        </div>
        <div id="footer">rr</div>
</div>
<script type="text/javascript">
function  FF(y)  {
   if (!y) {
     y=1;
   }
   var xmlhttp;
   if (window.ActiveXObject) {
      xmlhttp=new ActiveXObject("Microsoft.XMLHTTP");
   }else if(window.XMLHttpRequest)  {
      xmlhttp=new XMLHttpRequest();
   }
   if (xmlhttp) {
        xmlhttp.onreadystatechange=function () {
                  if(xmlhttp.readyState==4)  {
             if(xmlhttp.status==200)  {
                    var yy=unescape(xmlhttp.responseText);
                                     show(yy);
                 }else {
                       alert("error");
                 }
          }
                } 
            xmlhttp.open("get","page.asp?page="+y);
                xmlhttp.send(null);
    }               
}
function show(text) {
document.getElementById("main_M").innerHTML=text;
}
</script>
</body>
</html>


page.asp

<%
dim conn,rs
dim connstr,sqlcmd
set conn=server.CreateObject("ADODB.connection")
connstr="Driver={Microsoft Access Driver (*.mdb)};dbq="&server.MapPath("mydata.mdb")
conn.open connstr
sqlcmd="select id,name,tel from contact"
set rs=server.CreateObject("ADODB.recordset")
rs.open sqlcmd,conn,1,1
rs.pagesize=6
page=clng(request.QueryString("page"))
if page<1 then page=1
if page>rs.pagecount then page=rs.pagecount
rs.absolutepage=page
response.Write("<table width='300px' border='1'>")
for i=1 to rs.pagesize
   response.Write("<tr>")
   response.Write("<td>"&rs(0)&"</td>")
   response.Write("<td>"&escape(rs(1))&"</td>")
   response.Write("<td>"&rs(2)&"</td>")
   response.Write("</tr>")
   rs.movenext
   if rs.EOF then exit for
next
response.Write("</table>")


if page=1 then
   response.write(escape("首页 上一页"))
   response.write("<a href='javascript:FF("&(page+1)&")'>"&escape("下一页")&"</a>")
   response.write("<a href='javascript:FF("&rs.pagecount&")'>"&escape("未页")&"</a>")
elseif page=rs.pagecount then
   response.write("<a href='javascript:FF(1)'>"&escape("首页")&"</a>")
   response.write("<a href='javascript:FF("&(page-1)&")'>"&escape("上一页")&"</a>")
   response.write(escape("下一页 未页"))
else
   response.write("<a href='javascript:FF(1)'>"&escape("首页")&"</a>")
   response.write("<a href='javascript:FF("&(page-1)&")'>"&escape("上一页")&"</a>")
   response.write("<a href='javascript:FF("&(page+1)&")'>"&escape("下一页")&"</a>")
   response.write("<a href='javascript:FF("&rs.pagecount&")'>"&escape("未页")&"</a>")
end if  
%>

  • 上一篇文章:
  • 下一篇文章: 没有了
  • 关于我们 - 联系我们 - 广告服务 - 在线投稿 - 友情链接 - 网站地图 - 版权声明
    CopyRight 2008-2010, CWYDESIGN.COM - 畅无忧设计, Inc. All Rights Reserved
    滇ICP备09005765号