注册 登录
编程论坛 ASP技术论坛

如何实现这个效果

a768841969 发布于 2011-07-01 17:12, 393 次点击
只有本站会员才能查看附件,请 登录
http://bd.

我的代码

<!--#include file="conn.asp"-->
<style type="text/css">
<!--
.STYLE2 {font-size: 14px}
.xgxw{ font-size:14px;}
.page{
    text-align:center;
    padding:10px 0px;
    font-size:12px;
}

.page .pageon{
    padding:0px 10px;
    font-weight:bold;
}

.page .pagelink a{
    background:#F2F2F2;
    border:#ACACAC 1px solid;
    padding:3px 6px;
    color:#7C7C7C;
    margin:0px -1px;
    display:inline;
blr:expression(this.onFocus=this.blur());
outline:0;
}

.page .pagelink a.p1{
    _padding:3px 6px 1px 6px;
}

.page .pagelink a:hover{
    background:#7BC0E7;
    padding:3px 6px;
    border:#456B9A 1px solid;
    color:#010000;
    text-decoration:none;
}
-->
</style>
<script type="text/javascript">
functon(){

}
</script>
<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from news_aboutus where articleid=2134",conn,3,2
if not rs.eof then
   content=rs("content")
   end if
   rs.close
    s="<div style=""page-break-after: always""><span style=""display: none"">&nbsp;</span></div>"
     content=replace(content,s,"[NextPage]")
       ContentStr=split(content,"[NextPage]")'根据分页标签,将内容保存数组
       if request("page")="" then
               pagenum=0
            else
               if cint(request("page"))>cint(ubound(ContentStr)) then
               pagenum=ubound(ContentStr)
               else      
               pagenum=request("page")
               end if
        end if                    
        response.write ContentStr(pagenum)'取出当前页的内容   
        %>
        <table align="center" cellpadding="0" cellspacing="0" border="0">
        <tr>
        <%                     
     For i = LBound(ContentStr) To UBound(ContentStr)
                     'response.Write("niaho")
     'response.write "<a href='test1.asp?page="&i&"'>["&i+1&"]</a>"
     %>
    <td><div class="page"><span id="spanid">
    <a href='test1.asp?page=<%=i%>'><%=i+1%></a></span>&nbsp;</div></td>
    <%
        Next        
%>
</tr></table>

我这个根据分页标签符来进行分页的但是就是不知道怎么获取页面的页数,来选择样式。就是怎么实现上面的效果。
5 回复
#2
a7688419692011-07-02 08:13
求助
#3
yms1232011-07-02 13:57
这种就是页码分页这种效果没多难,论坛精华帖子里以前写过不少这种分页,我以前也写过不少,LZ可以去翻看论坛精华帖子
#4
a7688419692011-07-02 16:00
恩 我会去看看的 但是能不能简单的实现 当选择2时 让2选择pageon 其他的选择另一个样式,这个我不知道怎么用if语句来控制
#5
yms1232011-07-02 16:31
用js动态改变元素的class就可以实现,没必要动用vbs代码
js动态改变className
<id/name>.className="要设置的css的class";
#6
a7688419692011-07-02 16:58
不懂啊,能不能说的详细点 js我不怎么会。
1