AccessTr.neT
Kayıt Sil Kodu - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Kayıt Sil Kodu (/konu-kayit-sil-kodu.html)

Sayfalar: 1 2


Kayıt Sil Kodu - notrino - 05/10/2018

Merhaba,

1) Access standart makrosu içinde yer alan "Kayıt sil" butonunun Vba kodu nedir acaba?

2) Bir de kimliğe bağlı kayıt sil komutunu öğrenmek istiyorum. Yani nasıl ki ;

Kod:
DoCmd.OpenForm "Form Adı", acNormal, , "[Kimlik]=" & Me.Kimlik
komutu kimliğe bağlı bir form açıyor, aynı şekilde kimliğe bağlı bir silme olayı yaratmak istiyorum. Tşk.


Cvp: Kayıt Sil Kodu - Allback - 05/10/2018

(05/10/2018, 11:53)notrino yazdı: Merhaba,

1) Access standart makrosu içinde yer alan "Kayıt sil" butonunun Vba kodu nedir acaba?

2) Bir de kimliğe bağlı kayıt sil komutunu öğrenmek istiyorum. Yani nasıl ki ;

Kod:
DoCmd.OpenForm "Form Adı", acNormal, , "[Kimlik]=" & Me.Kimlik
komutu kimliğe bağlı bir form açıyor, aynı şekilde kimliğe bağlı bir silme olayı yaratmak istiyorum. Tşk.

Merhaba,

Direk Vba kodunun karşılığı nedir bilmiyorum ama ben "koşula bağlı" silme işlemlerinde aşağıdaki kod bloğunu kullanıyorum.

Kod:
Set db = CurrentDb()
SQL = "SELECT * FROM standartlar_listesi_tablosu WHERE id = " & Me.txid & ";"
Set rs = db.OpenRecordset(SQL)
rs.Delete

Tablonuzdaki tüm veriyi silmek istiyorsanız aşağıdaki kodu kullanabilirsiniz.

Kod:
DoCmd.RunSQL "DELETE * FROM (tablo_adi);"



Cvp: Kayıt Sil Kodu - notrino - 05/10/2018

(05/10/2018, 14:09)Allback yazdı:
(05/10/2018, 11:53)notrino yazdı: Merhaba,

1) Access standart makrosu içinde yer alan "Kayıt sil" butonunun Vba kodu nedir acaba?

2) Bir de kimliğe bağlı kayıt sil komutunu öğrenmek istiyorum. Yani nasıl ki ;

Kod:
DoCmd.OpenForm "Form Adı", acNormal, , "[Kimlik]=" & Me.Kimlik
komutu kimliğe bağlı bir form açıyor, aynı şekilde kimliğe bağlı bir silme olayı yaratmak istiyorum. Tşk.

Merhaba,

Direk Vba kodunun karşılığı nedir bilmiyorum ama ben "koşula bağlı" silme işlemlerinde aşağıdaki kod bloğunu kullanıyorum.

Kod:
Set db = CurrentDb()
SQL = "SELECT * FROM standartlar_listesi_tablosu WHERE id = " & Me.txid & ";"
Set rs = db.OpenRecordset(SQL)
rs.Delete

Tablonuzdaki tüm veriyi silmek istiyorsanız aşağıdaki kodu kullanabilirsiniz.

Kod:
DoCmd.RunSQL "DELETE * FROM (tablo_adi);"

Evet, koşula bağlı silme kodlamanız işime yaradı. Bir de en basitinden sil komutu nasıl yapılıyor acaba?yani formumda bir veri var ve o veriyi sileceğim. Herhangi bir koşul falan yok. En basit hangi kodla çözülebilir?


Cvp: Kayıt Sil Kodu - ozanakkaya - 05/10/2018

DoCmd.RunCommand acCmdDeleteRecord



Cvp: Kayıt Sil Kodu - notrino - 05/10/2018

(05/10/2018, 14:52)ozanakkaya yazdı:
DoCmd.RunCommand acCmdDeleteRecord

Teşekkürler,

Böylece Bire-Çok bağlantılı iki tablo arasındaki ilişkiden oluşan Form ve alt formumdaki verileri komple şu kod satırı ile sırasıyla silmiş oluyorum. (Önce alt formdaki kayıt siliniyor, sonra da ana formdaki silinmiş oluyor. Tek taşla iki kuş..)

Kod:
Private Sub Komut13_Click()
Set db = CurrentDb()
SQL = "SELECT * FROM Tablo2 WHERE Kimlik = " & Me.Kimlik & ";"
Set rs = db.OpenRecordset(SQL)
rs.Delete
DoCmd.RunCommand acCmdDeleteRecord
End Sub




Cvp: Kayıt Sil Kodu - ozanakkaya - 05/10/2018

Bir-çok şeklinde düzenlenen ilişkilendirmede "İlişkili Kayıtları Art Arda Sil" onay kutusu işaretli ise alt tablodaki kayıtları silmek için ayrıca işlem yapmaya gerek yoktur. Ana tablodaki kayıt silinirse ilişkilendirilen alt tablodaki kayıtlar da silinir.