selam arkadaşlar ben rent a car ( araç kiralama ) projesi hazırlayacağım
vb.net ile studio ortamında
Access dosyasına form üzerindeki textboxları alanlara bağlanmak istiyorum yani kısacası textlere giriş yapıp kaydet butonuyla verileri
Access tablosuna göndermek istiyorum yardımcı olabilcek arkadaşlar war mı?teşekkürler ;)
Mesajınızı çok iyi anlamamış
olabilirim ama siz bir adım atıp
birşeyler yapsanız da takıldığınız
yerlerde yardımcı olsak
Selamlar
Merhaba,
Direkt
Access veritabanına kayıt eklemek için şöyle bir yol izleyebilirsin.
şu an kendim hepsini yazdığım için harfleri mümkün olduğunca hatasız yazmaya çalıştım. kodlamaya yapıştırdığında hatalı harf çıkarsa bildirirsiniz.
imports system.data
imports system.data.oledb
imports system.xml
public class form
private sub kaydet_click(byval sender as system.object, byval e as system.eventargs) handles kaydet.click
Dim baglanti, sorgu as string
dim parametre(4) as oledbparameter
baglanti= "provider=Microsoft.jet.oledb.4.0; data source=C:\\Eczane Klasörü\\Saglik.mdb" 'burda Access veritabanı ile bağlantıyı sağladık
sorgu = "insert into SaglikTablosu (Musteriadi, adresi, Teshis, ilacAdi, Fiyat) values(?,?,?,?,?)" 'veritabanında eklenilecek tablo ve alanları belirledik.
oledbconnection1 = new oledbconnection(baglanti)
oledbconnection1.open()
oledbcommand1 = new oledbcommand(sorgu, oledbconnection1)
parametre(0) = new oledbparameter()
parametre(1) = new oledbparameter()
parametre(2) = new oledbparameter()
parametre(3) = new oledbparameter()
parametre(4) = new oledbparameter()
'burada formumuzdaki text alanlarını veritabanındaki ilgili alanlar ile ilişkilendiriyoruz.
parametre(0).value=textbox1.text
parametre(1).value=textbox2.text
parametre(2).value=textbox3.text
parametre(3).value=textbox4.text
parametre(4).value=convert.toint32(textbox5.text) 'burası fiyat olduğu için text içinde yazılanı sayıya çevirdik. o şekilde veritabanına atması için.
oledbcommand1.parameters.add(parametre(0))
oledbcommand1.parameters.add(parametre(1))
oledbcommand1.parameters.add(parametre(2))
oledbcommand1.parameters.add(parametre(3))
oledbcommand1.parameters.add(parametre(4))
oledbcommand1.executenonquery()
end sub
end class
ilginizden dolayı tşkler cuneyt kardeş ama bu kodlar bende çalışmadı
oledbconnection ve OleDbCommand.Parameters bölümlerinde hata verdi düzeltemedim?
oledbconnection , oledbcommand , oledbdataadapter bunları sizin menüden seçip formunuza eklemeniz gerekiyor.
yazım yanlışlığı değil yani..
burda siz ilk edapta formu oluştururken oledbconnection , oledbcommand , oledbdataadapter menüden formunuza eklemeniz gerekiyordu.
hayır ben onları kütüphaneye import ile ekledim zaten mesela oledbcommand1.parameters.add(parametre(0))
oledbcommand dan sonra böle bi parametre çıkmadı bende