Skip to main content

AccessTr.neT


Metin Kutusunun İçindeki Değer Tabloya Eşitse Silsin

Metin Kutusunun İçindeki Değer Tabloya Eşitse Silsin

Çözüldü #1
Metin kutusunun içindeki kaydı silebilir miyiz.? Şöyle kodu çalışmama entegre etmek istiyorum?

metin kutusunun adı: txtadsoyad
Tablo adı: tbl_ogrenciler
tablodaki alan adi: adi_soyadi


Visual Basic Code
Dim GItem As Variant

For Each GItem In txtadsoyad.ItemsSelected


    If MsgBox(Me.txtadsoyad(GItem) & " listeden silinsin mi?", vbQuestion + vbYesNo) = vbYes Then
        DoCmd.SetWarnings False
        DoCmd.RunSQL "DELETE adi_soyadi FROM tbl_ogrenci WHERE (((adi_soyadi)='" & Me.txtadsoyad.ItemData(GItem) & "'))"
        
        DoCmd.SetWarnings True

    End If

Next GItem
Cevapla
#2
ItemsSelected olayı liste kutusuna ait bir olay. Ama metin kutusunda nasıl bir yol izliyoruz.
Cevapla
#3
SQL Code
  If MsgBox(Me.txtadsoyad & " listeden silinsin mi?", vbQuestion + vbYesNo) = vbYes Then
        DoCmd.SetWarnings False
        DoCmd.RunSQL "DELETE adi_soyadi FROM tbl_ogrenci WHERE (((adi_soyadi)='" & Me.txtadsoyad & "'))"
        
        DoCmd.SetWarnings True

    End If
Böyle bir düzenlemede nasıl bir açık oluşur. Bu şekilde düzenlediğimde kod çalışıyor.

aslında benim öğrenmek istediğim olay şu. form üzerinde olmayan bir liste kutusuna çift tıklanarak veriler formdaki nesnelere getiriliyor. Buradan kişiyi silmek istiyorum. En doğru yol nasıl olur.
Cevapla
#4
Merhaba.En sondaki koda görede olur lakin birden fazla ayn adsoyad varsa alanda hepsi silinir yani 
ahmet
Ahmet
Gibi ise ikiside silinir.Onun için benzersiz alan için yapılmalı.Eğer otomatik sayı alanı varsa en iyisi o olur.

Birde runsql değilde tam bilmiyorum 
currentdb.execute(tam yazdımmı bilmiyorum) bununla delete yaparsanız setWarnings olaylarına gerek kalmaz.
Son Düzenleme: 26/03/2020, 02:21, Düzenleyen: feraz.
Cevapla
#5
Merhaba, bahsi geçen liste kutusundaki seçili verinin silinmesi sağlanabilir, ancak olmayan liste kutusunun çift tıklanma olayını anlayamadım.
"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 
Cevapla
#6
Sayın OzanKaya: Dosyam ekdedir. İki Adet sorun var ve sizden tavsiye bekliyorum.
1. frm_ogrenciler formundan kayıtlı öğrencileri listele dedikten sonra frm_listeogrenci formuyla birlikte liste kutusu açılıyor. Çitf tıklama ile ilgili kayıta ulaşılıyor.Düzenle dedikten sonra kayıta bir iki ekleme yapıp kaydet deyince; doğal olarak mükerrer sorgulaması yapıp kayda izin vermiyor. BUNA nasıl bir çözüm bulmalıyım.
2. Silme komutunda bir problem var mı?

Sizden ricam bununla ilgilenebilir misiniz?
.rar DİSİPLİN PROGRAMI - v1.rar (Dosya Boyutu: 92,76 KB | İndirme Sayısı: 2)
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da