sarairavani
پنج شنبه 16 تیر 1390, 15:57 عصر
هر صفحه به طو رمثال  10 خط را نشان دهد
mhmoein
جمعه 17 تیر 1390, 02:44 صبح
سلام دوست عزیز
منظورت اینجوری هست دیگه حالا این 5 تایی هست شما 10 تاش کن. از این نمونه کد ایده بگیر
72084
Imports System.Data.SqlClient
Public Class Form1
    Dim pagingAdapter As SqlDataAdapter
    Dim pagingDS As DataSet
    Dim scrollVal As Integer
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim connectionString As String = "Data Source=.;Initial Catalog=pubs;Integrated Security=True"
        Dim sql As String = "SELECT * FROM authors"
        Dim connection As New SqlConnection(connectionString)
        pagingAdapter = New SqlDataAdapter(sql, connection)
        pagingDS = New DataSet()
        connection.Open()
        pagingAdapter.Fill(pagingDS, scrollVal, 5, "authors_table")
        connection.Close()
        DataGridView1.DataSource = pagingDS
        DataGridView1.DataMember = "authors_table"
    End Sub
    Private Sub button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button2.Click
        scrollVal = scrollVal - 5
        If scrollVal <= 0 Then
            scrollVal = 0
        End If
        pagingDS.Clear()
        pagingAdapter.Fill(pagingDS, scrollVal, 5, "authors_table")
    End Sub
    Private Sub button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button3.Click
        scrollVal = scrollVal + 5
        If scrollVal > 23 Then
            scrollVal = 18
        End If
        pagingDS.Clear()
        pagingAdapter.Fill(pagingDS, scrollVal, 5, "authors_table")
    End Sub
End Class
sarairavani
یک شنبه 19 تیر 1390, 09:52 صبح
من مشکلم رو link وسط 1 2 3 .. که هم زمان با next  کار کنه و هر  یک pageنشون بده با datatable هم کار کنه ممنونم
mhmoein
یک شنبه 19 تیر 1390, 11:22 صبح
می شه بیشتر توضیح بدی منظورت رو دقیق متوجه نشدم دوست من
vBulletin® v4.2.5, Copyright ©2000-1404, Jelsoft Enterprises Ltd.