Derinlemesine BLL ( Business Logic Layer ) Kullanımı

[cakir]

Herkese Merhabalar Arkadaşlar Bugünkü ProjemizDe BLL'e Değineceğiz ( Business Logic Layer ) İle İnsert,Update, Ve Delete İşlemlerini Gerçekleştireceğiz,
Bunu Yaparken xsd ( Xml Schema Data ) Kullanırken Ayrıca Olayı Bir Basamak Daha Yukarı Çıkartarak Kendi Class'ımızı Oluşturarak Olaya Dahil Olacağız,
Gelin Hiç Vakit Kaybetmeden Uygulamamıza Başlayalım İsterseniz.
Artık Visual Studio Ve Sql Server Vazgeçilmezimiz
Hemen Visual Studio İle Ben VB Kullanacağım Bir Başka ProjemizDe C# Kullanırız Windows Forms Uygulaması Oluşturuyoruz İsmi Size Kalmış
Hemen AkabinDe Form1'imize Bir Adet DataGridView Bırakıyoruz Hemen Formumuza Bir Sağ Click Ve Yeni Bir Form Daha Ekliyoruz Ve Adını KayıtIslemleri Diye Değiştiriyoruz
Ve KayıtIslemleri Formumuza


İlk Önce Sql İçin Bağlantımız Oluşturuyoruz
Resimde görüldüğü Gibi Projemizin Üzerine Sağ Click Ve Ardından Properties Kısmına Tıklıyoruz Ve Bağlantı Cümlemizi Aşağıdaki Resimdeki Gibi Oluşturuyoruz Sql İle Bağlantımızı Sağlam Bir ŞekilDe,
Gerçekleştirmiştik Olduk.

3 Adet Label,
3 Adet TextBox,
4 Adet Button Ekliyoruz

Ve Eklediğimiz Bu ElemanlarDan TextBox Ve Button'ların Properties Kısmına Gidip Modifiers Özelleiğini public Olarak Değiştiriyoruz ...

Yukarıdaki ResimDede Görüldüğü Gibi Projemize Sağ Tıklayıp Boş Bir Klasör Ekliyoruz Ve İçerisine Sağ Clik Deyip Add New Item Dedikten Sonra Northwind.xsd AdınDa DataSet'imizi Ekliyoruz Ve,
Şimdilik Boş Bırakıyoruz Hemen Akabinde klasörümüze TekrarDan Sağ Click Ve Bir Class Ekliyoruz Adı ShippersClass.vb Ve İçerisini Aşağıdaki Resimdeki Gibi Dolduruyoruz

Gelelim Northwind.xsd DataSet'imize Ben Daha Önce Oluşturduğum İçin Hepsinin Teker Teker Açıklamasını Yapalım ...
Aşağıdaki Resimleri Takip Ederek Sırası İle Customer Tablosunu Ekleyelim Ben Daha Önce Shippers Tablosunu Eklediğim İçin Örnek Olması AçısınDan,
Nasıl Olduğunu Göstermek Adına Bu Kadar Detaya Girdim İlk Defa Kullanacak Arkadaşları Düşünerek ...

[/CENTER]



Yukarıdaki Resimlerdeki İşlemleri YaptıkDan Sonra Artık Sıra Geldi Code Kısmına Hiç Vakit Kaybetmeden KayıtIslemleri Formumuza Gidiyoruz Ve Global AlanaDa Aaşağıdaki Kodumuzu Yazıyoruz,
Diğer Form'dan Bu Formumuza Erişebilmek Adına.


Public _myForm As Form


Hemen Ardından Form1'imizin Code'larına Geçiyoruz Ve Aşağıdaki Gibi İlk Önce Formumuzun Load Olayını Gerçekleştiriyoruz
Daha Sonra GridView'imizin CellClick Event'ına Giderek Aşağıdaki Kodlarımızı Yazıyoruz KayıtIslemleri Formumuza Erişebilmek Adına ...

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'ShippersClass'ımızDaki GetShippers Methodumuzu Çağırıyoruz Dikkat Ederseniz new Diyerek Class'ımızın Instance'ını Oluşturmuyoruz Çünkü
'ShippersClass'ımızda Ki Bütün Methodları Shared Olarak Tanımladık ...
DataGridView1.DataSource = ShippersClass.GetShippers()
End Sub


