Formda VBA ile satır silmek
#1
Merhaba arkadaşlar,

otomatik satır silme konusuyla ilgili örnekler buldum ama Access bilgim kısıtlı olduğu için bendeki soruna bir çözüm üretemedim.
Ekte gönderdiğim veritabanım afrikalı çocuklar ve onların okul masraflarını üstlenen aileler için.
PARTICULIERS adındaki formda velilere ait bilgiler depolanıyor. Sondaki iki sekme de bu veli için listeden çocuk seç ve mevcut olarak okuttuğu çocukları listeden sil işlemlerine yarıyor...
Affecter un filleul sekmesinde, Velisi olmayan çocukları bir sorgu aracılığıyla buluyor ve VBA ile ELEVES formundaki 3.sekme olan ID Famille Marraine kısmını otomatik olarak güncelliyorum. Formu kapattığım zaman işlem yerine getirilmiş oluyor. Ancak Desaffecter un filleul sekmesinde yani sonuncı sekmede bu işlemin tersini yapmak istediğimde işlemi yapıyorum ancak tablolar arasında tanımladığım ilişki yüzünden istediğim güncelleştirmeyi yani silme işlemini yapamıyorum. Bu ilişkiler ekleme yaparken bir hata vermiyor ancak silme işleminde neden hata veriyor anlamadım.
Veri silme komudunu bilmediğim için
sil şeklinde atadığım değişkene
sil = " " seklinde değer verip silinmesini istediğim kısmı
Forms!ELEVES.choose_family= sil
şeklinde tanımlıyorum... silme işlemini yapıyor ancak hata olduğu için işlem gerçekleşmiyor...

Sorunu pek düzgün de anlatamadım ama bir gözatarsanız memnun olurum.
Çok sağolun

Halil


Eklenti Dosyaları
.rar   BDD.rar (Boyut: 226,94 KB / İndirilme: 149)



  Alıntı
Bu mesajı beğenenler:
#2
Merhaba Halil..

Uygulamanız bir veli birden çok öğrenci alabilir yapıda.. Silme işlemi tek tek mi olmalı yoksa o veliye ait tüm öğrenci kayıtlarını mı kapsamalı? Bir de şu var: Çocukların kaydını silmeyeceğiz değil mi? Sadece veli alanını (sanırım ID Famille Marraine) alanını boşaltacağız..



  Alıntı
Bu mesajı beğenenler:
#3
Çıkmam gerekiyor, sizden de yanıt gecikecek galiba.. Ben size iki farklı öneride bulunayım..

Alttaki prosedürleri ana formunuzun üzerine ekleyeceğiniz bir düğmede kullanınız..:

Aileden tüm çocuklerı silmek ve çocukların aile durumunu boşaltmak için bu prosedürü kullanın..:

Visual Basic
  1. Dim kriter As String
  2. kriter = familyID
  3. CurrentDb.Execute "update ELEVES set [ID Famille Marraine] = Null " _
  4. & "where [ID Famille Marraine]= '" & kriter & "' "
  5. [ELEVES sous-formulaire1].Requery



Çocukların kaydını tümden silmek için bu prosedürü kullanın...:

Visual Basic
  1. Dim kriter As String
  2. kriter = familyID
  3. CurrentDb.Execute "delete from ELEVES " _
  4. & "where [ID Famille Marraine]= '" & kriter & "' "
  5. [ELEVES sous-formulaire1].Requery







  Alıntı
Bu mesajı beğenenler:
#4
Merhaba Sn. Taruz,

ihtiyacım olan şey sadece tek bir çocuğun veli alanını silmek (evet ID Famille Marraine)
Aslında bu yüzden ana form üzerinden bir tuşla değil de aile üzerine kayıtlı çocukların görüntülendiği bir liste ve bu liste üzerinde silinmek istenen çocuğun adına tıklama yaparak çalışan bir işlem olsun düşüncesindeydim.
Galiba silmek tabiri biraz yanlış kaçıyor çünkü silmekten kastım aslında çocuğun veli alanını silmek... Bu veli alanı silinince liste güncellendikten sonra söz konusu çocuk artık velinin listesinde görünmeyek ama bu çocuk kendisine başka bir veli bulunmak üzere veritabanımızda kalacak şekilde bir çözüm arayışı içindeyim.

ilgi ve yardımınız için çok teşekkür ederim
halil



  Alıntı
Bu mesajı beğenenler:
#5
Sn Taruz,
sizden gelen öneriler doğrultusunda küçük bir değişiklikle sorunun çözümünü buldum sanırım. Şöyle bir şey yaptım

Visual Basic
  1. Dim kriter As String
  2. kriter = ID_Elève
  3.  
  4. DoCmd.OpenForm "ELEVES", , , _
  5. "[ID Elève]= '" & kriter & "'"
  6.  
  7. CurrentDb.Execute "update ELEVES set [ID Famille Marraine] = Null " _
  8. & "where [ID Elève]= '" & kriter & "' "



tam istediğim gibi çalışıyor şimdi Smile

form bünyesinde emeği geçen herkese teşekkürlerimi sunuyorum. Buradan çok şey öğrenme fırsatım oldu.
saygılar
halil



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [SORGU] Row-number() Yada Satır Sayısı kahramanselim 2 381 15-10-2024, 16:26
Son Mesaj: kahramanselim
  [RAPOR] Satır Aralarında Boşluk Olması meceka 1 353 31-05-2024, 15:16
Son Mesaj: dsezgin
  Açılır Kutu Değerine Göre Tablo2'ye Değer Yazsın Veya Satır Eklesin. ŞabanTR 11 997 24-12-2023, 14:38
Son Mesaj: dsezgin
  [VBA] Masaüstündeki Tüm Access Dosyalarını Silmek benuva 10 768 22-07-2023, 14:35
Son Mesaj: dsezgin
  Altformda Hücre Ile Değil Satır Ile Işlem Yapma Hakkında. OGUZTURKYILMAZ 1 452 22-04-2023, 23:48
Son Mesaj: OGUZTURKYILMAZ
  [VBA] Ilişkili Tablodaki Verileri Tüm Tablolardan Silmek. programmer67 1 398 14-01-2023, 20:13
Son Mesaj: dsezgin
  Access'te Boş Satırları Komple Silmek Asistan1 26 1.767 05-12-2022, 16:06
Son Mesaj: Asistan1
  [SORGU] Son 10 Kayıt Hariç Tabloda Satır Silme hedefkaya 9 841 03-09-2022, 17:59
Son Mesaj: halily

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi