MS Access Veritabanı Tablosuna Visual Basic ile Veri Eklemek

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim sql As New String("INSERT INTO @tabloadı (@alan1, @alan2, @alan3, @alan4, @alan5, @alan5, @alan6) values ('" + Text1.Text + "','" + DateTimePicker1.Text + "','" + ComboBox1.Text + "','" + Text2.Text + "','" + Text3.Text + Text4.Text + "') ") 'Altı alanı olan bir access veritabanı dosyası için ekranda iki değeri combobox'tan, bir tarih değeri 'datetimepicker'dan, kalan üç öge textbox'lardan alınmıştır bu örnekte. Dim baglanti As New OleDbConnection("Provider=Microsoft.ace.OLEDB.12.0;Data Source= 'E:\@accessveritabanıadı.accdb'") 'E sürücüsünde bir access veri tabanı adresi verilmiştir Dim komutnesnesi As New OleDb.OleDbCommand(sql, baglanti) Dim sonuc As Integer baglanti.Open() sonuc = komutnesnesi.ExecuteNonQuery() End Sub

Yorumlar

Bu blogdaki popüler yayınlar

AUTOLISP DOSYALARININ KALICI KULLANIMI

AUTOLISP PROGRAMLARINI ÇALIŞTIRMAK