03/12/2012, 13:14
Dim tabloOlustur As String = "CREATE TABLE Sede(id counter PRIMARY KEY,kod integer,aciklama char(100))"
Dim baglantiCumlesi As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source='drmofis.mdb';Persist Security Info=True;Jet OLEDBatabase Password=13*13"
Dim baglanti As New OleDbConnection(baglantiCumlesi)
baglanti.Open()
Try
Dim olusturmaKomutu As New OleDbCommand()
olusturmaKomutu.Connection = baglanti
olusturmaKomutu.CommandText = tabloOlustur
olusturmaKomutu.ExecuteNonQuery()
MessageBox.Show("işlem tamam", "işlem")
Catch hata As Exception
MessageBox.Show(hata.Message.ToString(), "hata mesajı")
Bu kod ile "Sede" isminde tablo oluşturuyorum. İsteğim şudur
- Bu isimde tablo varsa eskisi ile değiştirme uyarısı vermesi
- "Sede" tablosundaki alanlara aynı anda veri girilmesi"
Örn: Oluşturulan tablodaki alanlar
id: burası otomatik sayı dır veri girilmiyecek
kod: al
aciklama= deneme konusu
Öneml Not: Eklenecek veriler çok olacak, yani 300,400 satır kadar
Teşekkürler.