10-10-2014 Saat: 19:24
Bu yazımda basit bir veritabanı oluşturup kayıt yapma işlemini anlatacağım. Öncelikle veritabanımızı oluşturalım.
Office Access programını açıp (2002-2003 biçimi mdb) yeni bir veritabanı oluşturun ve adını veritabani.mdb olarak kaydedin. Şimdi veritabanımızda bir tablo oluşturalım ve tablo isminide tablonuz diye kaydedelim.
Tablomuzu açarak üstteki stunları ekleyelim. (ID, ADI, SOYADI, CINSIYET)
ID: Otomatik sayı
ADI, SOYADI ve CINSIYET: Metin
Olarak tablo özelliklerini kaydedin.
Veritabanımızı oluşturduk gelelim programlamamıza.
Bir form oluşturun ve formunuza;
2 adet textbox
3 adet label
1 adet combobox
1 adet button
Ekleyin.
Labellerinizi düzenleyin (Adı, soyadı, cinsiyet)
Mantığımızı anlatalım. 2 adet textboxumuz var bunlara kullanıcıdan adı ve soyadı bilgilerini alıyoruz. Daha sonra bir adet comboboxumuzdan kullanıcının cinsiyet seçmesini istiyoruz. Daha sonra kaydet butonuna basarak oluşturduğumuz veritabanına kayıt işlemini gerçekleştiriyoruz.
Öncelike kodlarımızı verelim;
Kodlarda dikkat ederseniz en üstte Imports System.Data.OleDb tanımladım. Bunu yazmadığınız takdirde kodlar çalışmayacaktır. Bu kısıma dikkat edelim.
Office Access programını açıp (2002-2003 biçimi mdb) yeni bir veritabanı oluşturun ve adını veritabani.mdb olarak kaydedin. Şimdi veritabanımızda bir tablo oluşturalım ve tablo isminide tablonuz diye kaydedelim.
Tablomuzu açarak üstteki stunları ekleyelim. (ID, ADI, SOYADI, CINSIYET)
ID: Otomatik sayı
ADI, SOYADI ve CINSIYET: Metin
Olarak tablo özelliklerini kaydedin.
Veritabanımızı oluşturduk gelelim programlamamıza.
Bir form oluşturun ve formunuza;
2 adet textbox
3 adet label
1 adet combobox
1 adet button
Ekleyin.
Labellerinizi düzenleyin (Adı, soyadı, cinsiyet)
Mantığımızı anlatalım. 2 adet textboxumuz var bunlara kullanıcıdan adı ve soyadı bilgilerini alıyoruz. Daha sonra bir adet comboboxumuzdan kullanıcının cinsiyet seçmesini istiyoruz. Daha sonra kaydet butonuna basarak oluşturduğumuz veritabanına kayıt işlemini gerçekleştiriyoruz.
Öncelike kodlarımızı verelim;
PHP Kod:
Imports System.Data.OleDb
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ComboBox1.Items.Add("")
ComboBox1.Items.Add("Bay")
ComboBox1.Items.Add("Bayan")
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim baglanti As New OleDbConnection("Provider=Microsoft.Jet.Oledb.4.0; Data Source=veritabani.mdb")
baglanti.Open()
Dim sorgu As String
sorgu = "insert into [tablonuz](ADI,SOYADI,CINSIYET) values ('" & TextBox1.Text & "','" & TextBox2.Text & "','" & ComboBox1.Text & "')"
Dim kaydet As OleDbCommand = New OleDbCommand(sorgu, baglanti)
kaydet.ExecuteNonQuery()
MsgBox("Kayıt Tamamlandı, Teşekkürler")
baglanti.Close()
End Sub
End Class
Kodlarda dikkat ederseniz en üstte Imports System.Data.OleDb tanımladım. Bunu yazmadığınız takdirde kodlar çalışmayacaktır. Bu kısıma dikkat edelim.