arkadaşlar vb den anlayan arkadaş varsa ve cevaplarsa çok senirim...tam 1 haftadır uğraşıyorum ama nedense datalistte sayfalama olayını bir türlü yapamadım...kullandığım kodlar aşağıda..
Namespace datalist
''' <summary>
''' Summary description for WebForm1.
''' </summary>
Public Class WebForm1
Inherits System.Web.UI.Page
Protected DataList1 As System.Web.UI.WebControls.DataList
Protected TextBox1 As System.Web.UI.WebControls.TextBox
Protected TextBox2 As System.Web.UI.WebControls.TextBox
Protected LinkButton1 As System.Web.UI.WebControls.LinkButton
Protected LinkButton2 As System.Web.UI.WebControls.LinkButton
Private Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
If Not IsPostBack Then
TextBox1.Text = "0"
TextBox2.Text = "1"
Build_List()
End If
End Sub
Private Sub Build_List()
Try
Dim dsn As String = "ASPNETDBConnectionString1"
Dim ocon As New SqlConnection(dsn)
ocon.Open()
Dim strsql As String = "select * from Abonozer_Sertifica"
Dim oda As New SqlDataAdapter(strsql, ocon)
Dim ods As New DataSet()
Dim index As Integer = Integer.Parse(TextBox1.Text)
oda.Fill(ods, 4, 4, "contact")
DataList1.DataSource = ods.Tables("contact").DefaultView
DataList1.DataBind()
ocon.Close()
Catch ex As Exception
Response.Write(ex.Message + " " + ex.StackTrace)
End Try
End Sub
#Region "Web Form Designer generated code"
Protected Overloads Overrides Sub OnInit(ByVal e As EventArgs)
'
' CODEGEN: This call is required by the ASP.NET Web Form Designer.
'
InitializeComponent()
MyBase.OnInit(e)
End Sub
''' <summary>
''' Required method for Designer support - do not modify
''' the contents of this method with the code editor.
''' </summary>
Private Sub InitializeComponent()
AddHandler Me.LinkButton1.Click, AddressOf LinkButton1_Click
AddHandler Me.LinkButton2.Click, AddressOf LinkButton2_Click
AddHandler Me.Load, AddressOf Page_Load
End Sub
#End Region
Private Sub LinkButton1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
Dim index As Integer = Integer.Parse(TextBox1.Text)
index -= 1
TextBox1.Text = index.ToString()
Build_List()
End Sub
Private Sub LinkButton2_Click(ByVal sender As Object, ByVal e As System.EventArgs)
Dim index As Integer = Integer.Parse(TextBox1.Text)
index += 1
TextBox1.Text = index.ToString()
Build_List()
End Sub
End Class
End Namespacesayafada tüm ürünleri gösterebiliyorum sorun yok...sorun bu ürünlerin sayfada 10 ar 10 ar çıkması gerekiyor...diğerleri sayfalama şeklinde çıkması gerekiyor...aynı googledeki gibi...arama yaptığımız zaman altta sayfalar çıkıyor sayfa başına 10 adet link çıkıyor...yapmaya çalıştığım olay o....ama ne yaptımsa olmadı...ürünlerin tamamı aynı sayfada çıkıyor...yardımcı olabilecek arkadaş varsa ilgilenirse çok sevinirim...saygılar