Asp.net İle Sayfalama (Veri Türü SQL) (tr - Papatyam Forum

Papatyam Forum

Go Back   Papatyam Forum > ..::.BİLGİSAYAR & TEKNOLOJİ.::. > Web Master > asp.net

Yeni Konu aç  Cevapla
 
Seçenekler
Alt 21 January 2009, 22:13   Mesaj No:1

agasarlinuris

Papatyam Aktif Üyesi
Avatar Otomotik
Durumu:agasarlinuris isimli Üye şimdilik offline konumundadır
Papatyam No : 1326
Üyelik T.: 16 July 2008
Arkadaşları:0
Cinsiyet:
Mesaj: 53
Konular:
Beğenildi:
Beğendi:
Takdirleri:10
Takdir Et:
Konu Bu  Üyemize Aittir!
Standart Asp.net İle Sayfalama (Veri Türü SQL) (tr

Asp.net İle Sayfalama (Veri Türü SQL) (tr

Dosya adımız Sayfala.aspx kodumuz şöyle;
////////////////Sayfala.aspx//////////////////
<%@ Page Language="VB" Debug="true" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SQLClient" %>
<script language="VB" runat="server">
Public objCon As New SQLConnection("server=ASP;User id=SA;password=;database=Northwind&quot
Sub Sayfa_Load(Source as Object, E as EventArgs)
dim currentSayfa as integer
if request.querystring("Sayfa&quot = "" then
currentSayfa = 1
else
currentSayfa = request.querystring("Sayfa&quot
end if
getRst(currentSayfa)
getSayfala(currentSayfa)
end sub
public sub getRst(Sayfa as integer)
dim SayfaNo as integer
dim sql as string
SayfaNo = 10 * (Sayfa - 1)
Dim ds as DataSet=New DataSet()
sql = "select * from Products"
Dim cmd As SQLDataAdapter = New SQLDataAdapter(sql, objCon)
cmd.Fill(ds, SayfaNo , 10, "results&quot
rst_table.DataSource = ds.Tables("results&quot.DefaultView
rst_table.databind()
end sub
Sub getSayfala(cSayfa as integer)
Dim cmd As SQLCommand = New SQLCommand("Select count(*) from Products", objCon)
objCon.Open()
Dim totalRecords as integer = cmd.ExecuteScalar().toString
Dim totalSayfas As integer
if totalRecords MOD 10 = 0 then
totalSayfas = int(totalRecords / 10)
else
totalSayfas = int(totalRecords / 10) + 1
end if
Dim i as integer
Dim SayfaTxt As String = "More Sayfas : "
if cSayfa > 1 then
SayfaTxt += "<a href=Sayfala.aspx?Sayfa=" & cSayfa - 1 & ">Önceki</a> "
end if
for i = 1 to totalSayfas
if cSayfa = i then
SayfaTxt += "<b>" & i & "</b> "
else
SayfaTxt += "<a href=Sayfala.aspx?Sayfa=" & i & ">" & i & "</a> "
end if
next i
if cSayfa < totalSayfas then
SayfaTxt += "<a href=Sayfala.aspx?Sayfa=" & cSayfa + 1 & ">Sonraki</a> "
end if
showSayfas.text = SayfaTxt
end sub
</script>
<html>
<body>
<aspataGrid runat="server" Id="rst_table" cellpadding="0" cellspacing="2" width="96%" font-size = "10pt" RepeatColumns="1" />
<asp:label id="showSayfas" runat="server" Font-Names="Verdana" Font-size="12px" />
</body>
</html>
Alıntı ile Cevapla
Cevapla

Bookmarks

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler

Benzer Konular
Konu Başlıkları Konuyu Başlatan

Papatyam Forum Ana Kategori Başlıkları

Cevaplar Son Mesajlar
Java ile veri yapıları agasarlinuris java- jsp 0 21 January 2009 22:48
Veritabanına bağlanmak ve veri almak agasarlinuris asp 0 21 January 2009 22:01
IBM ışık hızı ile veri iletti YakupEMİR Teknoloji Son Haberler 0 29 March 2008 18:46
Asp.net ile veri tabanina kayit tamerr89 asp.net 0 29 March 2008 13:02
Aldatmanın 6 türü var PESTEMAL Bayanlara Özel (Erkeklerin Girmesi Yasaktır :-)) 1 14 September 2007 10:09

Yeni Sayfa 1

www.papatyam.org Ana Sayfa

Tefekküre Davet Köşesi

Papatyam Sosyal Medya Guruplarımıza Katılın

                       Instagram         

Papatyam alemdarhost.com sunucularında barındırılmaktadır.