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-1403, Jelsoft Enterprises Ltd.