AccessTr.neT

Tam Versiyon: Kayıt Sil Kodu
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
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.
(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);"
(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?
DoCmd.RunCommand acCmdDeleteRecord
(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
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.
Sayfalar: 1 2