Private Sub DataGridView1_CellClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellClick

Dim mmForm As New KayıtIslemleri
mmForm.Parent = Me.Parent
mmForm.Show()

End Sub



Sırası İle Kayıt İşlemleri FormumuzDa Bulunan Butonların Click Olaylarına Aşağıdaki Code'larımızı Ekliyoruz

'Insert Button
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim companyName As String = txtCompanyName.Text
Dim phone As String = txtPhone.Text

ShippersClass.Insert_Shippers(companyName, phone)
Form1.DataGridView1.DataSource = ShippersClass.GetShippers()
MessageBox.Show("Kayıt Başarılı Oldu Bea", "Uyarı ?", MessageBoxButtons.OK, MessageBoxIcon.Information)

txtCompanyName.ResetText()
txtPhone.ResetText()
End Sub



'Exit Button
Private Sub btnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExit.Click
Me.Close()
End Sub


'Update Button
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim shipperID As Integer = Integer.Parse(txtShipperID.Text)
Dim companyName As String = txtCompanyName.Text
Dim phone As String = txtPhone.Text

ShippersClass.Update_Shippers(companyName, phone, shipperID)

Form1.DataGridView1.DataSource = ShippersClass.GetShippers()

MessageBox.Show("Güncelleme Başarılı Oldu Bea", "Uyarı ?", MessageBoxButtons.OK, MessageBoxIcon.Information)

txtShipperID.ResetText()
txtCompanyName.ResetText()
txtPhone.ResetText()

End Sub


'Delete Button
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

Dim shipperID As Integer = Integer.Parse(txtShipperID.Text)

ShippersClass.Delete_Shippers(shipperID)

Form1.DataGridView1.DataSource = ShippersClass.GetShippers()

MessageBox.Show("Silme İşlemi Başarılı Oldu Bea", "Uyarı ?", MessageBoxButtons.OK, MessageBoxIcon.Information)

txtShipperID.ResetText()

End Sub



Artık Bütün İşlemlerimizi Bitirdiğimize Göre Gelelim Yaptıklarımızı Test Aşamasına
Hiç Vakit Kaybetmeden Projemizi Çalıştırıyoruz Ve Aşağıdaki Görüntü İle Karşılaşıyoruz ...

DataGridView'imizin Herhangi Bir Satırına Tıkladığımızda İkinci formumuz Karşımıza Gelecek Ve Görüntümüz Aşağıdaki Gibi Olacaktır.

Artık İkinci Formumuzdan İnsert,Update,Delete İşlemlerini Rahatça Gerçekleştirebiliriz

Ben Sadece Update Kısmını Yaptım İnsert; Ve Delete DenemesiNi Siz Yapabilirsiniz İstediğiniz Gibi İnsert Ve Delete OlayıDa Gerçekleşecektir
Geldik Bir Projemizin Daha Sonuna Öğrendiklerimize Gelir İsek Sihirbah İle DataSet.xsd Kullanmasını Ve DataSet'imizin Arasına Girerek Kendi Class'ımızı Oluşturduk,
Ve Olaya Kendimiz Müdahale Ettik Biraz Yorulduk Ama Yorgunluğumuza Değdi ...
Olayı Biraz Daha İleri Götürerek Her Önüne Gelen Paldır Güldür Silmesin,Güncellemesin VeYa Kayıt Etmesin Diye İf'ler İle Şu ID'li Kayıt Zaten Daha Önce Kayıtlı Yada Boş Kayıt Silemessiniz,
GibilerinDen Olaya Müdahele Ederseniz Görsellik AçısınDan Daha Güzel Olur O KısmınıDa Sizlere Bıraktım



Not : DataSet.xsd Kullanmak İçin Zaten Sihirbaz Size YardımCı Oluyor Lakin BuaraDa Ki En Önemli Kısım Yine Sizlere Düşüyor Çünkü Tamamen SQL SERVER Bilginize Dayalı
Transact Sql'e Ne Kadar Hakim İseniz DataSet'i Kullanmanız Daha Kolay Olacaktır.

Bir Sonraki ProjemizDe Görüşmek Üzere Hoşçakalın ...