彩票走势图

vb.net中对Repeater控件进行分页显示

翻译|其它|编辑:郝浩|2007-08-15 09:21:34.000|阅读 1553 次

概述:

# 慧都年终大促·界面/图表报表/文档/IDE等千款热门软控件火热促销中 >>

在控件的 page_load 中写如下代码

Dim objConn As SqlConnection = New SqlConnection(SQLHelper.ConnnectionString)
        Dim objCommand As SqlDataAdapter
        Dim userID As String = Session("UserID")
        If CommonMethod.IsManager(userID) Then
            objCommand = New SqlDataAdapter("select * from Questions ", objConn)
        Else
            Dim selectStr As String = "select * from Questions where userID=" & userID
            objCommand = New SqlDataAdapter(selectStr, objConn)
        End If

        Dim ds As DataSet = New DataSet()
        objCommand.Fill(ds)
        Dim objPds As PagedDataSource = New PagedDataSource()
        objPds.DataSource = ds.Tables(0).DefaultView
        objPds.AllowPaging = True
        objPds.PageSize = 5
        Dim CurPage As Integer
        If Not (Request.QueryString("Page") Is Nothing) Then
            CurPage = Convert.ToInt32(Request.QueryString("Page"))
        Else
            CurPage = 1
        End If
        objPds.CurrentPageIndex = CurPage - 1
        lblCurrentPage.Text = "CurPage
" + CurPage.ToString()
        If Not objPds.IsFirstPage Then
            lnkPrev.NavigateUrl = Request.CurrentExecutionFilePath + "?Page=" + Convert.ToString(CurPage - 1)
        End If
        If Not objPds.IsLastPage Then
            lnkNext.NavigateUrl = Request.CurrentExecutionFilePath + "?Page=" + Convert.ToString(CurPage + 1)
        End If
        Repeater1.DataSource = objPds
        Repeater1.DataBind()
        objConn.Close()

我是得到具体哪一类型的用户的信息的, 在做的时候,你们可以根据自己的需要对适配器进行处理。

这个的知识点是要想到用 PagedDataSource 这个类,问题解决了。


标签:

本站文章除注明转载外,均为本站原创或翻译。欢迎任何形式的转载,但请务必注明出处、不得修改原文相关链接,如果存在内容上的异议请邮件反馈至chenjj@pclwef.cn

文章转载自:csdn

为你推荐

  • 推荐视频
  • 推荐活动
  • 推荐产品
  • 推荐文章
  • 慧都慧问
扫码咨询


添加微信 立即咨询

电话咨询

客服热线
023-68661681

TOP