.Net Dersleri

Artık bizde teknolojiye ayak uydurup .NET'e yavaş yavaş geçiş yapalım dedik.Veri işlemleri ile başlayalım dedik.Çünkü pratikte en çok bunlar gerekir bize.

Yazımızda veritabanına bağlanıp buradan veri çekmeyi öğreneceğiz.Sonrada döngü kurup verileri listeleyeceğiz.

Herkeste VS.NET olmadığını sayaraktan kodlarımızı CodeBehind olarak yazmayacağız.Bu iş için Not Defteri, ASP.NET Webmatrix ya da FrontPage 6.0'ı kullanabiliriz. (6.0 sürümü ASP.NET'i tanıyor)

Öncelikle localhostumuzda bir klasör açalım ve adı Deneme olsun.Sonra bu klasöre girip.Default.aspx adında bir ASP.NET Web Formu oluşturalım.Sonra ilgili editörümüzle bu dosyayı açalım ve aşağıdaki kodları yazalım.Bu işlemleri yaparken bir hazır veritabanı kullanabilirsiniz.Alanları siz kendinize göre değiştirin.

<%@ Page Language="vb"%>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDB" %>

<script language="vb" runat="server">
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)

Dim objBaglanti As New OleDbConnection(Server.MapPath("Db.mdb"))
objBaglanti.Open()

Dim cmdKomut As New OleDbCommand("SELECT fldBaslik FROM tblIcerikler", objBaglanti)
Dim dtrOku As OleDbDataReader = cmdKomut.ExecuteReader

dtrOku.Read()

Response.Write(dtrOku("fldBaslik"))

dtrOku.Close()
objBaglanti.Close()

End Sub
</script>

Bu örneği çalıştırdığınızda tblIcerikler tablosundaki fldBaslik alanını okutacağız.Ancak bu kayıtların tümünü liste halinde yayınlamak istiyoruz ve ne yapacağız.Endişelenmeyin.

Hemen bir döngü kurarak bu işi halledelim.Sadece <script></script> etiketleri arasında bulunan Sub'ımızda değişiklik yapacağız.Ufak bir döngü kurarak bunuda şu şekilde yapabiliriz.

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)

Dim objBaglanti As New OleDbConnection(Server.MapPath("Db.mdb"))
objBaglanti.Open()

Dim cmdKomut As New OleDbCommand("SELECT fldBaslik FROM tblIcerikler", objBaglanti)
Dim dtrOku As OleDbDataReader = cmdKomut.ExecuteReader

While dtrOku.Read

Response.Write(dtrOku("fldBaslik"))

End While

dtrOku.Close()
objBaglanti.Close()

End Sub

Sub'ımızıda bu şekilde değiştirdikten sonra verileri tamamen listeleyebiliriz. Şimdilik bu işlemler üzerinde yoğunlaşın arkadaşlar.Bunlar daha başlangıç.ASP.NET dünyası emin olun çok daha geniş.Önümüzdeki yazıda verileri listelemeye geçeceğiz.

Gerçi bu yazdığımız kod aslında ASP.NET'ten ziyade ASP mantığı ile yazılmıştır.Bu da ASP'den ASP.NET'e geçiş yapanlar için ideal ve anlaşılırdır ileride bunları genişleteceğiz.

Bu makale biraz örnek kod tarzında oldu ancak önümüzdeki günlerde çok detaylı yazılarla birlikte olacağız.