+- AccessTr.neT (https://accesstr.net)
+-- Forum: Visual Basic 6 (https://accesstr.net/forum-visual-basic-6.html)
+--- Forum: Visual Basic 6 Cevaplanmış Soruları (https://accesstr.net/forum-visual-basic-6-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Daha önce var olan kaydı ikinciye eklememe (/konu-daha-once-var-olan-kaydi-ikinciye-eklememe.html)
Sayfalar:
1
2
Daha önce var olan kaydı ikinciye eklememe - zemre - 27/04/2014
Merhabalar, visual basic hakkında paylaşılan her şeye bakmama rağmen aradığımı bulamadım belki de gözümden kaçtı. Bu yüzden buradan sorayım dedim.
Şimdi benim sorunum vb de Access den veri çekiyorum. Ve yeni kayıt eklerken daha önce aynı bilgi kaydedilmiş mi edilmemiş mi bunu kontrol etmem lazım. Fakat ben kodları bulamıyorum lütfen yardımcı olur musunuz?
Şimdiden teşekkür ederim...
Cvp: Daha önce var olan kaydı ikinciye eklememe - POWER - 27/04/2014
Olay çok kolay fakat örnek ekleyiniz...
Ve hangi "alan" yada "alanlara" göre kontrol edilecek ayrıntı veriniz...
Cvp: Daha önce var olan kaydı ikinciye eklememe - zemre - 27/04/2014
Ben fakülte ismine göre daha önce aynı veri girilmiş mi onu sorgulatacağım. Ama ben sadece kaydetmeyi yapabildim
.
Dim sqlEkle As New OleDb.OleDbCommand("Insert into fakulte (fakulte_adi,fakulte_adres) values ('" & TextBox1.Text & "','" & TextBox2.Text & "')", baglanti)
baglanti.Open()
sqlEkle.ExecuteNonQuery()
Label3.Text = "Yeni kayıt eklendi."
Label3.ForeColor = Color.Red
TextBox1.Text = ""
TextBox2.Text = ""Formum bu.
Cvp: Daha önce var olan kaydı ikinciye eklememe - redali - 27/04/2014
like ile arama yapın mesela
where fakulte_adi not like %'" & TextBox1.Text & "'%Cvp: Daha önce var olan kaydı ikinciye eklememe - zemre - 27/04/2014
Yaptım fakat bana bu uyarıyı verdi virgüllere falan baktım ama ben bahsettiği hatayı bulamadım :/ . Kodu yanlış mı yazdım aceba böyle değil mi sırası?
Dim sqlEkle As New OleDb.OleDbCommand( "Insert into fakulte (fakulte_adi,fakulte_adres) values ('" & TextBox1.Text & "','" & TextBox2.Text & "') where fakulte_adi not like %'" & TextBox1.Text & "'% ", baglanti)
Programı ekliyorum ama orada where kısmını sildim.
Cvp: Daha önce var olan kaydı ikinciye eklememe - direnist - 27/04/2014
baglanti.Open() ile açtığın bağlantıyı
baglanti.Close() ile kapatmamışsın.