Tweet

Currency Manager ile Veritabanına Kayıt Ekleme

Merhaba. Şimdi Currency Manager yönetmiyle veritabanına kayıt işlemini öğrenelim.

Veritabanımızı oluşturuyoruz. Veritabanı adı Data olsun ve içine tblKayit adında tablo açalım. Tabloya Adi ve Soyadi diye 2 alan ekleyelim.[...]

Daha sonra formumuza OleDbDataAdapter ekleyelim. Toolbox'ta yoksa Tools menüsünden "Choose Toolbox Item" e girip arama bölümüne oledb yazsanız yeterli. Daha sonra OleDbDataAdapter'i seçip Ok butonuna tıklayalım. Daha sonra aynı işlemle formumuza 1 adet Dataview ekleyelim.

Forma 2 textbox ve 2 buton ekledikten sonra formumuza birde Toolbox'tan OleDbDataAdapter ekleyelim. oleDbDataAdapter'i ekledikten sonra alt tarafta bulunan simgesine sağ tuş tıklayıp "Generate Dataset" e tıklayalım. Dataseti de oluşturduktan sonra forma son olarak dataview'ide ekleyelim. Sonra Dataview'in Properties penceresinden Table alanına tablomuzu ekleyelim ve kodlara geçelim.

Kodlar aşağıdaki gibidir.

CODE:
'Formun başına yazılacak kodlar
dim cm as CurrencyManager
Sub Kaydet()
cm = CType(Me.BindingContext(DataView1), CurrencyManager)
End Sub

'Form Load'a aşağıdaki kodu yapıştırıyoruz.

OleDbDataAdapter1.Fill(DataSet1.tblKayit)

'Bu kod ile veritabanımıza bağlanıyoruz.
'Dataset1, dataset adıdır. Siz ne yaptıysanız onu yazacaksınız.

'Form Closed olayına aşağıdaki kodu yapıştırıyoruz.

OleDbDataAdapter1.Update(DataSet1.tblKayit)

'Bu kodu formu kapatırken bilgilerin güncellenmesini sağlıyor.

'Kaydet Butonuna yazılacak kodlar
Kaydet()
cm.EndCurrentEdit()
OleDbDataAdapter1.Update(PeriyodikEser_DataSet1.tblPeriyodikEserler)
MsgBox("Bilgiler Başarılı Bir Şekilde Kaydedildi", MsgBoxStyle.Information)

' Yeni Kayıt butonuna yazılacak olan kodlar

kaydet()
cm.addnew()


x-dark
karagoz.yusuf@hotmail.com
21 Temmuz 2008 21:22

İlgili Olabilecek Makaleler


Yorumlar (0)




Ziyaretçi olarak yorum yazamazsınız. Üye olmak için tıklayın Üye iseniz giriş yapın.



MENÜ » FORUM
Menü » Takip et
RSS Facebook Twitter Friendfeed
Sık Kullanılanlar Google Yahoo Live
Menü » Paylaş
E-Posta ile gönder Twitter Facebook Friendfeed
Buzz Stumbleupon Delicious Digg