חלוקה לדפים בRepeater
תודה למי שעזר לי!!! רק עוד שאלה קטנה. מה יש להוסיף לקוד כדי שיכתבו מספרי העמודים ויהיה אפשר ללחוץ עליהם כדי לעבור לעמוד מסוים ולא רק קדימה ואחורה .(כמו שיש ברבה אתרים...) הקוד המדובר: Dim pages As PagedDataSource Dim x As Integer pages = New PagedDataSource dt = log.getProducts("kk", "Price", "asc") '= ds.Tables("t1").DefaultView pages.DataSource = dt.DefaultView pages.AllowPaging = True pages.PageSize = 2 x = pages.PageCount Dim curpage As Integer If Not IsNothing(Request.QueryString("Page")) Then curpage = Convert.ToInt32(Request.QueryString("Page")) Else curpage = 1 End If pages.CurrentPageIndex = curpage - 1 lblCurrpage.Text = "Page: " + curpage.ToString() If Not pages.IsFirstPage Then lnkPrev.NavigateUrl = Request.CurrentExecutionFilePath + _ "?Page=" + CStr(curpage - 1) End If If Not pages.IsLastPage Then lnkNext.NavigateUrl = Request.CurrentExecutionFilePath + _ "?Page=" + CStr(curpage + 1) End If Repeater1.DataSource = pages Repeater1.DataBind() ואם יש לכם רעיון אחר הוא גם יתקבל... ישר כח!!! ובוע נפלא!!!
תודה למי שעזר לי!!! רק עוד שאלה קטנה. מה יש להוסיף לקוד כדי שיכתבו מספרי העמודים ויהיה אפשר ללחוץ עליהם כדי לעבור לעמוד מסוים ולא רק קדימה ואחורה .(כמו שיש ברבה אתרים...) הקוד המדובר: Dim pages As PagedDataSource Dim x As Integer pages = New PagedDataSource dt = log.getProducts("kk", "Price", "asc") '= ds.Tables("t1").DefaultView pages.DataSource = dt.DefaultView pages.AllowPaging = True pages.PageSize = 2 x = pages.PageCount Dim curpage As Integer If Not IsNothing(Request.QueryString("Page")) Then curpage = Convert.ToInt32(Request.QueryString("Page")) Else curpage = 1 End If pages.CurrentPageIndex = curpage - 1 lblCurrpage.Text = "Page: " + curpage.ToString() If Not pages.IsFirstPage Then lnkPrev.NavigateUrl = Request.CurrentExecutionFilePath + _ "?Page=" + CStr(curpage - 1) End If If Not pages.IsLastPage Then lnkNext.NavigateUrl = Request.CurrentExecutionFilePath + _ "?Page=" + CStr(curpage + 1) End If Repeater1.DataSource = pages Repeater1.DataBind() ואם יש לכם רעיון אחר הוא גם יתקבל... ישר כח!!! ובוע נפלא!!!